请大神给我加两个命令 - 按键精灵吧

level 3

Dim x,y
x=InputBox("输入X：")
y=InputBox("输入Y：")
For 10000
MoveTo x,y
LeftClick 1
Delay 100
FindPic 0,0,1680,1050,"Attachment:\进入战斗.bmp",0.9,intX,intY
If intX> 0 And intY> 0 Then
MoveTo intX, intY
LeftClick 1
End If
Next
请帮加个执行完第一段找到图片后，执行第二段

2015年09月23日 11点09分 1

level 3

双子送你三个字楼主

大神们出来吧

2015年09月23日 11点09分 2

level 8

80006

哪个是第一段？哪个是第二段？

2015年09月23日 11点09分 3

双子送你三个字

找到图点击是第二段

2015年09月23日 12点09分

双子送你三个字

我就是想鼠标一直点，如果出现要点击的图片停止鼠标连点，因为这个命令有时候图片出现不点击

2015年09月23日 12点09分

level 3

双子送你三个字楼主

延迟100上面是第一段
找到图是第二段

2015年09月23日 12点09分 4

level 7

JAMES___WADE

Dim x,y
x=InputBox("输入X：")
y=InputBox("输入Y：")
do
FindPic 0,0,1680,1050,"Attachment:\进入战斗.bmp",0.9,intX,intY
If intX> 0 And intY> 0 Then
MoveTo intX, intY
LeftClick 1
exit do
else
MoveTo x,y
LeftClick 1
End If
loop

2015年09月23日 12点09分 5

双子送你三个字

谢谢