290 DATA 3,3,25,3,0,3,25,3,12,3,2,3,12,3,3,-1

300 DATA 3,3,24,3,2,3,24,3,12,3,2,3,12,3,3,-1

310 DATA 3,3,23,3,4,3,23,3,12,3,2,3,12,3,3,-1

320 DATA 3,3,22,3,6,3,22,3,12,3,2,3,12,3,3,-1

330 DATA 3,3,21,3,8,3,21,5,8,5,2,5,8,5,3,-1340 DATA 3,3,20,3,10,3,21,18,4,18,4,-1350 DATA 3,3,19,3,12,3,22,14,8,14,6,-1

Yes, indeed, high-resolution graphics does require a large amount of data. Okay, now RUN the program:

Figure 12-S. FX-80 figure

Success! In your printout (which should look like Figure 12-5),can you see the 3D effect of the letters? The modifications to follow will make the letters easier to read.

Type LLIST to see what you’ve got up to this point. It should match Figure 12-6. Figure 12-7 shows the printout and Figure 12-8 shows the listing for the FX-100.

7 WIDTH LPRINT 255

10 LPRINT CHR$(27)"1"

20 G$=CHR$(27)+"L"+CHR$(51)+CHR$(3): GOSUB 160

30 FOR D=1 TO 17: PRINT "ROW";D

40 LPRINT G$;

50 READ L,H

60 L=L*7: H=H*7

70 IF L=0 THEN 90

80 FOR X=1 TO L: LPRINT CHR$(1);: NEXT X90 IF H<0 LPRINT: GOT0 140

----------------------------------------------------------------------------------. Figure 12-6.Program for FX-80 figure

168