按键精灵后台找色问题
Hwnd=Plugin.Window.MousePoint()Rem挂机Call选怪XY=Plugin.Bkgnd.FindColor(Hwnd,300,50,600,1...
Hwnd = Plugin.Window.MousePoint()
Rem 挂机
Call 选怪
XY = Plugin.Bkgnd.FindColor(Hwnd, 300, 50, 600, 100, "EDB539")
ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)) : Y = Clng(Right(XY, Len(XY) - ZB))
If X > 0 And Y > 0Then
Call 打怪
Else
Call 打坐
Goto 挂机
End If
Sub 选怪
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
End Sub
Sub 打怪
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Delay 1000
End Sub
Sub 打坐
Call Plugin.Bkgnd.KeyPress(Hwnd, 88)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd, 88)
Delay 2000
End Sub
自己做的剑三的脚本,为什么不能后台呢,只能前台操作?
电脑是笔记本,分辨率是1360X768
可以增加悬赏 展开
Rem 挂机
Call 选怪
XY = Plugin.Bkgnd.FindColor(Hwnd, 300, 50, 600, 100, "EDB539")
ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)) : Y = Clng(Right(XY, Len(XY) - ZB))
If X > 0 And Y > 0Then
Call 打怪
Else
Call 打坐
Goto 挂机
End If
Sub 选怪
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
End Sub
Sub 打怪
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd, 50)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Delay 1000
End Sub
Sub 打坐
Call Plugin.Bkgnd.KeyPress(Hwnd, 88)
Delay 2000
Call Plugin.Bkgnd.KeyPress(Hwnd, 88)
Delay 2000
End Sub
自己做的剑三的脚本,为什么不能后台呢,只能前台操作?
电脑是笔记本,分辨率是1360X768
可以增加悬赏 展开
1个回答
展开全部
许多游戏都屏蔽按键精灵后台插件,你试一下后台取色,是不是返回"000000",如果是就说明屏蔽了。
更多追问追答
追问
怎么查看返回呢?
追答
//下面这句取窗口句柄(变量:Hwnd)窗口的客户区(坐标:5, 5)处的颜色
GetColor = Plugin.BkgndColor.GetPixelColor(Hwnd, 5, 5)
MessageBox "后台窗口(坐标:5, 5)处的颜色=" & GetColor
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |