永发信息网

那个大神帮我改下按键精灵 我要找到上面坐标颜色 找到就按后台1 没找到就跳回去在找

答案:2  悬赏:20  手机版
解决时间 2021-01-04 12:04
  • 提问者网友:回忆在搜索
  • 2021-01-03 22:02
Hwnd = Plugin.Window.Find(0, "激战2")
HwndEx = Plugin.Window.FindEx(Hwnd, 0, "ArenaNet_Dx_Window_Class", "0")
sRect = Plugin.Window.GetClientRect(Hwnd)
Dim Myarray
MyArray = Split(sRect, "|" )
Ux = CLng(MyArray(0))
Uy =CLng(Myarray (1))

Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
那个大神帮我改下按键精灵 我要找到上面坐标颜色 找到就按后台1 没找到就跳回去在找
最佳答案
  • 五星知识达人网友:躲不过心动
  • 2021-01-03 23:39
后台找色命令的屏幕范围参数本身就是窗口坐标,所以不用后面+Ux之类的,还有,你的窗口范围以及颜色值参数有错,那是绝对找不到色的。如果代码写正确了,也有可能找不到色,按键精灵后台插件实在太差了,游戏一般有保护作用,会屏蔽按键精灵自带后台插件。有没有被游戏屏蔽,你要自己测试。找色代码如下,参数你自己修改:
While True
XY = Plugin.Bkgnd.FindColor(Hwnd, 0, 0, 1024, 768, "0000FF")
ZB = InStr(XY, "|") : X = Clng(Left(XY, ZB - 1))
If X > 0 Then
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
End If
Delay 100 //适当延时,减少CPU使用率
Wend
全部回答
  • 1楼网友:往事隔山水
  • 2021-01-04 00:46
按键精灵自身没有这个功能的. 不过你可以把代码用批量通配符替换.office系列的word就有这个功能. 或者文本编辑工具 editplus 也可以
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯