1 2 3 4 5 6 7 8 S O F T W A R E
If you find yourself defining characters in small groups, the same tech-
nique can be used to store part of the CHR$(27) "&" command:
Z$=CHR$(27)+"&"+CHR$(0)
Z$ can be used to define each new string of characters with a simple
command such as either of these:
LPRINT Z$"AZ";
LPRINT Z$CHR$(l28)CHR$(159);
STRATA
Your current program uses eight user-defined characters,
which will be used again in a later chapter. For now, delete
lines 80, 90 and 165 and change line 180:
180 LPRINT " 147646 12345678"
S T R A T A
Save the current program as STRATA.
Summary
CHR$(27)"&"CHR$(n
CHR$(27)"%"CHR$(n
212
S O F T W A R E
)CHR$(n
)CHR$(n
1
2
Defines characters, where n
buffer
n
(0),
the ending character
For each character in the CHR$(27)"&"
sequence from n
data numbers. The first number, called the
attribute byte, determines the height and
width characteristics of the character at print
time. The other 11 numbers determine the pin
patterns used to print the character
)CHR$(n
)
1
2
Activates a given character set, where n
cates ROM (0) or RAM
);
3
selects the RAM
1
is the starting character, and n
2
to n
the printer expects 12
2
3
and n
(1)
is
3
indi-
1
is 0
2