For 300
KeyDownH 39,1
Delay 100
Call FindPic(852, 102, 862, 112,"Attachment:\二号2210.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
KeyPressH 32,1
Delay 500
End if
Call FindPic(836, 112, 845, 121,"Attachment:\二号2309.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
Delay 500
KeyUpH 39,1
Delay 100
For 20
KeyPressH 32,1
Delay 500
Call FindPic(836, 131, 845, 140,"Attachment:\二号2308.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
Goto 三号出口01
End if
Next
Call 持续报警()
End if
Next
Call 四线错误()
Rem 三号出口01
For 300
KeyDownH 39,1
Delay 100
Call FindPic(837, 127, 846, 134,"Attachment:\三号3009.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
KeyUpH 39,1
Delay 500
Goto 三号出口02
End if
Next
Call 三号错误()
Rem 三号出口02
For 20
KeyDownH 38,1
Delay 500
Call FindPic(842, 101, 851, 110,"Attachment:\三号3006.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
Delay 500
KeyUpH 38,1
Goto 三号出口03
End if
Next
KeyUpH 38,1
KeyPressH 32,1
Delay 1000
Call 三号错误()
Rem 三号出口03
For 300
KeyDownH 39,1
Delay 100
Call FindPic(823, 123, 831, 135,"Attachment:\人物.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
KeyUpH 39,1
Delay 500
Goto 三号出口04
End if
Next
Call 三号错误()
Rem 三号出口04
For 20
KeyDownH 38,1
Delay 500
Call FindPic(867, 98, 876, 107,"Attachment:\三号3404.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
Delay 500
KeyUpH 38,1
Goto 三号出口05
End if
Next
KeyUpH 38,1
KeyPressH 32,1
Delay 1000
Call 三号错误()
Rem 三号出口05
For 50
KeyDownH 37,1
Delay 100
Call FindColorEx(791, 118, 820, 139,"5555EE",1,0.8,x9,y9)
If x9>0 and y9>0 Then
KeyUpH 37,1
Delay 500
Goto 三号出口06
End if
Next
Call 三号错误()
Rem 三号出口06
For 20
KeyDownH 38,1
Delay 500
Call FindPic(818, 92, 828, 107,"Attachment:\人物.bmp",0.8,intX,intY)
If intX>=0 and intY>=0 Then
Delay 500
KeyUpH 38,1
Goto 三号出口07