Epson SQ-2000, Operating Manual

Page: 76 / 181

An example character definition should make this clear:
10 ‘*** User-defined character: Capital A ***
20 ’
30 ‘Select draft
40 LPRINT CHR$(27) “x’ CHR$(O);
50 ’
60 ‘Define download character
70 LPRINT CHR$(27) “&” CHR$(O);
80 ’
90 ‘beginning and ending at A
100 LPRINT “AA”;
110 LPRINT CHR$(2) CHR$(1O) CHR$(1);
120 ’
130 ‘left margin, # of digits, right margin
140 FOR I=1 TO 10*3
150
READ A
160 LPRINT CHR$(A);
170 NEXT
180 ’
190 ‘Print a sample
200 LPRINT “AAAAAAAAAAAAA”
210 ’
220 ‘Select download
230 LPRINT CHR$(27) “%” CHR$(1);
240 LPRINT “AAAAAAAAAAAAA”
250 ’
260 ‘Deselect download
270 LPRINT CHR$(27) “%" CHR$(0);
280 LPRINT “AAAAAAAAAAAAA”
290 END
300 DATA 25,85,80,4,0,0,1,1,0
310 DATA 0,64,0,0,17,0,0,4,0
320 DATA 0,1,0,0,0,64,0,0,16
330 DATA O,O,O,
In line 40, the <ESC> “x” command selects draft style print-
ing. You’ll see why later in this chapter.
The actual character definition, using the command syntax ex-
plained above, starts
in
line 70. The two A’s in line
100
represent
n1 and n2, the range of characters being defined (in this case, a
range of one). Line 110 contains d0, dl, and
d2.
The information
about the actual character design (which is contained in the data
statements at the end of the program) is sent to the printer in the
loop between lines 140 and 170.
57