SUMMARY: Condensing Printer Output

From: John Bradley (john.bradley@sunman)
Date: Thu Jan 09 1997 - 12:56:34 CST


Summary:

We did a little research and came up with a script that will put in the
desired escape codes to make the printer do what we need it to do.
Simply change $initString = "\033&l12D" to the desired escape code.
Escape codes can be found at the HP site below.

Here's the script:

#!/opt/gnu/bin/perl
#
# Script for sending HP escape sequences to print jobs
# Written by Mike Hill (CTA) 01/08/96
#
$file = $ARGV[0];
$initString = "\033&l12D";
$reset = "\033E";
open(FILE, "$file") || die "cant find file\n";
open(OUT, "|lp") || die "wrong\n";
print OUT $initString;
while(<FILE>)
{
        print OUT $_;
}
print OUT $reset;
close(OUT);

Escape codes for HP printers:
http://www.hp.com/cposupport/printers/support_doc/BPL02705.html

Only one replay thanx:
Karl E. Vogel" <vogelke@c17mis.region2.wpafb.af.mil>

Original:

Managers, I'm printing ASCII text files to an HP LaserJet 5si printer.
I
want to print more lines on one page in landscape mode. I want to be
able
to condense the text but not have to go to really small text font to do
it.
I just want to change the spacing between the lines. Any clues?

Thanx,

jb

-- 
*** John Bradley      ph:619.939.5887         ***
*** Sun Admin.        fx:619.939.9581         ***
*** email:john.bradley@chinalake.navy.mil     ***



This archive was generated by hypermail 2.1.2 : Fri Sep 28 2001 - 23:11:42 CDT