Table of Contents
Advertisement
,-.,
,,....,_
r--
...--...
1
......_
PR-2417 Features
Programming Examples:
To load the draft
character
used in the example for the
Epson
LQ-2500
mode (Greek
gamma)
,
the
following
program may be used.
10 REM Greek Gamma Character Download and
print
20 WIDTH
"L
PTl:
"
,255
30 OPEN
"LPTl:"
AS
11
40 REM---(Initialize the Download
Buffer)
50 PRINT ll,CHRS(27)+"="+CHRS(O)+CHR$(0);
60 REM---(Dot Pattern Data
Entry
to ASCII "A")
70 PRINT 11,CHRS(27)+"="+CHR$(30)+CHR$(0)+CHRS(35);
80 PRINT #1,CHR$(&HO)+CHR$(&HBO);
90 PRINT
11,CHRS(O)+CHR$(128)+CHR$(0);
100
PRINT 11,CHRS(l)+CHRS(O)+CHRS(O);
110 PRINT ll,CHR$(0)+CHRS(128)+CHR$(0);
120 PRINT 11,CHRS(O)+CHR$(65)+CHR$(64);
130
PRINT ll,CHRS(O)+CHRS(18)+CHR$(16);
140
PRINT ll,CHRS(O)+CHRS(5)+CHRS(64);
150
PRINT
ll,CHR$(0)+CHRS(16)+CHR$(0);
160
PRINT 11,CHR$(1)+CHR$(64)+CHRS(O);
170
PRINT
ll,CHR$(0)+CHR$(0)+CHR$(0);
180
REM---(Index
Table Entry
to
ASCII
"A")
190 PRINT ll,CHRS(27)+"="+CHR$(12)+CHRS(O)+CHRS(35);
200
PRINT
ll,CHR$(&H5A)+CHR$(&H82);
210
PRINT
ll,CHR$(&HBO)+CHR$(&HO)+CHRS(8);
220 PRINT ll,CHR$(10)+CHR$(0)+CHR$(0);
230
PRINT ll,CHRS(O)+CHR$(0)+CHR$(0);
240
REM---(Download
Character
print)
250 PRINT
ll,CHRS(27)+"I"+CHRS(4);
260 FOR I=l TO 10
270 PRINT
11,"A";
280
NEXT
290 PRINT ll,CHR$(13);CHR$(10);
300 CLOSE
11
310 END
In this example of Greek gamma, a character is not compressed
and
data of
CM,
through
CMs
are all
zeros.
To
load
the LQ character used
in
the example for the one-eighth-note
character, the following program may be used.
Input format
is
the same as with draft fonts.
5-1
2
Advertisement
Table of Contents
