我做的这个按键精灵为什么跳转不到标记的地方?

2025-03-07 05:25:37
推荐回答(2个)
回答1:

IfColor 892+Ux,98+Uy,347de0,0
KeyPress 49,1
判断颜色没成功。。。如果找到就按1是吧

结果他一直在按TAB

找颜色有问题,好好调试一下

回答2:

Hwnd = Plugin.Window.Find(0, "热血世界")
Rect = Plugin.Window.GetClientRect(Hwnd)
Dim MyArray
MyArray=Split(Rect,"ㄧ")
Ux=CLng(MyArray(0))
Uy=CLng(MyArray(1))
Rem 找怪
KeyPress 9,1
Delay 50
IfColor 892+Ux,98+Uy,"347de0",0
KeyPress 49,1
Else
Goto 找怪
End If