MAIN    START
        LD     GR1,L
        LAD    GR2,STR
        CALL   L2STR
        ST     GR0,LEN
        OUT    STR,LEN
        RET
L       DC     6543
STR     DS     5
LEN     DS     1
        END