IfColor 539,354,219a9c,2
LeftClick 1
Delay 3000
Goto 回城
EndIf
EndIf
EndIf
Goto 范围
EndIf
Goto 找怪
Else
Goto 打怪
EndIf
//此段通过鼠标位置和找到怪时保存的鼠标位置进行对比,防止找到的是打不到的怪,而被其他怪打死,如果鼠标位置相同说明找到的怪为打不到的怪,然后回挂机点,途中进行角色死亡检测,回挂机点后继续找怪,如果鼠标位置不相同,则继续打怪
Else
Rem 补杀
IfColor 293,66,101873,2
KeyPress 49,1
Delay 100
Gosub 红蓝
Goto 补杀
EndIf
KeyPress 49,1
Delay 100
KeyPress 50,1
Delay 100
KeyPress 53,1
Delay 500
EndIf
//此段为循环打怪后的补杀和拣物
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
Goto 找怪
//打完怪后继续找怪
Rem 卷轴
Delay 50
IfColor 334,754,aee7,2
Delay 50
KeyPress 121,1
Delay 3000
Goto 回城
EndIf
Goto 找怪
//无红药时进行回城卷轴判断,有则回城,无则继续挂机,直到死亡回城
Rem 回城
Delay 5000
KeyPress 9,1
//TAB键调出大地图
Delay 2000
Rem 药商
MoveTo 634,426
//鼠标移动到大地图上代表药品商人NPC的红点
Delay 1000
LeftClick 1
Delay 5000
//前往药品商人
MoveTo 291,154
Delay 5000
VBSCall FindColorEx(625,416,644,436,"00ebef",1,0.8,xa,ya)
If xa>0 and ya>0
Gosub 修理
Gosub 卖物
Gosub 买药
Else
Goto 药商
EndIf
//通过颜色查找判定角色是否到达药品商人处,如果到达调用修理、卖物、买药子程序
Delay 2000
Gosub 天鹰
Delay 100
Goto 找怪
//调用回挂机地图子程序,随挂机地图不同而改变,自己可以用按键录制,回到挂机点后继续挂机
Sub 红蓝
Delay 50
IfColor 145,67,0010d6,1
KeyPress 113,1
Delay 50
EndIf
IfColor 78,77,944d31,1
KeyPress 114,1
Delay 100
KeyPress 116,1
Delay 50
EndIf
Return 红蓝
//+红+蓝子程序
Sub 快红
Delay 50
IfColor 111,67,0010d6,1
KeyPress 115,1
Delay 50
EndIf