VBSCall money_color=GetPixelColor(412-move_x,51-move_y)
For 3
VBSCall VBSCall FindColor(778-move_x,173-move_y,782-move_x,281-move_y,money_color,money_x,money_y)
If money_x>0
MoveTo money_x,money_y
Delay 20
LeftClick 1
Delay 1000
EndIf
EndFor
Return 只捡钱
Sub 判断要捡的物品是否是蓝色或绿色
Delay 70
VBSCall FindColorEx(734-move_x,150-move_y,782-move_x,245-move_y,"FF7121",0,0.2,lanse_x,lanse_y)
If lanse_x>0
LeftClick 1
Else
VBSCall FindColorEx(734-move_x,150-move_y,782-move_x,245-move_y,color_lvse,0,0.8,lvse_x,lvse_y)
If lvse_x>0
LeftClick 1
EndIf
EndIf
Return 判断要捡的物品是否是蓝色或绿色
Sub 召唤兽判断
If timer-t_f8>time_baby
VBSCall FindColorEx(156-move_x,106-move_y,162-move_x,108-move_y,color_all,0,0.2,baby_x,baby_y)
If baby_x<0
Delay 50
KeyPress 119,1
t_f8=timer
EndIf
EndIf
Return 召唤兽判断
Sub 打坐
KeyPress 120 1
Delay 500
Rem 判断雷达范围内是否有怪
VBSCall FindCenterColor(684-move_x,63-move_y,777-move_x,141-move_y,color_all,let_x,let_y)
If let_x>0 and let_y>0
MoveTo 260-move_x,159-move_y
LeftClick 1
Delay 500
Goto start
Else
Delay 700
Goto 判断雷达范围内是否有怪
Delay 200
EndIf
Return 打坐
Sub 使用f4键上的技能
If timer-t_f4>f4_time
KeyPress 115,1
Delay 400
VBSCall SetCursorPos(guai_x,guai_y)
LeftClick 1
Delay 1000
t_f4=timer
Goto 找小地图的怪
EndIf
Return 使用f4键上的技能
Sub 使用f5键上的技能
If timer-t_f5>f5_time
KeyPress 116,1
Delay 400
VBSCall SetCursorPos(guai_x,guai_y)
LeftClick 1
Delay 1000
t_f5=timer
Goto 找小地图的怪
EndIf
Return 使用f5键上的技能
Sub 使用f6键上的技能
If timer-t_f6>f6_time
KeyPress 117,1
Delay 1000
t_f6=timer
EndIf
Return 使用f6键上的技能
Sub 使用f7键上的技能
If timer-t_f7>f7_time
KeyPress 118,1
Delay 1000
t_f7=timer
EndIf
Return 使用f7键上的技能
Sub 打开包裹判断是否满了
If timer-prop_time>time_PropFull*60
Delay 500
KeyPress 66,1
Delay 1500
VBSCall prop_1=GetPixelColor(674-move_x,259-move_y)
VBSCall prop_2=GetPixelColor(450-move_x,112-move_y)
VBSCall prop_3=GetPixelColor(584-move_x,300-move_y)
If prop_1=prop_2 and prop_2=prop_3
Delay 500
MoveTo 514-move_x,499-move_y
LeftClick 1
Delay 500
MoveTo 516-move_x,323-move_y
LeftClick 1