IsError = False Exit Do Else Call MyDelay() If IsTimeout > 20 Then //超时 10s Exit Do End If End If Loop //修改兵源数量 IsTimeout = 0 Do While True FindPic 0,0,1024,768, "Attachment:\数量.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then LockMouse MoveTo intX+5, intY+2 Delay 50 LeftDoubleClick 1 Delay 50 KeyPress "1", 1 Delay 50 UnlockMouse IsError = False Exit Do Else Call MyDelay() If IsTimeout > 20 Then //超时 10s Exit Do End If End If Loop //确定修改 IsTimeout = 0 Do While True FindPic 0,0,1024,768, "Attachment:\确定.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then MouseClick intX,intY,1 IsError = False Exit Do Else Call MyDelay() If IsTimeout > 20 Then //超时 10s Exit Do End If End If Loop //出征 IsTimeout = 0 Do While True FindPic 0,0,1024,768, "Attachment:\出征.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then MouseClick intX,intY,1 IsError = False Exit Do Else Call MyDelay() If IsTimeout > 20 Then //超时 10s Exit Do End If End If Loop //选择出征目标输入框 IsTimeout = 0 Do While True //选择功击目标 FindPic 6,300,95,768, "Attachment:\请选择.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then MouseClick intX,intY,1 IsError = False Exit Do Else Call MyDelay() If IsTimeout > 20 Then //超时 10s Exit Do End If End If Loop //选择目标(标记第一行) IsTimeout = 0 Do While True FindPic 0,0,1024,768, "Attachment:\标记.bmp", 0.9, intX, intY If intX > 0 And intY > 0 Then LockMouse MoveTo intX, intY Delay 50 LeftClick 1 Delay 50 MoveTo 172, 193 Delay 50 LeftDoubleClick 1 Delay 50 UnlockMouse IsError = False Exit Do Else Call MyDelay() If IsTimeout > 20 Then //超时 10s Exit Do End If End If Loop