Delay 200 LeftClick 1 End If Call e() Call e() Call e() Sub e() FindPic 0,0,1024,768,"Attachment:\获取经验.bmp",0.9,intX,intY End Sub If intX > 0 And intY > 0 Then Delay 200 MoveTo intX + 20, intY + 5 Delay 200 LeftClick 1 Delay 200 LeftClick 1 Delay 200 LeftClick 1 End If