KeyPress 50,1 Delay 100 KeyPress 51,1 Delay 1000 Gosub 判断血兰2 IfColor 441,67,0201EA,0 Delay 300 Goto 技能2 EndIf Gosub 主程序2 Return Sub 判断血兰2 Lx=14 Rx=139 hpy=74 mpy=86 Hcolor="574C3E" Mcolor="524539" VBSCall hpx=int(jhp/100*(Rx-Lx)+Lx) VBSCall mpx=int(jmp/100*(Rx-Lx)+Lx) IfColor Hpx,hpy,Hcolor,2 KeyPress 112,1 Delay 50 EndIf IfColor mpx,mpy,Mcolor,2 KeyPress 113,1 Delay 50 EndIf Return