ORG 12
LINP,   SKI         / check input flag
        BUN LINP
        inp
        OUT         /output character
        sta CHR i
        HLT
CHR,
        HEX B42