Basic Program Sample - Printronix S828 Programmer's Manual

Programmer Manual

Basic Program Sample

100 DEFSTR DEFSTR
110 WIDTH WIDTH
120 LPRINT LPRINT
121 LPRINT LPRINT
130 LPRINT LPRINT
140 LPRINT LPRINT
150 LPRINT LPRINT
160 LPRINT LPRINT
170 LPRINT LPRINT
180 LPRINT LPRINT
190 LPRINT LPRINT
200 LPRINT LPRINT
210 LPRINT LPRINT
220 LPRINT LPRINT
230 LPRINT LPRINT
240 LPRINT LPRINT
250 LPRINT LPRINT
260 LPRINT LPRINT
270 LPRINT LPRINT
280 LPRINT LPRINT
290 LPRINT LPRINT
300 LPRINT LPRINT
310 LPRINT LPRINT
320 LPRINT LPRINT
340 LPRINT LPRINT
350 LPRINT LPRINT
260 LPRINT LPRINT
370 LPRINT LPRINT
371 LPRINT LPRINT
380 LPRINT LPRINT
381 LPRINT LPRINT
390 LPRINT LPRINT
400 LPRINT LPRINT
410 REM REM
420 LPRINT LPRINT
430 REM REM
440 LPRINT LPRINT
441 LPRINT LPRINT
450 LPRINT LPRINT
460 REM
470 LPRINT
471 LPRINT
480 LPRINT
490 LPRINT
500 LPRINT
510 LPRINT
520 FOR
530 LPRINT
540 NEXT
550 LPRINT
560 LPRINT
570 FOR
580 LPRINT
590 NEXT
600 LPRINT
610 LPRINT
620 END
Chapter 3 ANSI Emulation Commands
E:ESC=CHRS(27) 'Define Escape character
.LPT1:*,255
.FOLLOWING ARE SOME OF THIS PRINTER'S .;
.FEATURES USING THE ANSI EMULATION.
ESC;.[;72 C.;.10 CPI (PICA).
ESC;.[;60 G.;.12 CPI (ELITE).
ESC;.[;48 G.;.15 CPI.
ESC;.[;72 C.;.10 CPI.
ESC;.[6m.;.PROPOERTIONAL MODE.
ESC;.[0m.;.BACK TDO NORMAL.
ESC;.5m.;.DOUBLE-WIDE MODE.
LPRINT ESC;.0m':.BACK TO NORMAL.
LPRINT ESC;.[1m.;.BOLD PRINTING.
LPRINT ESC;.[0m.;.BACK TO NORMAL.
LPRINT ESC;.[1m.;.BOLD PRINTING.
LPRINT ESC;.[0m.;.BACK TO NORMAL.
ESC;.L.;.PARTIAL LINE UP .;
ESC;.K.;./ .;
ESC;.L.;.BACK TO NORMAL.
ESC;.[4m.;.UNDERLINE MODE.
ESC;.[0m.;.BACK TO NORMAL.
.
123.;
'456.
.1234567890123456789012345678901234567890.;
.12345678901234567890.
ESC;.[10m.;.DRAFT PRINT MODE.
ESC;.[720;2880s.
.LEFT MARGIN NOW BEGINS AT 1 INCH AND .;
.RIGHT MARGIN NOW ENDS AT 4 INCHES.
ESC;.[0;9792S.
.LEFT MARGIN NOW BEGINS AT 0 INCH AND .;
.RIGHT MARGIN NOW ENDS AT 13.6 INCHES.
ESC;.[62m.;.LQ PRINT MODE .
ESC;.[120; G.;
[=1 TO 3
.1/6 INCH LINE FEED.
I
ESC;.[90; G.;
J=1 TO 3
.1/8 INCH LINE FEED.
J
ESC;.[120; G.;.NOW 1/6 INCH LINE FEED.
.A FORMFEED <FF> FOLLOWS THIS LINE.;CHR$(12)
88
PTX‐S828
260071‐001A