按键精灵8后台鼠标单击无效
以下为后台脚本,除了鼠标单击没有实现,其他均已实现,求高手帮忙改下!!要求最好是在屏幕正中间单击鼠标5次!!游戏窗口分辨率为640*480*16,显示器分辨率为:1900...
以下为后台脚本,除了鼠标单击没有实现,其他均已实现,求高手帮忙改下!!要求最好是在屏幕正中间单击鼠标5次!!游戏窗口分辨率为640*480*16,显示器分辨率为:1900*1200,
按键精灵8的复制到源文件中
Dim Hwnd
Hwnd = Plugin.Window.MousePoint()
Rem 循环
Call Plugin.Bkgnd.KeyPress(Hwnd, 119)
Delay 300
Call Plugin.Bkgnd.LeftClick(Hwnd,825, 386)
Delay 4000
Call Plugin.Bkgnd.KeyPress(Hwnd, 120)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 3000
Goto 循环
正确答案我将追加50分!! 展开
按键精灵8的复制到源文件中
Dim Hwnd
Hwnd = Plugin.Window.MousePoint()
Rem 循环
Call Plugin.Bkgnd.KeyPress(Hwnd, 119)
Delay 300
Call Plugin.Bkgnd.LeftClick(Hwnd,825, 386)
Delay 4000
Call Plugin.Bkgnd.KeyPress(Hwnd, 120)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 3000
Goto 循环
正确答案我将追加50分!! 展开
展开全部
Dim Hwnd
Hwnd = Plugin.Window.MousePoint()
Rem 循环
Call Plugin.Bkgnd.KeyPress(Hwnd, 119)
Delay 300
Call Plugin.Bkgnd.LeftClick(Hwnd,320, 240)
Delay 4000
Call Plugin.Bkgnd.KeyPress(Hwnd, 120)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 3000
Goto 循环
Hwnd = Plugin.Window.MousePoint()
Rem 循环
Call Plugin.Bkgnd.KeyPress(Hwnd, 119)
Delay 300
Call Plugin.Bkgnd.LeftClick(Hwnd,320, 240)
Delay 4000
Call Plugin.Bkgnd.KeyPress(Hwnd, 120)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd, 13)
Delay 3000
Goto 循环
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询