按键精灵的抓图功能里，想要用抓图功能将截取的3个图片依次点击，请问该如何编程？

Dim intX, intY,a
a=1

Do
Delay 100
If a = 1 Then

FindPic 0, 0, 0, 0, "Attachment:图1.png","000000",0,0.9, intX, intY
If intX >-1 then
TracePrint "找到啦，坐标是"&intX&","&intY
Tap intX,intY
a=2
Else
TracePrint "没找到"
End If
End If
If a = 2 Then

FindPic 0, 0, 0, 0, "Attachment:图2.png","000000",0, 0.9, intX, intY
If intX >-1 then
TracePrint "找到啦，坐标是"&intX&","&intY
Tap intX,intY
a=3
Else
TracePrint "没找到"
End If
End If

If a = 3 Then

FindPic 0, 0, 0, 0, "Attachment:图3.png","000000",0, 0.9, intX, intY
If intX >-1 then
TracePrint "找到啦，坐标是"&intX&","&intY
Tap intX,intY
a=4
Else
TracePrint "没找到"
End If
End If
If a = 4 Then

FindPic 0, 0, 0, 0, "Attachment:图4.png","000000",0, 0.9, intX, intY
If intX >-1 then
TracePrint "找到啦，坐标是"&intX&","&intY
Tap intX,intY
a=5
Else
TracePrint "没找到"
End If
End If
If a = 5 Then

FindPic 0, 0, 0, 0, "Attachment:图5.png","000000",0, 0.9, intX, intY
If intX >-1 then
TracePrint "找到啦，坐标是"&intX&","&intY
Tap intX,intY
a=1
Else
TracePrint "没找到"
End If
End If
Loop
自己替换下5个图 记得放附件

给你做个参考 以前帮别人写的
这个是安卓版本写法PC按键精灵自己改下

可以用，不用改