Star Micronics NB-15 FOR I=1 TO 60 LPRINT THIS IS LINE1 70 NEXT, LPRINT CHR$lZ Form feed 100 END

Models: NB-15

1 114
Download 114 pages 4.7 Kb
Page 69
Image 69
50 FOR I=1 TO 150

50 FOR I=1 TO 150

60 LPRINT "THIS IS LINE";1

70NEXT I

90 LPRINT CHR$(lZ); ' Form feed

100 END

When you run this program it will print 150 lines right down the page and across the perforations. When it’s done line 90 sends a form feed to advance to the top of the next page. Look at the lines that have printed near the perforations. Separate the sheets and see if any of the lines have been torn in half. These are the problems that the bottom margin will solve.

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.)

20Leave 6 blank lines at the bottom of page

30LPRINT CHR$(27);"N";CHR$(6);

80LPRINT CHR$(27);"0"; ' Clear bottom margin

Now when you run the program, your printer skip the last six lines on each page.

Line 30 sets the bottom margin, and line 80 clears bottom margin when we are done.

Page 69
Image 69
Star Micronics NB-15 user manual FOR I=1 TO 60 LPRINT THIS IS LINE1 70 NEXT, LPRINT CHR$lZ Form feed 100 END