69
So how are all of these strange characters used? Here is a
short 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$(218);CHR$(196);CHR$(l96);
CHR$(196>;CHR$(196);CHRs(196);CHR$(191)
30 LPRINT CHR$(l79);CHR$(53);CH.R$(32);CHR$(32);
CHR$(32);CHR$(32);CHR$(179)
40 LPRINT CHR$(l79);CJJR$(32);CHR$(5);CHR$(32);
CHR$(5);CHR$(32);CHR$(179)
50 LPRINT CHR$(l?S);CHR$(32);CHR$(32);CHR$(5);
CHR$(32);CHR$(32);CHR$(179)
60 LPRINT CHR$(l79);CHR$(32);CHR$(5);CHR$(32);
CHR$(5);CHR$(32);CHR$(179)
70 LPRINT CHR$(l79);CHR$(32);CHR$(32);CHR$(32);
cHR$(32);CHR$(53);CHR$(179)
80 LPRINT CH.R$(192);CHR$(l96);CHRs(196);
CHR$(196>;CHR$(196);CHR$(l96);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);"="
In this program line 10 selects character set #2 so that all the
graphics characters can be used (including the “club” symbol).
Then lines 20-80 print the 5 of clubs figure. Line 90 cancels
character set #2 (which is the same as selecting character set
#I).
Here is what this program prints: