EndIf 
        VBSCall Call FindPic(891, 120, 906, 140,"Attachment:\三号错误3913.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyUpH 39,1
            Goto 三号错误01
        EndIf 
    EndFor 
    Gosub 持续报警
    Rem 三号错误01
    For 80
        KeyDownH 37,1
        Delay 500
        VBSCall Call FindPic(837, 146, 847, 160,"Attachment:\主线0621.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyUpH 37,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 39,1
        Delay 100
        VBSCall Call FindPic(762, 102, 771, 109,"Attachment:\五号2508.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyUpH 39,1
            Delay 500
            Goto 五号出口02
        EndIf 
    EndFor 
    Gosub 三号错误
    Rem 五号出口02
    For 10
        KeyDownH 40,1
        Delay 1000
        KeyPressH 32,1
        Delay 1000
        VBSCall Call FindPic(803, 101, 812, 110,"Attachment:\五号2510.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            Delay 500
            KeyUpH 40,1
            Goto 五号出口03
        EndIf 
    EndFor 
    KeyUpH 40,1
    KeyPressH 32,1
    Delay 1000
    Gosub 三号错误
    Rem 五号出口03
    For 300
        KeyDownH 37,1
        Delay 100
        VBSCall Call FindPic(882, 147, 891, 154,"Attachment:\五号2113.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyPressH 32,1
            Delay 1000
        EndIf 
        VBSCall Call FindPic(889, 122, 900, 130,"Attachment:\五号1316.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0
            KeyUpH 37,1
            Goto 五号出口04
        EndIf 
    EndFor 
    Gosub 三号错误
    Rem 五号出口04
    For 300
        KeyDownH 39,1
        Delay 100
        VBSCall Call FindPic(718, 151, 730, 168,"Attachment:\五号1719.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0