henry@angel.Eng.Sun.COM (Henry McGilton) (01/22/91)
I tried to mail this to avoid using net bandwidth, but mail bounced.
In article <1991Jan18.214630.21667@ddsw1.MCS.COM>, jeffw@ddsw1.MCS.COM (Jeffrey H. West) writes:
* I am looking for a reference that covers the use of commands like
* statusdict, serverdict, setsccbatch, setprintername, etc.
The PostScript Language Reference Manual ISBN 0-201-10174-2
contains all this stuff in Apendix D. The brand new PostScript
Language Reference Manual encyclopaedia ISBN 0-201-18127-4 contains
most of these details scattered throughout the operator summary, but
the sccbatch operator isn't there and the appendix on the specifics of
the Apple LaserWriter has gone. I assume that you're now encouraged to
buy the Apple LaserWriter Reference Manual, or obtain the supplementary
manuals for the specific printers you're using.
* Alternatly, does anyone know the command sequence which would
* allow an Apple LaserWriter I, IINT, IINTX (connected to a Sun) to
* return the printer name, baud rate, and any other pertinent
* information that may be stored in the PostScript ROM?
Here's a short program that does some of the things you want.
PostScript `experts' direct flames elsewhere.
%!
/Courier-Bold findfont 24 scalefont setfont
216 72 9 mul moveto 100 string statusdict /printername get exec show
72 72 8 mul moveto
(Product Name: ) show statusdict /product get show
72 72 7 mul moveto
(Version Number: ) show version show
72 72 6 mul moveto
(Revision Number: ) show statusdict /revision get 16 string cvs show
25 statusdict /sccbatch get exec
72 72 5 mul moveto
(Parity: ) show [ (Ignore) (Odd) (Even) (None) ] exch get show
72 72 4 mul moveto
(Baud: ) show 10 string cvs show
72 72 3 mul moveto
(Start Page: ) show statusdict /dostartpage get exec 6 string cvs show
72 72 2 mul moveto
(Pages Printed: ) show statusdict /pagecount get exec 10 string cvs show
showpage