149) LPRINT ESC$ "$1";
150 LPRINT "Autos" TB$;
160 FOR I=.4 TO 9.3 STEP .4 : LPRINT CHR$(lGl); :
NEXT
170 LPRINT
180 LPRINT "Chemicals" TBS;
190 FOR I=.4 TO 8.7 STEP .4 : LPRINT CHR$(16@); :
NEXT
200 LPRINT
214) LPRINT "Guns" TB$;
220 FOR I=.4 TO 1.4 STEP .4 : LPRINT CHR$(162); :
NEXT
230 LPRINT
240 LPRINT ESC$ "$0";
254) LPRINT TB$ CHR$(246) CHR$(241) CHR$(241);
260 SCALES =
CHR$(24l)+CHR$(241)+CHR$(248)+CHR$(24l)KHR$(241)
270 FOR I=2 TO 8 STEP 2 : LPRINT SCALES; : NEXT
280 LPRINT CHR$(241) CHR$(241) CHR$(247)
294) LPRINT TB$ " I';
300 FOR I=2 TO 8 STEP 2 : LPRINT " " I; : NEXT
310 LPRINT
324) LPRINT TB$ ESC$ "Sg" "Villions of Dollars" ESC$
"T"
330 END
Note that we didn’t have to re-enter the download characters, since they were already sent to the printer with the first program. They will stay with the printer until you download new characters to replace them or turn the printer off. Even the < ESC > “@I,” command, which initializes the printer, does not destroy the contents of download RAM.
93