home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD 12 / 12_pcplus_supercd.iso / COMUN / NWMAC / NW_MAC / HIDE.PS < prev    next >
Encoding:
Text File  |  1993-09-29  |  929 b   |  34 lines
  1. %!PS-Adobe-
  2. %
  3. %  HIDE.PS                        9/29/93
  4. %
  5. %    Changes the LaserWriter's persistent NBP type to "LaserShared"
  6. %    depends on *undocumented* feature of Apple LaserWriters
  7. %    Does not work on LaserWriter models after LaserWriter IINTX
  8. %    Novell is NOT responsible for results if used on other printers
  9. %
  10. %    Reverse by using UNHIDE.PS
  11. %
  12. %    If used on LaserWriter compatible and it fails, reverse results
  13. %    with the printer NAMER.
  14. %
  15. serverdict begin 0 exitserver
  16. /name 64 string def
  17. statusdict begin
  18.     name printername (:LaserShared)
  19.     dup type 2 index type 2 copy ne {
  20.         pop pop
  21.         errordict begin (concatenate) typecheck end
  22.     }{
  23.         /stringtype ne exch /arraytype ne and {
  24.             errordict begin (concatenate) typecheck end
  25.         } if
  26.     } ifelse
  27.     dup length 2 index length add 1 index type
  28.     /arraytype eq{array}{string}ifelse
  29.     dup 0 4 index putinterval
  30.     dup 4 -1 roll length 4 -1 roll putinterval
  31.     setprintername
  32. end
  33. %%EOF
  34.