PROGRAM INSTRUCTION
10
WIDTH "LPT1:",255
20
LPRINT CHR$(27);"[0;1!p";
30
LPRINT "TOP OF FORM";
40
LPRINT CHR$(27);"[0;3!p";
50
LPRINT "LINE 6";
60
LPRINT CHR$(27);"[0;4!p";
70
LPRINT "LINE 25";
80
LPRINT CHR$(27);"[0;5!p";
90
LPRINT "LINE 57";
100
LPRINT CHR$(27);"0;8!p";
110
LPRINT "END OF FORM";
120
END
GEK-00029B
BASIC Programming Example for Skip to Channel
This is a sample program showing the use of the skip-to-channel
command. It makes use of the previously loaded EVFU program.
REMARKS
Required by some BASIC languages to avoid
auto LF at column 80
Go to top of form (channel 1)
Print the indicated words
Go to channel 3
Print the indicated words
Go to channel 4
Print the indicated words
Go to channel 5
Print the indicated words
Go to channel 8
Print the indicated words
Establish Top of Form locally before
printing forms. When executing the
program, paper slews to the top of
the next form before beginning to
print.
45
NOTE
5000 Series Programmer's Manual