The following BASIC program prints the design shown in Figures 6-3 and 64. Notice that the data numbers in lines 80-140 are the same numbers that you see in Figure 64. Also note that the WIDTH statement in line 10 is for IBM@ PC BASIC; the format may be different for your system.

10 WIDTH "LPTl*"

20 iPRINT CHR$(27)"*" CHRS (39) CHR$ (42) CHR $(0); 30 FOR x=1 TO 126

40 READ N

50 LPRINT CHR$(N);

60 NEXT X

70 LPRINT

80 DATA 0,0,63,0,0,127,0,0,255,0,3,255~0~15J255~0~31~255

90 DATA 0, 127, 255, 0, 255, 255, 1, 255, 255, 3, 255, 255, 7, 255, 255, 15,

 

255,255

 

100

DATA

31,255,254,31,255,252,31,255,24a,31,255,240,31,255,

 

224,31,255,192

110

DATA

31,255,0,31,252,0,31,240,0,31,224,0,31,12a,0,31,240,0

120

DATA

31,255,192,28,255,224,28,127,240,28,15,248,38,8,252,

 

31,0,=6

 

130

DATA

15,128,15,7,192,7,3,240,7,1,254,7,8,255,7,0,127,135

140

DATA 0,31,199,0,7,231,0,1,247,0,0,255,0,0,127,0,0163

In this program, line 20 assigns the graphics option (24-pin triple-density) with code 39. Code 42 sets the number of pin columns at

42.Lines 80-140 contain 126 bytes of data (42 pin columns x 3 bytes for each pin column). Lines 30-60 print the design shown below.

A

Notice that the dots overlap quite a bit. This design was printed using the triple-density, 24-pin graphics option because the density is the same (180 dots to the inch) in both directions.

Graphics and Userdefined Characters

6-9