跪求按键精灵9后台鼠标连点脚本

2024年11月06日 15:26

有2个网友回答

网友（1）：

Dim Hwnd,坐标
Hwnd = Plugin.Window.MousePoint()
GetCursorPos x, y
坐标 = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray = Split(坐标, "|")
intX = x - Clng(MyArray(0)) : intY = y - Clng(MyArray(1))
Do
Call Plugin.Bkgnd.LeftDoubleClick(Hwnd, intX, intY)
Delay 1000
Loop

启动脚本时记录鼠标所指向的当前窗口及坐标后转换成后台坐标，最后根据后台坐标执行后台左键双击，每秒循环一次

网友（2）：

分太少，没人愿意做···你自己看教程，慢慢学拜