Filter
Top Products
97
Figure 6-l 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 (unless you have set Standard mode by mistake). You
can get the correct printout by changing line 110 to this:
110 LPRINT I;CHR$(27);">";CHR$(I);CHR$(27);"=";
CHRS(9);
So how are all of these characters used? Here is a program
that demonstrate how the graphics characters can be combined
to create a figure: the 5 of clubs.
10 LPRINT CHR$(27);"6";
20 LPRINT
CHR$(2lS);CHR$(196);CHR$(l96);
CHR$(196);CHR$(196);CHR$(l96);CHR$(l91)
30 LPRINT
CHR$(l79);CHR$(53);CHR$(32);CHR$(32);
CHR$(32);CHR$(32);CHR$(l79)
40 LPRINT
CHR$(l79);CHR$(32);CHR$(5);CHR$(32);
CHR$(5);CHR$(32);CHR$(l79)
50 LPRINT
CHR$(l79);CHR$(32);CHR$(32);C~$(5);
cHR$(32);cHR$(32);cHR$(l79)
60 LPRINT
CHR$(l79);CHR$(32);CHR$(5);CHR$(32);
CHR$(5);CHR$(32);CHR$(l79)
70 LPRINT
CHR$(l79);CHR$(32);CHR$(32);CHR$(32);
cHR$(32);cHR$(53);cHR$(l79)
80 LPRINT
CHR$(192);CHR$(196);CHR$(l96);
CHR$(l96);CHR$(196);CHRs(196);CHR$(217)
90 LPRINT CHR$(27);"7"
If you have a 7-bit interface, add the following lines to the pro-
gram given above:
15 LPRINT CHR$(27);">";
95 LPRINT CHR$(27);"="