5 CLS:KEY OFF:WIDTH 80:PRINT "A = 17 CPI":PRINT "B = 12 CPI":PRINT "C = 10 CPI":PRINT "D = 8.5 CPI":PRINT "E = 6 CPI":PRINT "F = 5 CPI":PRINT "8 = 8 Lines/Inch"
6 PRINT "6 = 6 Lines / Inch":PRINT "S = SYSTEM"
7 LPRINT CHR$(27);"1"
10 A$=INKEY$
20 IF A$="A"OR A$="a"THEN GOSUB 117
30 IF A$="B"OR A$="b"THEN GOSUB 112
40 IF A$="C"OR A$="c"THEN GOSUB 110
50 IF A$="D"OR A$="d"THEN GOSUB 108
60 IF A$="E"OR A$="e"THEN GOSUB 106
70 IF A$="F"OR A$="f"THEN GOSUB 105
75 IF A$="8"THEN GOSUB 120
78 IF A$="6"THEN GOSUB 130
80 IF A$="S"OR A$="s"THEN GOSUB 200
90 GOTO 10
105 LPRINT CHR$(30):LPRINT CHR$(31):RETURN
106 LPRINT CHR$(29):LPRINT CHR$(31):RETURN
108 LPRINT CHR$(28):LPRINT CHR$(31):RETURN
110 LPRINT CHR$(30):RETURN
112 LPRINT CHR$(29):RETURN
117 LPRINT CHR$(28):RETURN
120 LPRINT CHR$(27);"8":RETURN
130 LPRINT CHR$(27);"6":RETURN
150 STOP
200 SYSTEM
(29):RETURN
117 L