Table of Contents
Advertisement
Table 5-5
Top and bottom margin commands
Function
Control code
Set top margin to n lines
(ESC > "r" CHR$(n)
Set bottom margin to n lines
(ESC) "N" CHR$(n)
Cancel top and bottom margins
(ESC) "0"
In both cases the value of n tells your printer how many lines
to skip, although there is a slight difference in the usage. When
you set the top margin with (ESC) "r" CHR$(n), the value of n
tells the printer what line to start printing on. When you set the
bottom margin with (ESC) "N" CHR$(n), the value of n tells
the printer how many blank lines should be left at the bottom of
the page.
Let's try a simple application to see how these margins work.
Enter this program,
which will print 150 lines without top and
bottom margins.
10 ' Demo of top and bottom margins
60 LPRINT CHR$(12);
: ' form feed
70 FOR I=1 TO 150
80 LPRINT "THIS IS LINE";1
90 NEXT I
110 LPRINT CHR$(12);
: ' form feed
120 END
When you run this program it will print 150 lines right down
the page and across the perforations.
When it's done line 110
sends a form feed to advance to the top of the next page.
Now add the following lines to your program.
(Don't forget
the semicolons or you won't get quite the same results that we
did.)
20 ' Leave 6 blank lines at the bottom of page
30 LPRINT CHR$(27);"N";CHR$(6);
40 ' Start top of page at line 6
50 LPRINT CHR$(27);"r";CHR$(6);
100 LPRINT CHR$(27);"0"
: ' clear top and
bottom margins"
-
Advertisement
Table of Contents
