If intX>=0 and intY>=0 Then
            KeyUpH 39,1
            Goto 五号出口05
        End if
    Next
    Call 主线错误()
    Rem 五号出口05
    For 300
        KeyDownH 37,1
        Delay 100
        Call FindPic(750, 151, 760, 164,"Attachment:\五号1419.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0 Then
            KeyUpH 37,1
            Goto 五号出口06
        End if
    Next
    Call 主线错误()
    Rem 五号出口06
    For 30
        KeyDownH 38,1
        Delay 500
        Call FindPic(793, 90, 832, 101,"Attachment:\行脚0210.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0 Then
            KeyUpH 38,1
            Goto 行脚商行馆
        End if
        Call FindPic(802, 147, 812, 162,"Attachment:\行馆入口1021.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0 Then
            Delay 500
            KeyUpH 38,1
            Goto 判断出口rem
        End if
    Next
    KeyUpH 38,1
    KeyPressH 32,1
    Delay 1000
    Call 主线错误()
End Sub
Sub 六号出口()
    Call 主线()
    Rem 六号出口001
    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(819, 123, 827, 136,"Attachment:\人物.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(815, 161, 824, 170,"Attachment:\六号3309.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(721, 98, 734, 111,"Attachment:\六号3913.bmp",0.8,intX,intY)
        If intX>=0 and intY>=0 Then
            KeyUpH 39,1