Assuming you like what you see printed from those ASCII positions, you
then want to make that current font permanent. Finally, you also want to
dump allthe temporary fonts from printer memory to make room for some
graphics you’llbe printing.
Let’s start with areset and an underlined heading for your test print:
100 LPRINT CHR$ (27);“E”;
110 LPRINT CHR$ (27);“&dOD”:
120 LPRINT “Underlined heading for test print
of ASCII 128 130“;
130 LPRINT CHR$ (27);“&d@”
140 LPRINT CHR$ (27);“&p3x”:
150 LPRINT CHR$ (128);CHR$(129);CHR$ (130);
160 LPRINT CHR$ (12);
170 LPRINT CHR$ (27):“*C5flF”;
Line 100isjust the <ESC> Ereset command. Lines 110and 130 turnon and
off the underlinefeature.
Line 140 turns on transparent printing, which forces printing even for
normally unprintablecontrol codes. The three bytes you want to print are in
line 150.To see what’s there, you send aform feed command in line 160.
Andfinally, line 170 usesthe font controlcommand to make the currentfont
permanent and then delete alltemporary fonts.
.
77