Genicom GEK 00031B - Manual (Page 62)

Chapter 2. ANSI Emulation GEK-00029B 62
Sample Programs
Example 1
The first example shows the code used to print oversize.
Line 10 sets the size to X3 vertical (V) and X3 horizontal (H). Line 20
enters oversize printing with
no rotation. Line 30 is the data to be
printed. Line 40 exits oversize printing. Line 50 returns the size
parameters to X 1 V - X 1 H.
10 LPRINT CHR$(27); "[300;300B";
20 LPRINT CHR$(27); "[1|";
30 LPRINT "ABCabc";
40 LPRINT CHR$(27); "[0|";
50 LPRINT CHR$(27); "[100;100B"
Example 2
The next two examples demonstrate the importance of setting the size
parameters back to X1 V - X1 H after printing oversize. This is the
same program used in Example 1 with an additional line added.
Line 60 prints 1234 in the currently selected font.
10 LPRINT CHR$(27); "[300;300 B";
20 LPRINT CHR$(27); "El:";
30 LPRINT "ABCabc"
40 LPRINT CHR$(27); "CO:";
50 LPRINT CHR$(27); "[100;100 B"
60 LPRINT "1234"