//*普通攻击 SkillType=NORMAL Gosub Skill //*使用连续技能。 Gosub CheckMP2 If MP2=NORMAL SkillType=TIMESKILL n=2 For Count_Skill Gosub CheckETHP If ETHP=NORMAL SkillNum=n Gosub Skill Delay 1200 Else Goto BREAK EndIf n=n+1 EndFor Rem BREAK EndIf //-------------------------------------- LockET=1 EndIf EndWhile EndScript //*技能 Sub Skill //*补红 Gosub CheckHP If HP=LESS KeyPress 97,1 Delay 200 EndIf //*补黄 Gosub CheckMP2 If MP2=LESS KeyPress 99,1 Delay 200 EndIf //*补蓝 Gosub CheckMP1 If MP1=LESS KeyPress 98,1 Delay 200 EndIf //-------------------------------------- If SkillType=NORMAL //*普通攻击 KeyPress 84,1 Delay 300 ElseIf SkillType=TIMESKILL T_Time(SkillNum,1)=timer TimePast=T_Time(SkillNum,1)-T_Time(SkillNum,0) timex=Time_skill(SkillNum) If TimePast>timex If SkillNum>(10-Count_State) or SkillNum=0 Delay 1100 Else Delay 300 EndIf KeyPress 48+SkillNum,3 Delay 300 T_Time(SkillNum,0)=T_Time(SkillNum,1) ElseIf TimePast<0 T_Time(SkillNum,0)=T_Time(SkillNum,1) EndIf EndIf Return //*血 Sub CheckHP IfColor x_HP,y_HP,390CAD,1 HP=LESS Else VBSCall FindColor(115,47,166,47,"FFFFFF",x_white,y_white) IfColor x_white+4,46,3908C6,1 HP=LESSHALF Else HP=NORMAL EndIf EndIf Return //*蓝 Sub CheckMP1 IfColor x_MP1,y_MP1,D6A200,1 MP1=LESS Else MP1=NORMAL EndIf Return //*黄 Sub CheckMP2 IfColor x_MP2,y_MP2,008ABD,1 MP2=LESS Else MP2=NORMAL EndIf Return //*怪血 Sub CheckETHP