210

' Pattern

 

220

DATA

"00012000",

"01665620"

230

DATA

"05055050",

"16634652"

240

DATA

"45621663",

"05055050"

250

DATA

"04656630", "00043000"

Figure 16-9. Interlace

Have fun creating your own designs with these characters. You may wish to SAVE the program before proceeding.

Line Graphics

The RX series printers have a set of line-graphics characters stored in ROM. In the following program, we define a similar set.

What are line-graphics characters? They are a set of characters that fit together to make borders and outlines for all kinds of forms. Since they are so useful, we use them again in the next chapter; be sure to save the next program when you are through entering it.

We will add to the program that you built and saved as STRATA in the last chapter. LOAD in the STRATA program and delete lines 180 and 190. Then add these lines:

130 LPRINT CHR$(27)"&"CHR$(0)"al";

140 FOR Y=1 TO 12: LPRINT CHR$(139); 170 LPRINT "a b c d e f g h i j k l"

Remember, if your computer cannot send lowercase letters, use the ASCII values for the letters you need (See Appendix A). Add:

899 ’ <<< LINE GRAPHICS AND SHADING >>>900 DATA 0,0,0,0,15,0,8,0,8,0,8: ' a910 DATA 8,0,8,0,15,0,0,0,0,0,0: ' b920 DATA 8,0,8,0,120,0,0,0,0,0,0: ' c930 DATA 0,0,0,0,120,0,8,0,8,0,8: ' d940 DATA 8,0,8,0,120,0,8,0,8,0,8: ' e950 DATA 8,0,8,0,15,0,8,0,8,0,8: 'f960 DATA 0,0,0,0,127,0,8,0,8,0,8: ' g

225