Filter
Top Products
When you place your dots on this grid, remember that dots cannot
go on horizontal lines, but they can go on vertical lines so long as they
do not overlap any other dots. As you design your characters, draw
the dots as large as you see them in the example on the left in Figure
8-2. If you draw them smaller, you may have overlapping dots with-
out
realizing it.
.overlapping dots
dot on horizontal
line
I
Figure 8-2. Correct and incorrect designs
If you do accidentally call for overlapping dots, don’t worry. The
program will still work, but only one of the dots will be printed.
First definition program
Once you. have drawn your dots on the grid, type in the following
BASIC program and run it. If you are using Applesoft BASIC, see
Appendix F.
100
DIM
F(9)
110
FOR
I=1
TO
9
120
PRINT
"WHICH
ROWS
HAVE
DOTS
IN
COLUMN";1
130
INPUT
R:
IF
R=0
THEN
150
140
F(I)=F(I)+2-(R-1)
150
IF
R=0
THEN
NEXT
I
ELSE
GOT0
130
160
LPRINT
CHR$(27)":"CHR$(O)CHR$(O)CHR$(O);
170
LPRINT
CHR$(27)"%"CHR$(l)CHR$(0);
180
LPRINT
CHR$(27)"&"CHR$(O)"<<";
190
LPRINT
CHR$(128);
200
FOR
X=1
TO
9
210
LPRINT
CHR$(F(X));:
NEXT
X
220
LPRINT
CHR$(B)CHR$(O);
230
LPRINT
"YOUR
CHARACTER
IN
PICA:
<
<
<"
240
LPRINT
"IN
EXPANDED
EMPHASIZED
PICA:
";
250
LPRINT
CHR$(27)"!*<
<
<"
260
LPRINT
CHR$(27)"!"CHR$(B)"YOUR
DATA
NUMBERS:"
270
FOR
K=l
TO
9:
LPRINT
F(K);:
NEXT
K
300
END
63