🚀 go-pugleaf

In article <1992Oct12.171720.24441@medtron.medtronic.com> om8941@curry (Orlin M
elstrand) writes:
+Is there any way to get QuickBasic to eject partial pages printed on the
+HP Laserjet?  I have a friend who has a Laserjet, and when he does a PRINT
+from QuickBasic, he always has to use a manual page eject to get the last
+partial page out.  Has this been fixed on Visual Basic?
+
+Thanks.

Sure!  I'll assume you can send a line of text to the printer with something
like 

PRINT #1, "Print this string."

Using that same routine you can use

PRINT #1, CHR$(nn)

to print any of the 254 printable chars.  Just replace nn with the ASCII 
sequence number for the formfeed character.  I believe FF is #12 so you get...

PRINT #1, CHR$(12)

to send a form feed to LPTx.   I've also seen a DEBUG script which creates an 8 
byte .COM file you can run with the SHELL command.  You could accomplish this 
same task by writing a .BAS which calls the DOS interrupt to the printer or 
sends a FF char as above.  Your choice, the results are the same.

Keith.+
+Orlin Melstrand
+
-- 
D.K.Higgs  DATA+@osu.edu  a.k.a. dhiggs@magnus.acs.ohio-state.edu _____   __o
Ohio State University Libraries, Acquisitions Department      -------    -\<,
Continuation Acquisition Division                              ------ ( )/ ( )
~~(614)292-6314~~~~~~fax(614)292-2015~~~~~~~~~~\_________/~~~~~~~~~~~~~~~~~~~