Goto 四线错误04
            EndIf 
        EndFor 
        Rem 四线错误04
        For 10
            KeyPressH 32,1
            Delay 1000
            VBSCall Call FindPic(741, 87, 750, 97,"Attachment:\四线错误0418.bmp",0.8,intX,intY)
            If intX>=0 and intY>=0
                Goto 四线错误05
            EndIf 
        EndFor 
    EndFor 
    Gosub 持续报警
    Rem 四线错误05
    For 300
        KeyDownH 39,1
        Delay 100
        VBSCall Call FindPic(773, 122, 783, 137,"Attachment:\四线错误0518.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyPressH 32,1
            Delay 1000
        EndIf 
        VBSCall Call FindPic(802, 147, 812, 162,"Attachment:\行馆入口1021.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyUpH 39,1
            Delay 500
            Goto 出口选择rem
        EndIf 
    EndFor 
    Gosub 持续报警
Return 四线错误
Sub 二号出口
    Gosub 主线
    Rem 二号出口001
    For 300
        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 37,1
        Delay 100
        VBSCall Call FindPic(719, 91, 727, 100,"Attachment:\二号2208.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyUpH 37,1
            Delay 500
            Goto 二号出口02
        EndIf 
    EndFor 
    Gosub 二号错误
    Rem 二号出口02
    For 20
        KeyDownH 38,1
        Delay 500
        VBSCall Call FindPic(803, 84, 813, 94,"Attachment:\二号2205.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(869, 89, 878, 96,"Attachment:\二号2505.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyPressH 32,1
            Delay 1000
        EndIf 
        VBSCall Call FindPic(844, 98, 852, 105,"Attachment:\二号2704.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyPressH 32,1
            Delay 1000