EndIf EndIf EndIf EndIf Return MP Sub MPme If MPvar1>0 Gosub FindMonHM MP_X=4+int(165*MPvar1) IfColor MP_X,56,000000,2 Delay 50 IfColor MP_X,56,000000,2 Delay 2000 KeyPress 89,1 Rem addMP IfColor 169,59,e14e50,1 Delay 1000 Gosub HP Gosub MP Gosub FindMonHM Gosub Reject Goto addMP EndIf KeyPress 89,1 Delay 2000 EndIf EndIf EndIf Return MPme // ------------------------------------------------------------------------------------------- // 拒絕 Sub Reject IfColor 563,419,cecece,0 IfColor 563,438,848484,0 IfColor 609,428,fefefe,0 MoveTo 609,428. Delay 100 LeftClick 1 Delay 100 EndIf EndIf EndIf Return Reject // 調整方向 Sub Aspect If EyesVar=1 // 轉方向 For 5 MoveTo 500,500 RightDown 1 Delay 40 MoveR 0,-10 Delay 40 RightUp 1 Delay 500 EndFor EndIf If AspectVar>0 // 轉方向 For AspectVar MoveTo 500,500 RightDown 1 Delay 40 MoveR 200,0 Delay 40 RightUp 1 EndFor Delay 500 EndIf Return Aspect // 判斷是否為怪物----------------打怪---------------------------------------------- Sub CheckMon // Delay 10 Gosub Arise VBSCall Shape=GetCursorShape(0) If Shape=978197372 If SkillVar=0 // 普通攻擊 (滑鼠左鍵) LeftClick 1 Delay 40 LeftClick 1 Delay 40 ElseIf SkillVar>=1 If ColorVar="c97c5e" // 藍怪使用普通攻擊 (滑鼠左鍵) LeftClick 1 Delay 40 LeftClick 1 Delay 40 ElseIf SkillVar=1 // 技能攻擊 (滑鼠右鍵) RightClick 1 Delay 40 RightClick 1 Delay 40 ElseIf SkillVar=2 // 先左後右攻擊 LeftClick 1 Delay LRTime RightClick 1