s = Lib.网络.shijian()
If s>201301272000
MessageBox "联系作者注册"
EndScript
End If
shenwu = Plugin.Window.Foreground()
Call Plugin.Window.Top(shenwu, 0)
Call Plugin.Window.Move(shenwu, 0, 0)
Hwnd = Plugin.Window.Find("Shell_TrayWnd", 0)
Do
FindPic 0, 0, 1024, 768, "Attachment:\gongji.bmp", 1, intX, intY
Delay 50
If intX > 0 And intY > 0 Then
x=52:y=320
Call 鼠标漂移(52,320)
Delay 1000
x=756:y= 340
Call 鼠标漂移(756,340)
Delay 1000
Else
FindPic 0, 0, 1024, 768, "Attachment:\chetui.bmp", 1, intX, intY
Delay 50
If intX > 0 And intY > 0 Then
Call 鼠标漂移(intX,intY)
Delay 100
End If
End If
loop
EndScript
Sub 鼠标漂移(x, y)
Call Plugin.Window.Active(Hwnd)
Delay 100
MoveTo x,y
Delay 1000
Call Plugin.Window.Active(shenwu)
Delay 100
LeftClick 1
Delay 100
End Sub
Sub 鼠标()
Call Plugin.Window.Active(Hwnd)
Delay 100
MessageBox x&y
MoveTo x,y
Delay 100
Call Plugin.Window.Active(shenwu)
Delay 100
LeftClick 1
Delay 100
End Sub
Sub OnScriptExit()
Call Plugin.Window.Top(shenwu, 1)
End Sub
谁会按键精灵 帮我看下这段程序什么意思
下面全是没有技术含量的后台语句。
这是按键精灵跑商里面的一段代码,谁能给我详细的介绍以下每名的意思及...
---上面三句,一起使用的,就是把客户区大小上的坐标X,坐标Y进行分开,这里的x1=MyArray(0)就是把客户区上的坐标第一个坐标值赋值给x1,y1=MyArray(1)把客户区上的坐标第二个坐标值赋值给y1 不过我个人认为,他得这个脚本肯定错误,因为没有提前为数组MyArray声明就直接使用 bky=30 bkx=4---上面...
来按键精灵高手解释一下这个脚本?关于后台运行的
VBSCall RunApp() \/\/这个函数是打开一个文件 后面括号里写的参数是要打开的文件的路径 Call RunApp("notepad.exe") \/\/里的("notepad.exe")是记事本程序不是句柄(系统自己带的程序一般不用写完整路径比如"图画")VBSCall RunApp("notepad.exe") \/\/是打开记事本 Plugin hwnd=Window.Find(...
会按键精灵的帮我看下,为什么无法移动窗口
你的窗口句柄错了,你上面代码窗口句柄是h,下面移动命令变成了Hwnd,写程序要有良好习惯,变量名要有一定的意义,不要随便弄一个。其次,你这里a*50+50,a*50+50,经过循环后a=ubound(s) - 1,所以每次窗口句柄移动位置还是一样的,如果你想根据a变化,移动命了要放在循环里面。
按键精灵编写的游戏脚本 中的一段 不能运行 请大神们帮忙看看
首先,你这个是用后台插件命令写的脚本,那说明这是一个后台脚本。那你获取的坐标确定是对应窗口内的坐标,而不是屏幕坐标?你脚本开头有写进行窗口句柄获取的命令没有?x 减去8 y减去30 ,说明窗口的起始点坐标是8,30。出现偏移你肯定移动了窗口位置或者改变了窗口大小。要想获取窗口内的坐标需要先...
按键精灵帮我看下
移动到 775,535 延迟 0.8秒 如果 符合条件 左键点击2次 否则延时3秒 点击左键2次 延时 10秒 返回 你的程序如果符合颜色的条件就点击两次(每次左键两下),由于两次时间极其接近,使得你误认为是一次。如果颜色不符合只点击一次。你把第2个“LeftClick 2”删掉应该就行了。
按键精灵代码有问题,有没有大神帮我看下
TracePrint 调试输出 多插入几个位置 找找什么地方导致J被莫名其妙加1的 或者在调试界面有个变量查看窗口 在那监控变量的值 调试几步看看 试试不要用环境变量 也许是这个环境变量被其他程序+1了 Text_pass = Plugin.Office.ReadXls(1, 1, 2)这段为啥是直接读取的 这样你的密码始终都是读取第一行...
按键精灵,为什么这段程序单独运行可以,放到程序里一起运行鼠标就会移动...
放到什么程序里?你能确定是这段代码的问题吗?鼠标移动到屏幕的左上角是因为找图没找到。你的图片传到按键精灵里的附件里了吗?我想你的意思是,找到房子后,鼠标移动到房子的坐标,然后双击,建议你把找图命令下的那一段这样改一下,If intX > 0 And intY > 0 Then MoveTo inta, intb Delay...
能帮我看看这个按键精灵脚本有什么问题吗?我调试时全是类型不匹配_百度...
我都复制下来看了,代码没有问题,但是代码中间的空格好像是全角空格,所以程序不能识别。删除空格后正常了。Dim a(10)a(0) = "0"a(1) = "1"a(2) = "2"a(3) = "3"a(4) = "4"a(5) = "5"a(6) = "6"a(7) = "7"a(8) = "8"a(9) = "9"Dim i Dim x Dim y ...
按键精灵做游戏连技问题!高人速来!
按键精灵有个“录制宏”的功能。这个功能就是记录你的鼠标+键盘的操作。所以你点“开始录制” 然后把你的连技自己按一遍,然后“结束录制” 这时按键精灵会记录一段程序。这段程序就是刚才你操作的那段宏的命令。你所要做的就是把鼠标移动轨迹删除,把按键间隔时间改成0.1秒然后保存就可以了。这就是...