Brother HL- SERIES, Technical Reference Manual, Page: 107 / 392

Revision C 16/01/96
Chapter 2 "PCL" - 92
Make macro permanent
Esc&f10X (27)(38)(102)(49)(48)(89) <1Bh><26h><66h><31h><30h><59h>
•
This command makes the macro whose ID number was specified most recently permanent (that is, it will be
retained if the printer is reset).
Macro example
10 REM ***** A EXAMPLE OF A MACRO *****
20 ESC$=CHR$(27)
30 WIDTH "LPT1:",255
40 REM --- RESET PRINTER ---
50 LPRINT CHR$(27);"E":
60 REM --- SET MACRO ID TO 0 ---
70 LPRINT ESC$+"&f0Y";
80 REM --- START MACRO DEFINITION ---
90 LPRINT ESC$+"&f0X";
100 REM --- SET CURSOR POSITION X=1800 DOT, Y=0 DOT ---
110 LPRINT ESC$+"*p1800x0Y";
120 REM --- SET FONT TO LETTER GOTHIC (18 DOTS WIDE) ---
130 LPRINT ESC$+"(s0p16.66h8.5v0s0b130T";
140 REM --- PRINT COMMENT ---
150 LPRINT "Printed by this printer";
160 REM --- SET CURSOR POSITION X=1790 DOT, Y=-40 DOT ---
170 LPRINT ESC$+"*p1790x-40Y";
180 REM --- PERFORM SHADING ---
190 REM --- SET SHADING WIDTH TO 23 CHAR 20 DOTS ---
200 LPRINT ESC$+"*c";23*18+20;"A";
210 REM --- SET SHADING HEIGHT TO 30 DOTS ---
220 LPRINT ESC$+"*c60B";
230 REM --- DRAW SHADING PATTERN (5% GRAY SCALE) ---
240 LPRINT ESC$+"*c5g2P";
250 REM --- END MACRO DEFINITION ---
260 LPRINT ESC$+"&f1X";
270 REM --- MACRO OVERLAY ON (PRINT THE MESSAGE ON EVERY PRINTOUT) -
- 280 LPRINT ESC$+"&f4X";
290 REM --- SET FONT TO BROUGHAM 10 ---
300 LPRINT ESC$+"(s0p10h12v0s0b128T";
310 REM --- MACRO OVERLAY ON, PAPER EJECT ---
320 LPRINT "MACRO OVERLAY ON"
330 LPRINT CHR$(12);
340 REM --- MACRO OVERLAY ON, PAPER EJECT ---
350 LPRINT "MACRO OVERLAY ON"
360 LPRINT CHR$(12);
370 REM --- MACRO OVERLAY OFF (PRINT WITHOUT THE MESSAGE) ---
380 LPRINT ESC$+"&f5X";
390 REM --- MACRO OVERLAY OFF, PAPER EJECT ---
400 LPRINT "MACRO OVERLAY OFF"
410 LPRINT CHR$(12);
420 END