按键精灵找图做选择的脚本

Question

大概的意思就是在一个区域内连续找图
如果找到图1就调用1号子程序
如果找到图2就调用2号子程序
循环以上动作，如果10秒内两张图都没找到则
goto Rem 其他
Rem 找循序
FindPic 180,110,330,150,"顺序.bmp",0.7,intX,intY
If intX > 0 And intY > 0
Gosub 进行攻击
else
Goto 找循序
End If
delay 2000
t0=now
dim X(),i
X(0)="第一关胜利.bmp":X(1)="第一关失败.bmp"
i=0
while datediff("s",t0,now)<10
FindPic 500,220,900,450,"C:\Documents and Settings\Administrator\桌面\"&X(i)&"",0.5,X,Y
If X>0 and Y>0
Select case X(i)
Case X(0)
Goto 胜利
Case X(1)
Call 失败()
End select
End if
i=i+1
If i>1
i=0
End if
delay 500
endwhile
Goto 找循序

写了个这样的但是发现无法判断胜利还是失败

就是gusub 攻击以后，就是每次攻击完以后过2秒找图 看是成功了还是失败了。
其实成功后一般在攻击后6秒左右会出图，失败后大概10秒会出图。不知道有没有什么好方法

Answer 1

你用的是不是按键7?
我只会8的语句,你自己转换一下吧,别忘了自己把最后三个子程序补充下
下面代码的功能就是不停的判断是否攻击,同时一直找图片出现胜利/失败就执行胜利/失败的语句

BeginThread Thread1
BeginThread Thread2

Rem 找循序
FindPic 180,110,330,150,"顺序.bmp",0.7,intX,intY
If intX > 0 And intY > 0
Call 进行攻击()
Else
Delay 1000
End If
Goto 找循序

Sub Thread1()
Rem 胜利
FindPic 500,220,900,450,"C:\Documents and Settings\Administrator\桌面\第一关胜利.bmp",0.5,X1,Y1
If X1>0 and Y1>0
Call 胜利()
Else
Delay 1000
End If
Goto 胜利
End Sub
Sub Thread2()
Rem 失败
FindPic 500,220,900,450,"C:\Documents and Settings\Administrator\桌面\第一关失败.bmp",0.5,X2,Y2
If X2>0 and Y2>0
Call 失败()
Else
Delay 1000
End If
Goto 失败
End Sub

Sub 进行攻击()
End Sub

Sub 胜利()
End Sub

Sub 失败()
End Sub