* read from the console
TERM    EQU     19
MSG     EQU     500
PRINT   EQU     20
        ORIG    1000
START   IN     MSG(TERM)
*	JBUS	*(TERM)
        OUT    MSG(TERM)
        HLT
        END    START