Delay 1000 //延时防卡 RightClick 1 //右键点击血条 RestoreMousePos EndIf Rem 补蓝 IfColor lan/100*(634-591)+591,49,f09840,2 Else x=(635+591)/2:y=49 Gosub 偏移 Plugin vhr_xyq.mMoveTo(600,50,"shu.bmp",0.9) Delay 1000 //延时防卡 RightClick 1 //右键点击蓝条 RestoreMousePos EndIf Rem 宝宝补红 IfColor bbhong/100*(520-477)+477,37,4034e8,2 Else Plugin vhr_xyq.mMoveTo(499,35,"shu.bmp",0.9) Delay 1000 //延时防卡 RightClick 1 //右键点击血条 RestoreMousePos EndIf Rem 宝宝补蓝 IfColor bblan/100*(520-477)+477,49,f09840,2 Else Plugin vhr_xyq.mMoveTo(482,50,"shu.bmp",0.9) Delay 1000 //延时防卡 RightClick 1 //右键点击蓝条 RestoreMousePos EndIf Return //子程序完结回到调用处 //--------------------[走路] Sub 走路 If paodong=1 For 5 Plugin vhr_xyq.mMoveTo(120,265,"shu.bmp",0.9) Delay 100 LeftClick 1 Gosub 检查战斗 Delay 1800 Plugin vhr_xyq.mMoveTo(517,265,"shu.bmp",0.9) Delay 100 LeftClick 1 Gosub 检查战斗 Delay 1300 EndFor //如果遇敌方式是跑动 //写上你的走路语句 Else Gosub 跟随 //否则调用跟随子程序 EndIf Return 走路 //-------------[跟随] Sub 跟随 Delay 500 //写上根据情况设置等待时间 Return 跟随 //-------------[解决偏移] Sub 偏移 Plugin vhr_xyq.mMoveTo(x,y,"shu.bmp",0.9) Return //------------------[检查战斗] Sub 检查战斗 Plugin Window.Active(mh) IfColor 365,490,9cc0,2 Else Goto 开始挂机 EndIf Return //----------------------[结束]