IfColor 100+Ux,Uy+44,"4B4BDB",1 Then KeyPress "L", 1 Else End If IfColor 206+Ux,44+Uy,"EF",0 Then Else Call 捡东西() Call 加血() Goto 选怪 End If KeyPress "H", 1 Delay 300 KeyPress "I", 1 Delay 300 KeyPress "J", 1 IfColor 90+Ux,Uy+44,"4B4BDB",1 Then KeyPress "N", 1 Else End If IfColor 206+Ux,44+Uy,"EF",0 Then Else Call 加血() Call 捡东西() Goto 选怪 End If Goto 就打 End Sub Sub 打我的怪() FindPic 446+Ux,47+Uy,480+Ux,Uy+81,"Attachment:\自己.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then Call 攻击技能() Else Call 寻怪辅助() End If End Sub Sub 寻怪辅助() FindPic Ux,Uy+53,Ux+26,Uy+79,"Attachment:\战斗状态.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then KeyDown "Num 4", 1 Delay 100 KeyUp "Num 4", 1 Else n=n+1 If n>4 Then n=0 KeyDown "Num 4", 1 Delay 500 KeyUp "Num 4", 1 End If MoveTo 221+Ux, 297+Uy Delay 200 LeftClick 1 End If End Sub Sub 捡东西() KeyPress "Z", 1 Delay 1000 KeyPress "Z", 1 Delay 1000 k=k+1 If k mod 10 =0 Then Goto 使用地图 End If End Sub Sub 战斗中打我的() Rem 谁怕谁 KeyPress "Tab", 1 Delay 100 FindPic 446+Ux,47+Uy,480+Ux,Uy+81,"Attachment:\自己.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then KeyPress "W", 1 Delay 1000 KeyPress "G", 1 Delay 1000 KeyPress "F", 1 Delay 1000 KeyPress "T", 1 Delay 1000 Else KeyDown "Num 4", 1 Delay 500 KeyUp "Num 4", 1 Delay 10 Goto 谁怕谁 End If IfColor 206+Ux,44+Uy,"EF",0 Then Else Call 加血() Delay 10 KeyPress "Z", 1 Delay 1000 KeyPress "Z", 1 Delay 1000 KeyPress "O", 1 Goto 到目的地 End If Goto 谁怕谁 End Sub Sub 加血()