10 LPRINT CHR$(27) "*" CHR$(l) CHR$(160) CHRS(162);
20 FOR N = 160 TO 162
30 FOR M = 0 TO 11
40 READ MM
50 LPRINT CHR$(MM);
60 NEXT M
70 NEXT N
80 LPRINT
90 DATA 139,2,5,8,241,0,0,241,8,5,2,0
100 DATA 139,124,0,66,4,64,36,16,2,16,12,0
110 DATA 139,46,16,2,60,0,48,0,48,0,48,0
When you run this program, it looks like nothing happens. That’s OK. We’ll see why in just a moment. Save this program. We’ll need it again shortly.
PRINTING DOWNLOAD CHARACTERS
You’ve now defined and sent three characters to
(For STAR mode)
<ESC> "$" n
(For IBM mode)
<ESC> “%” n 8
This command is used to select the download character set (if n= 1) or to select the standard character set (if n.=O). Let’s try it out. Enter this command:
LPRINT CHR$(27) "$1" CHR$(l60) CHRS(161) CHR$(162)
91