Dim hwnd
Call Plugin hwnd = Window.GetKeyFocusWnd()
Call Plugin s=Window.GetClientRect(hwnd)
XYArray = Split(s, "|", - 1 , 1)
dx=XYArray(0)
dy = XYArray(1)
Call Plugin Bkgnd.MoveTo(hwnd, 57-dx, 300-dy)
For 1000
Call Plugin Bkgnd.LeftClick(hwnd, 1)
Call Plugin Bkgnd.MoveTo (hwnd, 365-dx, 787-dy)
Call Plugin Bkgnd.LeftClick (hwnd, 1)
Delay 1000
Call Plugin Bkgnd.MoveTo (hwnd, 409-dx, 845-dy)
Call Plugin Bkgnd.KeyDown (hwnd, 17, 1)
Call Plugin Bkgnd.KeyPress (hwnd, 86, 1)
Call Plugin Bkgnd.KeyUp (hwnd, 17, 1)
Delay 500
Call Plugin Bkgnd.MoveTo(hwnd, 409-dx, 845-dy)
Call Plugin Bkgnd.LeftClick(hwnd, 2)
Delay 500
Call Plugin Bkgnd.MoveTo(hwnd, 57-dx, 300-dy)
Delay 500
Call Plugin Bkgnd.MouseWheel (hwnd, -1)
Delay 500
Call Plugin Bkgnd.MoveR (hwnd, 0, 4)
Next
语法错误:脚本
聊天 ,第2行,第6个字符:(错误码0)没有找到合法的符号。
语法错误:脚本
聊天 ,第3行,第6个字符:(错误码0)没有找到合法的符号。
语法错误:脚本
聊天 ,第8行,第6个字符:(错误码0)没有找到合法的符号。
语法错误:脚本
聊天 ,第8行,第18个字符:(错误码0)没有找到合法的符号。
= = 我新手....那该怎么改?我就想一边打字 同时让按键精灵操纵另一边的网页自动发消息.
Call Plugin.Bkgnd.LeftClick(hwnd, 1 )这个我想左键单击...Call Plugin.Bkgnd.MouseWheel(hwnd, -1)鼠标滑轮往下拨一下...
网页的我不懂 你找别人吧
追问和网页没关系 就是在网页上点来点去 和游戏什么一样.
追答你还是先吧命令都搞清楚在写脚本