试着给你写一下,你描述的有点模糊
k = 20
for k
findpic ...... intX,intY
if intX > 0 then
k = 20
end if
next
for l
find pic ...... intX,intY
if intX>0 then
//这里我不知道你要跳转哪,如果跳开头加个goto 如果跳本循环就类似上面那个循环来写
end if
next
Do
图片名称="图一"
Do While 找图(图片名称)=1
Loop
图片名称="图二"
Do While 找图(图片名称)=1
Loop
Loop
Function 找图(图片名称)
For 20
FindPic 0,0,1024,768,"Attachment:\"&图片名称&".bmp",0.7,intX,intY
If intX > 0 And intY > 0 Then
Call Plugin.Msg.Tips("找到"&图片名称)
找图=1
Exit For
End If
Delay 100
Next
End Function