72
40 LPRINT CHR$(I);
50 NEXT I
60 LPRINT c~~$(16);CHR$(l7);
70 FOR I=21 TO 31
80 LPRINT CHR$(I);
90 NEXT I
100 LPRINT
110 FOR I=128 TO 134
120 LPRINT CHR$(I);
130 NEXT I
140 LPRINT CHR$(144);CHR$(l45);
150 FOR I=149 TO 159
160 LPRINT CHR$(I);
170 NEXT I
180 LPRINT CHRS(27);"IO"
190 END
When you run this program you should get like this:
Table
Control code area commands
Function | Control code |
Printable code area expansion Control code area expansion Select undefined codes as characters
Cancel undefined codes as characters
(ESC) “6”
(ESC) “7”
(ESC) “I” 1
(ESC) “I” 0
nPrinting BIG characters
You can even enlarge your character sets for