LPRINTER
PRINT CHR$(27);"@";
PRINT CHR$(27);"A";CHR$(7)
FOR R=1 TO 3
  PRINT TAB(10);CHR$(27);"K";CHR$(14);CHR$(0);
  FOR N=1 TO 14
    READ D: PRINT CHR$(D);
  NEXT N: PRINT
NEXT R: PRINT CHR$(27);"@"
CONSOLE
DATA 4,4,4,4,4,61,71,70,60,4,4,4,4,4
DATA 72,79,89,107,77,73,127,89,73,79,73,73,73,73
DATA 16,112,54,17,81,17,126,16,48,80,16,16,16,16
END