Filter
Top Products
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