问个关于按键游侠脚本修改的问题

✀公共变量Dim IsAttack✀是否已经已经攻击Dim LeftX,TopY,BottomX,BottomYDim ZM,CTimeDim PosX,PosYDim HPColorSub Main() Dim i,j HWindow.getClientRect LeftX,TopY,BottomX,BottomY HPColor = GetPixelColor(LeftX+132,TopY+29) i=1 CTime = GetTime Do While 1=1 IsAttack=0 ✀是否发生过攻击 Do While IsAttack<1 ✀如果没发生攻击则寻找怪物攻击 IsAttack=IsAttack+1 ✀假设攻击发生 Call SetInPos ✀调用在身边找怪并攻击的函数 AddBlood ✀加血函数 KeyGroup "Ctrl+A" ✀拣道具函数 SetOutPos1 ✀调用外圈找怪并攻击的函数 SetOutPos2 ✀调用最外圈找怪并攻击的函数 Loop GoBack Delay 10 LoopEnd Sub✀设置内圈攻击Sub SetInPos()✀设置内圈攻击 MoveTo 385+leftx,305+topy ✀鼠标移动 attack ✀调用攻击函数 MoveTo 412+leftx,305+topy attack MoveTo 335+leftx,285+topy Attack MoveTo 365+leftx,270+topy Attack MoveTo 395+leftx,255+topy Attack MoveTo 425+leftx,270+topy Attack MoveTo 455+leftx,285+topy Attack MoveTo 425+leftx,300+topy Attack MoveTo 395+leftx,315+topy Attack MoveTo 365+leftx,300+topy AttackEnd Sub✀设置外圈1攻击位置Sub SetOutPos1()✀设置外圈1攻击位置 MoveTo 315+leftx,285+topy ✀鼠标移动 Attack ✀调用攻击函数✀补血Sub AddBlood() ✀加血函数 If (IsColor(LeftX+132,TopY+29,HPColor,1) <> 1 ) Then ✀判断是否要加血 太长了删除了1部分 我想请问 这里面的加血函数 可以不可以更改为 还剩70%时家血 知道告诉下 谢谢了 最佳答案追加50分 本人Q838957839最好能家Q说 谢谢了
2026年09月19日 22:36
有3个网友回答
网友(1):

If (IsColor(LeftX+132,TopY+29,HPColor,1) <> 1 ) Then '判断是否要加血

这个程序检查血的多少是通过,屏幕上血条的颜色来判断的。没有具体的数的,只要检查屏幕坐标(leftX+132,TopY+29)的颜色是否为指定的颜色(hpcolor)就行了。所以只要修改检查坐标就可以了。

如:If (IsColor(LeftX+150,TopY+29,HPColor,1) <> 1 ),把原leftx+132 改为leftx+150,这样检查点坐标就向右移了28个象素。具体改为多少,多试几次就好了。

网友(2):

玩什么游戏。

可以下个专门的修改器。比较方便。

我单机游戏都是这样。又不会有很长时间。

这个太麻烦了。!

网友(3):

+我Q细说 382163519