
按键精灵如何简单后台,高分悬赏 50
就是单击鼠标左键,无限单击,每次单击0.01秒,或者越短越好,是网页游戏来着,求高手帮忙,代码怎么写?就是说我把鼠标移到我想点击的地方,执行命令后,它就一直点击了,然后我...
就是单击鼠标左键,无限单击,每次单击0.01秒,或者越短越好,是网页游戏来着,求高手帮忙,代码怎么写?
就是说我把鼠标移到我想点击的地方,执行命令后,它就一直点击了,然后我可以自己做自己的事,鼠标可以移到其他地方干别的,那里却一直点击着,后台运行 展开
就是说我把鼠标移到我想点击的地方,执行命令后,它就一直点击了,然后我可以自己做自己的事,鼠标可以移到其他地方干别的,那里却一直点击着,后台运行 展开
2个回答
展开全部
GetCursorPos x1,y1
Hwnd = Plugin.Window.MousePoint()
sRect = Plugin.Window.GetClientRect(Hwnd)
dim MyArray
MyArray = Split(sRect, "|")
x0 = Clng(MyArray(0))
y0 = Clng(MyArray(1))
x = x1 - x0
y = y1 - y0
Do
Call Plugin.Bkgnd.LeftClick(Hwnd, x, y)
Delay 10//延时单位毫秒
Loop
Hwnd = Plugin.Window.MousePoint()
sRect = Plugin.Window.GetClientRect(Hwnd)
dim MyArray
MyArray = Split(sRect, "|")
x0 = Clng(MyArray(0))
y0 = Clng(MyArray(1))
x = x1 - x0
y = y1 - y0
Do
Call Plugin.Bkgnd.LeftClick(Hwnd, x, y)
Delay 10//延时单位毫秒
Loop
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询