Ones Become Dots; Displaying An Array - Epson FX Series User Manual

The final step to plotting a circle in an array is to close the loops
and display the contents of the array. Add these three lines to your
program:
50
LPRINT A(R,C);: NEXT C: LPRINT
60
PRINT "ROW";R: NEXT R
170 LPRINT CHR$(27)"@": END
and RUN it.
0 0 0 0 0
0 0 0 0 0
0 0 0 0 l
0 0 0 1 0
0 0 1 0 0
0 1 0 0 0
0 1 0 0 0
1 0 0 0 0
1 0 0 0 0
1 0 0 0 0
1 0 0 0 0
1 0 0 0 0
1 0 0 0 0
1 0 0 0 0
0 0 0
0 1
0 1 0 0 0
0 0 1 0 0
0 0 0 1 0
0 0 0 0 1
0 0 0 0 0
0 0 0 0 0
The printout shows, in terms of ones and zeros, the results of your
planning and your program's plotting.

Ones become dots

Next you need to translate the contents of the array to dots on the
paper. First, modify line 50 so that it no longer prints out the contents
of the array:
50
NEXT C
Then fill the usual graphics prescription for 7-dot line spacing:
70 LPRINT CHR$(27)"1"CHR$(7);
The CHR$(7) sounds the beeper to tell you when the array is full.
178
0 0 1 1 1
1 1 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0
0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0
0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
1 0 0 0 0
0 0
0 0 0
0 0 0 0 0
0 0 0 0 0
1 1 0 0 0
0 0 1 1 1
Figure 13-6. Displaying an array
0
1 1 1 1
0 0 0 0 1
0 0 0 0 0
0 0 0 0 0
0 0 0
0 0
0 0 0 0 0
0 0 0
0 0
0 0 0 0 0
0
0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 1
1 1 1 1 0
0 0 0 0 0
0 0 0
1 0
0 0 1 0 0
0 0
0 0 1
0
0 0 0 1
0 0 0 0 1
0 0 0 0 1
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 0
0 0 0 0 1
0 0 0 0 0
0 0 0 0 0
0 0 0 0 l
0 0 0 0 l
0 0 0 l 0
0 0 1 0 0
0 1 0 0 0
1 0 0 0 0
0 0 0 0
0
0
0
0
0
0
0
0
1
1
l
1
1
1
0
0
0
0
0
0
0