FindPic 0,0,1600,900,"Attachment:\6.bmp",0.9,logoX,logoY If logoX > 0 And logoY > 0 Then MoveTo logoX,logoY delay 400 LeftClick 1 Delay 200 Else For 5 Call 打怪动作() endfor FindPic 0,0,1600,900,"Attachment:\21.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then Call 跑回打怪点() Else FindPic 0,0,1600,900,"Attachment:\5.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then Call 自动修装备() For 5 Call 打怪动作() endfor End If End If End If Goto go Sub 跑回打怪点() Delay 5000 KeyPress "M",1 delay 2000 FindPic 0,0,1600,900,"Attachment:\15.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX,intY Delay 250 LeftClick 1 End If Delay 2000 FindPic 0,0,1600,900,"Attachment:\16.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX,intY Delay 250 LeftClick 1 End If Delay 2000 FindPic 0,0,1600,900,"Attachment:\17.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX,intY Delay 250 LeftDoubleClick 1 End If Delay 28000 End Sub Sub 自动修装备() KeyPress "E", 1 delay 300 FindPic 0,0,1600,900,"Attachment:\20.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX,intY delay 250 MoveTo intX+17,intY+224 delay 250 LeftClick 1 delay 250 MoveTo intX+17,intY+182 delay 250 LeftClick 1 delay 250 MoveTo intX+17,intY+138 delay 250 LeftClick 1 delay 250 MoveTo intX+17,intY+99 delay 250 LeftClick 1 delay 250 MoveTo intX+17,intY+59 Delay 2000 MoveTo intX+177,intY+98 Delay 250 LeftClick 1 Delay 200 MoveTo intX+177,intY+139 Delay 250 LeftClick 1 Delay 200 LeftClick 1 Delay 200 MoveTo intX+177,intY+182 Delay 250 LeftClick 1 Delay 400 MoveTo intX+177,intY+223 Delay 250 LeftClick 1 Delay 400