These changes fill in the diagonals as illustrated in Figure 12-9:
100 LPRINT CHR$(l)CHR$(3)CHR$(7)CHR$(l5)
CHR$(31)CHR$(63)CHR$(127);
120 LPRINT CHR$(127)CHR$(63)CHR$(31)CHR$(l5)
CHR$(7)CHR$(3)CHR$(l);
Figure
12-9.
More distinct version
And one additional change fills in the entire text (Figure 12-10):
110 FOR X=1 TO H: LPRINT CHR$(127);: NEXT X
Can you vary the program to produce a complete black/white reverse
like the one in Figure
12-11?
Summary
We did not introduce any commands in this chapter. Instead, we
demonstrated two ways of programming dot graphics. For the first
example we used DATA statements to store pin patterns and repeti-
tion factors. For the second example we stored the pin patterns as
constants and used DATA statements only to store repetition factors.
171
To Next Page
Loading...
Need help?
General
