CHAPTER 6 EPSON - 25
c
is the character which signifies the graphics mode: K = single-density (60 dpi), L = double-density (120
dpi), Y = double-speed, double-density (120 dpi) and Z = quadruple-density (240 dpi).
m
defines the new horizontal resolution to be assigned to the specified graphics mode.
m
must be in the
range 0 to 7. A value of 0 selects 60 dots per inch, 1 and 2 select 120 dots per inch, 3 selects 240 dots per
inch, 4 selects 80 dots per inch, 5 selects 72 dots per inch 6 selects 90 dots per inch and 7 selects 144 dots per
inch.
LPRINT CHR$(27); CHR$(63); CHR$(90); CHR$(7); 'Change quad density to
144 dpi
Print 9 bit image
Esc^an1n2 (27)(92)an1n2 <1Bh><5Eh>an1n2
This command enables you to define and print a single line raster bit image on a single text line.
n
1
and
n
2
define the number of vertical 9-dot columns that comprise the image.
a
defines the horizontal density of the image. Set
a
to 0 for a horizontal density of 60 dots per inch, and to 1
for an approximate horizontal density of 120 dots per inch.
The image consists of 256*
n
2
+
n
1
columns of data, each column representing a single vertical column of 1/8".
Each pair of bytes represents a vertical column of nine dots, the most significant bit of the first byte
representing the dot at the top of the column, the least significant bit of the first byte representing the second
dot from the bottom, and the MSB of the second byte representing the dot at the bottom of the column. Bits
1 to 7 of the second byte are not used. Simply set a bit to 1 if you want a dot to appear in that position, and
to 0 if you want white space to appear.
Images are printed from left to right.
Images are printed at a horizontal resolution of 60 or approximately 120 dots per inch and at an approximate
vertical resolution of 72 dots per inch.
You can only use this command in portrait orientation.
10 WIDTH "LPT1", 255
20 LPRINT "*** ESC ^ m n1 n2 ***"
30 LPRINT "--STANDARD DENSITY--"
40 M=0
50 GOSUB 120
60 LPRINT
70 LPRINT
80 LPRINT "--DOUBLE-DENSITY--"
90 M=1
100 GOSUB 120
110 END
120 FOR A=1 TO 10
130 LPRINT CHR$(27); "^";CHR$(M);CHR$(10);CHR$(0);
140 LPRINT CHR$(8);CHR$(128);CHR$(20);CHR$(0);
150 LPRINT CHR$(34);CHR$(128);CHR$(65);CHR$(0);
160 LPRINT CHR$(128);CHR$(128);CHR$(65);CHR$(0);
170 LPRINT CHR$(34);CHR$(128);CHR$(20);CHR$(0);
180 LPRINT CHR$(8);CHR$(128);CHR$(0);CHR$(0);
190 NEXT A
200 RETURN
** ESC ^ m n1 n2 ***
Sample 10