Genicom GEK 00031B - Manual (Page 75)

GEK-00029B 5000 Series Programmer’s Manual 75
Example Form Printout
This example uses the VFU table created in the previous example.
Sample Program to Print Form
The following sample program uses the EVFU program from the prior
example.
Program Instruction Remarks
10 WIDTH “LPT1:”;255 Required by some BASIC
languages to avoid auto LF
20 LPRINT CHR$(16); Go to Top of Form (Channel
1)
25 LPRINT “TOP OF FORM”; Print the indicated words
30 LPRINT CHR$(18); Go to Channel 3
35 LPRINT “TOP MARGIN, LINE 6”; Print the indicated words
40 LPRINT CHR$(19); Go to Channel 4
45 LPRINT “LINE 25”; Print the indicated words
50 LPRINT CHR$(20); Go to Channel 5
55 LPRINT “BOTTOM MARGIN, LINE 57”; Print the indicated words
60 LPRINT CHR$(21); Go to Channel 6
65 LPRINT “END OF FORM”; Print the indicated words
70 END
NOTE
Establish top of form locally before printing. When running
the program, paper will slew to the top of the next form
before printing begins.