Combining User-Defined Characters; Large Letters: Double Wide - Epson FX-80 User Manual

Chapter 18
Combining User-Defined Characters
In this chapter we'll explore the technique of combining user-
defined characters to make large letters and symbols.
Large Letters: Double Wide
We'll start by placing two characters next to each other to form a
double-width letter. Enter this new program, being careful to enter the
line numbers as written (and SAVE the STRATA program from the
last chapter first!):
NEW
2(il LPRINT CHR$(27)":"CHR$«(il)CHR$«(il)CHR$«(il);
25 ' Copies ROM to RAM;
Model I users see Appendix I
3(il LPRINT CHR$(27)"%"CHR$(1)CHR$«(il); , Activates RAM
6(il LPRINT CHR$(27)"&"CHR$«(il)"AB";
65 ' Defines characters A & B
7(il FOR Y=l TO 2: LPRINT CHR$(139); , Attribute byte
8(il FOR X
=
1 TO 11: READ N: LPRINT CHR$(N);: NEXT X
9(il NEXT Y
18(il LPRINT CHR$(27)"@";: END
The ESCape sequences in lines 20, 30, and 60 are the standard fare
from the last chapter. This program prepares the printer to define the
two characters A and B. Enter the DATA lines:
2(il(il DATA
(il,2,5,~,9,16,3,32,7(il,(il,84
21(il DATA 68,32,66,49,8,21,1(il,5,2,(il,(il
215 ' See Appendix I for trouble codes
And how do they look side by side? Enter:
211