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