🚀 go-pugleaf

In article <42570@netnews.upenn.edu> alex@eniac.seas.upenn.edu (Edmund Davis)
writes:
>Here's a new twist on an old thread:
>
>I want to print out extra start-up pages.  An office I do some work for
>uses the page count for accounting purposes.  Whenever they want it, they
>turn it off and back on again.  I think that this switching is hard
>on the machine. 
>Could someone post the postscript code that forces a laserwriter to
>print it's start-up page?
>
>thanks.
>
Here is a postscript program that will print the total number of pages printed
on an Apple LaserWriter.


statusdict begin
/Helvetica findfont 12 scalefont setfont
20 750 moveto
/str 80 string def
(Page count for printer ) show
str printername show
( is ) show
pagecount str cvs show
end
showpage

Now, to make this work you must print this as postscript.  I know of two ways
to do this.  1) Mark as Postscript style in MS-Word, 2) use SendPS (available
at the Sumex archives).

>alex
><no sig>
>