Gosub [2]
    Gosub [3]
    Gosub [4]
    Gosub [5]
    Gosub [6]
    Gosub [7]
    Gosub [8]
    Gosub [9]
    Rem [输出数字]
    Delay 128
Return txt
//数字判断子程序
Sub [0]
    IfColor x+1 y+2 FFFFFF 0
        IfColor x+3 y+6 FFFFFF 0
            txt=0
            Goto [输出数字]
        EndIf 
    EndIf 
Return [0]
Sub [1]
    IfColor x+1 y+1 FFFFFF 0
        IfColor x+2 y+2 FFFFFF 0
            txt=1
            Goto [输出数字]
        EndIf 
    EndIf 
Return [1]
Sub [2]
    IfColor x y+8 FFFFFF 0
        IfColor x+1 y+6 FFFFFF 0
            txt=2
            Goto [输出数字]
        EndIf 
    EndIf 
Return [2]
Sub [3]
    IfColor x+1 y+1 FFFFFF 0
        IfColor x+3 y+4 FFFFFF 0
            txt=3
            Goto [输出数字]
        EndIf 
    EndIf 
Return [3]
Sub [4]
    IfColor x+1 y+6 FFFFFF 0
        IfColor x+2 y+6 FFFFFF 0
            txt=4
            Goto [输出数字]
        EndIf 
    EndIf 
Return [4]
Sub [5]
    IfColor x y+8 FFFFFF 0
        IfColor x+1 y+1 FFFFFF 0
            txt=5
            Goto [输出数字]
        EndIf 
    EndIf 
Return [5]
Sub [6]
    IfColor x+1 y+1 FFFFFF 0
        IfColor x y+4 FFFFFF 0
            txt=6
            Goto [输出数字]
        EndIf 
    EndIf 
Return [6]
Sub [7]
    IfColor x y FFFFFF 0
        IfColor x y+1 FFFFFF 0
            txt=7
            Goto [输出数字]
        EndIf 
    EndIf 
Return [7]
Sub [8]
    IfColor x+1 y+4 FFFFFF 0
        IfColor x+2 y+4 FFFFFF 0
            txt=8
            Goto [输出数字]
        EndIf 
    EndIf 
Return [8]
Sub [9]
    IfColor x y+8 FFFFFF 0
        IfColor x+1 y+5 FFFFFF 0
            txt=9
            Goto [输出数字]
        EndIf 
    EndIf 
Return [9]