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