How are escape sequences used?
MTPL
Example in BASIC
Example in Pascal
Printout
2 - 4
BACK
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.
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
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.
After the program has been completed the following text appears:
10 characters/inch
15 characters/inch
10 characters/inch
?
QUIT