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 5-6
Control code area commands
Function Control code
Printable code area expansion (ESC) “6”
Control code area expansion (ESC) “7”
Select undefined codes as
characters (ESC) “I” 1
Cancel undefined codes as
characters (ESC) “I” 0
n Printing BIG characters
You can even enlarge your character sets for attention-grab-
bing headings or special effects. There are six commands you
can use. Everything following any of them will be enlarged as
shown below, until the cancel code is entered.