Mtpl 2-4 example in basic, Example in pascal, Printout 2-4 – Fire-Lite PRN-6 Reference-Manual User Manual

Page 33: Mtpl, Example in basic, Printout

Advertising
background image

MTPL

As the emulations do not cover the entire scope of your printer, a new
printer language has been created. Using MTPL you are able to optimize
operation and handling.

MTPL can be used in connection with other emulations or can be used
alone.

Example in BASIC

open “LPT1:” as #1
width #1,255

Text1$

=

“10 characters/inch”

Text2$

=

“15 characters/inch”

ESC$

=

chr$(27)

print #1,ESC$;"[4w";Text1$;ESC$;"[6w";Text2$;ESC$;"[4w";Text1$

end

Example in Pascal

program cpi_example;
uses printer;
const

ESC

= #27;

Text1

= “10 characters/inch”;

Text2

= “15 characters/inch”;

begin

writeln(lst,Esc,"[4w",Text1,ESC,"[6w",Text2,Esc,"[4w",Text1);

end.

Printout

After the program has been completed the following text appears:

10 characters/inch

15 characters/inch

10 characters/inch

How are escape sequences used?

2 - 4

BACK

QUIT

?

Advertising