CHAPTER 2 PCL - 38
If the current cursor position is to the right of your new right margin setting, the cursor will be moved to the
new right margin.
The factory default left and right margin settings are at the left and right edges of the logical page
respectively.
Depending on your model, margin settings can be made from the printer's control panel (see the User
Guide).
10 REM ***** SET AND CLEAR SIDE MARGINS *****
20 ESC$=CHR$(27)
30 WIDTH "LPT1:",255
40 REM --- END OF LINE WRAP ON ---
50 LPRINT ESC$+"&s0C";
60 REM --- LEFT MARGIN SET TO 10 COLUMNS ----
70 LPRINT ESC$+"&a10L";
80 REM --- RIGHT MARGIN SET TO 70 COLUMNS ----
90 LPRINT ESC$+"&a70M";
100 REM --- PRINT "0123456789" 10 TIMES
110 FOR I=1 TO 10
120 LPRINT "0123456789";
130 NEXT
140 LPRINT
150 REM --- CLEAR SIDE MARGIN ----
160 LPRINT ESC$+"9";
170 REM --- PRINT "0123456789" 10 TIMES
180 FOR I=1 TO 10
190 LPRINT "0123456789";
200 NEXT
210 REM --- PAPER EJECT ----
220 LPRINT CHR$(12);
230 END
4.2.12.
Resetting the horizontal margins
Esc9 (27)(39)
<1Bh><39h>
This command resets the left and right margins to the left and right edges of the logical page respectively.
4.2.13.
Setting the top margin
Esc&
l
#E (27)(38)(108)#(69)
<1Bh><26h><6Ch>#<45h>
# stands for the distance between the top of the logical page and the top margin in rows.
The row height is as defined by the VMI. If you subsequently change the VMI (or the line spacing) the top
margin position that you have set does not change - that is, when you specify the top margin position it
remains fixed physically until you specify a new one or reset it to a default value.
The top margin command is ignored if you try to set a margin greater than the current length of the logical
page.
The top margin command is ignored if the current VMI is 0.
The factory default top margin setting is half an inch below the top of the logical page.
Depending on your model, the top margin can be set from the printer's control panel (see the User Guide).
10 REM ******* SET TOP MARGIN TO 10 LINES *******
20 REM
30 ESC$=CHR$(27)
40 LPRINT ESC$+"&l10E";
50 LPRINT "10 LINES "
60 LPRINT CHR$(12);
70 END