This Manual: http://www.manuallib.com/file/2525964
KX-P1124 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
"LPT1:",255
30
OPEN
"LPTl:"
AS
ill
40
REM---(Initialize
the
Download
Buffer)
50
PRINT
ill,CHR$(27)+"="+CHR$(0)+CHR$(0);
60
REM---(Dot
Pattern
Data
Entry
to
ASCII
"A")
70
PRINT
ill,CHR$(27)+"="+CHR$(30)+CHR$(0)+CHR$(35);
_
so
PRINT ill,CHR$(&HO)+CHR$(&HBO);
~
90
PRINT
ill,CHR$(0)+CHR$(12S)+CHR$(0);
100
PRINT
ill,CHR$(l)+CHR$(O)+CHR$(O);
110
PRINT
ill,CHR$(0)+CHR$(12S)+CHR$(0);
120
PRINT
ill,CHR$(0)+CHR$(65)+CHR$(64);
130
PRINT
ill,CHR$(0)+CHR$(lS)+CHR$(16);
140
PRINT
ill,CHR$(0)+CHR$(5)+CHR$(64);
150
PRINT
ill,CHR$(0)+CHR$(16)+CHR$(0);
160
PRINT
ill,CHR$(1)+CHR$(64)+CHR$(0);
170
PRINT
il1,CHR$(0)+CHR$(0)+CHR$(0);
lS0
REM---(Index
Table
Entry
to
ASCII
"A")
190
PRINT
il1,CHR$(27)+"="+CHR$(12)+CHR$(0)+CHR$(35);
200
PRINT ill,CHR$(&H5A)+CHR$(&HS2);
210
PRINT ill,CHR$(&HBO)+CHR$(&HO)+CHR$(S);
220
PRINT
ill,CHR$(10)+CHR$(0)+CHR$(0);
230
PRINT ill,CHR$(O)+CHR$(O)+CHR$(O);
240
REM---(Download
Character
print)
250
PRINT
ill,CHR$(27)+"I"+CHR$(4);
260
FOR
1=1
TO
10
270
PRINT
ill,"A";
2S0
NEXT
290
PRINT
ill,CHR$(13);CHR$(10);
300
CLOSE
ill
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
.he
one-eighth-note
character, the following program may
be
used.
Input format is the same as with draft fonts.
5-12
To Next Page
