Differences between Decimal BASIC and True BASIC

3. True BASIC original commands that are not available on Decimal BASIC

・Control
    library
        MERGE is a substitute
    OPTION TYPO
        Menu Option－Syntax－Compel All Variables Declared
    OPTION NOLET
        Menu Option－Syntax－Microsoft BASIC Compatible
    GET KEY
        Apply ORD-function after CHARACTER INPUT
    KEY INPUT
        use ASK CHARACTER PENDING
    END DATA, MORE DATA 
        use READ IF MISSING
    DECLARE PUBLIC
        DECLARE EXTERNAL NUMERIC
        DECLARE EXTERNAL STRING
    PUBLIC
        PUBLIC NUMERIC
        PUBLIC STRING
    PRIVATE
        SHARE NUMERIC
        SHARE STRING

・Graphics
    SET BACKGROUND COLOR  (SET BACK)
        SET COLOR MIX(0) and CLEAR
    ASK BACKGROUND COLOR  (ASK BACK)
        use ASK COLOR MIX(0) 
    BOX LINES
        use GRAPH LINES
        EXTERNAL SUB BOX_LINES(l,r,b,t)
            GRAPH LINES: l,b; r,b; r,t; l,t; l,b
        END SUB
    BOX AREA
        use GRAPH AREA
        EXTERNAL SUB BOX_AREA(l,r,b,t)
           GRAPH AREA: l,b; r,b; r,t; l,t
        END SUB
    BOX CLEAR
        SET AREA COLOR 0 and GRAPH AREA
    BOX CIRCLE，BOX ELLIPSE  
        use DRAW CIECLE or DRAW DISK
    BOX KEEP
        use ASK PIXEL ARRAY
    BOX SHOW
        use MAT PLOT CELLS
    GET MOUSE
        use MOUSE POLL
    SET MODE, ASK MODE
        None. （but graphics can be used always）
        To determine the bitmap size, use SET BITMAP SIZE
    SET CURSOR, ASK CURSOR
        None.
    OPEN SCREEN
        None.
    WINDOW #
        None.
        
・File I/O
    ORG RANDOM
        None.
    ORG RECORD
        None.
    Byte file
        OPTION CHARACTER BYTE
        and use CHARACTER INPUT# and PRINT#
    CREATE
        None.(unnecessary)
    END # , MORE #
        use INPUT# IF MISSING THEN
    UNSAVE
        FILE DELETE
    ASK FREE MEMORY
        None.

・Music
    PLAY, SOUND
        None.
          
・Built-in functions
    CPOS, CPOSR, NCPOS, NCPOSR, POSR
          make external functions such as 
          EXTERNAL FUNCTION CPOS(a$,b$,n)
          FOR i=n TO LEN(a$)
             IF POS(b$,a$(i:i))>0 THEN
                LET CPOS=i
                EXIT FUNCTION
             END IF
          NEXT i
          LET CPOS=0
          END FUNCTION
    PEEK, UNPACKB, NUM, NUM$, RUNTIME
        None.

・Built-in subprogram
    DIVIDE
        EXTERNAL SUB DIVIDE(a,b,q,r)
            LET q=INT(a,b)
            LET r=MOD(a,b)
        END SUB