NEW
18 LPRINT CHR$(27) "@"
20 LPRINT CHR$(27) "6"
30 FOR J = 3 TO 6
4Q LPRINT " " J CHR$(J) " ";
50 NEXT
60 LPRINT " 21 " CHR$(21)
70 LPRINT
80 FOR J = 128 TO 254 STEP 10
90 FOR I = J TO J + 9
95 IF I > 254 THEN 118
100 LPRINT I CHR$(I) " 'I;
110 NEXT I : LPRINT : LPRINT : NEXT J
Figure 8-2 shows what this program will print. If your chart
doesn’t look like this because it has regular letters and numbers
instead of the special symbols, then your computer is only using
seven bits. You can get the correct printout by changing line 100
to this:
100 LPRINT I CHR$(27) rr>r' CHR$(I) CHR$(27) "="
CHR$(g) ;
n International character sets
Table 8-5
International character set commands