Data For The Program - Epson FX-80 User Manual

To print the program with one line of data, add:
4¥, LPRINT G$;
19¥, DATA ],2¥,,2,],12,],22,14,8,14,6,-1
and RUN it.
The negative number at the end of line 190 signals the end of the print
line.
The last program change is to add a loop to print 17 lines and to
enter the DATA statements shown in Figure 14-4:
3fil FOR 0=1 TO 17: PRINT "ROW
";D
9fil IF H{fil THEN LPRINT: GOTO 14fil
r
Change 15fil to 14fil
14fil NEXT 0: GOSUB 16fil
2filfil DATA 3,2fil,],3,lfil,3,21,18,4,18,4,-1
21fil DATA 3,2fil,4,3,8,],21,5,8,5,2,5,8,5,],-1
22fil DATA 3,3,22,],6,],22,],12,3,2,3,12,],3,-1
23fil DATA 3,3,23,3,4,3,23,],12,3,2,3,12,3,3,-1
24fil DATA 3,3,24,3,2,3,24,3,12,3,2,3,12,3,3,-1
25fil DATA 3,3,25,3,fil,3,25,3,12,3,2,3,12,3,3,-1
26fil DATA 3,2fil,9,6,5,15,5,18,3,3,12,3,3,-1
27fil DATA 3,2fil,lfil,4,6,15,7,14,5,3,12,3,3,-1
28fil DATA 3,2fil,9,6,5,15,5,5,6,5,3,3,12,3,3,-1
29fil DATA 3,3,25,3,fil,3,25,3,12,3,2,3,12,3,3,-1
3filfil DATA 3,3,24,3,2,3,24,3,12,3,2,3,12,3,3,-1
31fil DATA 3,3,23,3,4,3,23,3,12,3,2,3,12,],3,-1
32fil DATA 3,3,22,3,6,3,22,3,12,3,2,3,12,3,3,-1
33fil DATA 3,],21,3,8,3,21,5,8,5,2,5,8,5,3,-1
34~
DATA 3,3,2fil,3,lfil,3,21;18,4,18,4,-1
35fil DATA 3,3,19,3,12,3,22,14,8,14,6,-1
Figure 14·4. DATA for the program.
Yes, indeed, high-resolution graphics does require a large amount of
data! Okay, now RUN the program:
162