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