//VBSCall MessageBox(guai_x&","&guai_y) //修正怪在雷达处点不到状况 If guai_x>659-move_x and guai_y<166-move_y KeyDownH 38,1 KeyDownH 39,2 Delay 200 KeyUpH 38,1 KeyUpH 39,2 Delay 20 Goto start EndIf guai_x=guai_x+(0.5-rnd)*30 guai_y=guai_y+(0.5-rnd)*60 VBSCall SetCursorPos(guai_x,guai_y) Delay 15 // VBSCall FindCenterColor(guai_x-rh-move_x,guai_y-rh-move_y,guai_x+rh-move_x,guai_y+rh-move_y,color_all,look_x,look_y) // If look_x>0 and look_y>0 //找到怪了打怪 // VBSCall Call SetCursorPos(guai_x,guai_y) //是否使用SP没了后转为物理攻击 If wuligj="Y" //判断SP是否没了 If sp_s_w>=0 and sp_s_w<=14 VBSCall FindColorEx(59-move_x,105-move_y,82-move_x,105+sp_s_w*0.89-move_y,color_sp,0,0.4,sp_x,sp_y) If sp_x<0 LeftDoubleClick 1 Delay 20 Goto 找到怪后跳出循环 EndIf EndIf EndIf //选择技能打怪还是物理打怪 If skill="Y" If y_or_n_f4 ="Y" Gosub 使用f4键上的技能 Goto 找小地图的怪 EndIf //判断是否使用f5键技能 If y_or_n_f5 ="Y" Gosub 使用f5键上的技能 xhf5=1 Goto 找小地图的怪 EndIf RightClick 1 Delay 30 RightClick 1 Else If y_or_n_f4 ="Y" Gosub 使用f4键上的技能 EndIf //判断是否使用f5键技能 If y_or_n_f5 ="Y" Gosub 使用f5键上的技能 xhf5=1 EndIf RightClick 1 Delay 30 RightClick 1 EndIf Delay 50 Goto 找到怪后跳出循环 // EndIf Rem 找到怪后跳出循环 VBSCall FindCenterColor(574-move_x,104-move_y,652-move_x,110-move_y,color_all,die_x,die_y) If die_x>0 and die_y>0 Gosub 判断怪的死亡 Else Delay 100 Goto start EndIf Else //大屏幕内没怪后 判断整个小屏幕,去找怪 VBSCall FindCenterColor(684-move_x,63-move_y,777-move_x,141-move_y,color_all,let_x,let_y) //VBSCall MessageBox(684-move_x&","&63-move_y&","&777-move_x&","&141-move_y) If let_x>0 and let_y>0 If let_x<715-move_x delay_left=((731-move_x)-let_x)/48*1000 KeyDownH 37,1 Delay delay_left KeyUpH 37,2 delay_all_left=delay_all_left+delay_left Delay 20 ElseIf let_x>745-move_x delay_right=(let_x-(731-move_x))/48*1000 KeyDownH 39,1 Delay delay_right KeyUpH 39,2 delay_all_right=delay_all_right+delay_right Delay 20 ElseIf let_y<92-move_y delay_up=((101-move_y)-let_y)/48*1000 KeyDownH 38,1 Delay delay_up KeyUpH 38,2 delay_all_up=delay_all_up+delay_up Delay 20 ElseIf let_x>113-move_y delay_down=(let_y-(101-move_y))/48*1000 KeyDownH 40,1 Delay delay_down