home *** CD-ROM | disk | FTP | other *** search
- *PPD-Adobe: "4.0"
- *% MONO_522.spd: Simplified form of MONO_522.ppd
- *PCFileName: "Mono_522.PPD"
- *PSVersion: "(52.2) 207"
- *Product: "(Monotype Imagesetter)"
- *ModelName: "Monotype Imagesetter"
- *NickName: "Monotype Imagesetter v52.2"
- *ShortNickName: "Monotype Imagesetter v52.2"
- *FreeVM: "2380000"
- *LanguageLevel: "1"
- *ColorDevice: False
- *Password: "0"
- *ExitServer: "
- count 0 eq { % is the password on the stack?
- true
- }{
- dup % potential password
- statusdict /checkpassword get exec not
- } ifelse
- { % if no password or not valid
- (WARNING : Cannot perform the exitserver command.) =
- (Password supplied is not valid.) =
- (Please contact the author of this software.) = flush
- quit
- } if
- serverdict /exitserver get exec
- "
- *End
- *OpenUI *Resolution: PickOne
- *OrderDependency: 10 AnySetup *Resolution
- *DefaultResolution: 1000dpi
- *Resolution 600dpi: "600 statusdict /setresolution get exec"
- *Resolution 1000dpi: "1000 statusdict /setresolution get exec"
- *Resolution 1200dpi: "1200 statusdict /setresolution get exec"
- *Resolution 1500dpi: "1500 statusdict /setresolution get exec"
- *Resolution 1524dpi: "1524 statusdict /setresolution get exec"
- *Resolution 1800dpi: "1800 statusdict /setresolution get exec"
- *Resolution 2400dpi: "2400 statusdict /setresolution get exec"
- *Resolution 3048dpi: "3048 statusdict /setresolution get exec"
- *?Resolution: "
- save
- matrix defaultmatrix dup 0 get dup mul exch 1 get dup mul add sqrt
- 72 mul round cvi
- ( ) cvs print (dpi) = flush
- restore "
- *End
- *CloseUI: *Resolution
- *ScreenFreq: "90.0"
- *ScreenAngle: "45.0"
- *OpenUI *PageSize: PickOne
- *OrderDependency: 30 AnySetup *PageSize
- *DefaultPageSize: Letter.Transverse
- *PageSize Letter.Transverse: "Letter"
- *PageSize Legal: "legal"
- *PageSize Ledger: "ledger"
- *PageSize Tabloid: "11x17"
- *PageSize A3.Transverse: "A3"
- *PageSize A4.Transverse: "A4"
- *PageSize A5.Transverse: "A5"
- *PageSize ISOB5.Transverse: "B5"
- *PageSize A3: "a3"
- *PageSize A4: "a4"
- *PageSize A5: "a5"
- *PageSize ISOB5: "b5"
- *PageSize Letter: "letter"
- *?PageSize: "
- save
- mark statusdict /pageparams get exec exch pop
- 7 dict
- dup [612 792] (Letter) put
- dup [612 1008] (Legal) put
- dup [792 1224] (Tabloid) put
- dup [842 1191] (A3) put
- dup [595 842] (A4) put
- dup [420 595] (A5) put
- dup [499 709] (ISOB5) put
- 6 dict
- dup [792 612] (Letter.Transverse) put
- dup [792 1224] (Ledger) put
- dup [1191 842] (A3.Transverse) put
- dup [842 595] (A4.Transverse) put
- dup [595 420] (A5.Transverse) put
- dup [709 499] (ISOB5.Transverse) put
- 3 -1 roll 1 eq { pop } { exch pop }ifelse
- (Unknown) exch
- { exch aload pop
- 4 index eq exch 5 index eq and
- { exch pop exit } { pop } ifelse
- } bind forall = flush cleartomark
- restore "
- *End
- *CloseUI: *PageSize
- *OpenUI *PageRegion: PickOne
- *OrderDependency: 40 AnySetup *PageRegion
- *DefaultPageRegion: Letter.Transverse
- *PageRegion Letter.Transverse: "Letter"
- *PageRegion Legal: "legal"
- *PageRegion Ledger: "ledger"
- *PageRegion Tabloid: "11x17"
- *PageRegion A3.Transverse: "A3"
- *PageRegion A4.Transverse: "A4"
- *PageRegion A5.Transverse: "A5"
- *PageRegion ISOB5.Transverse: "B5"
- *PageRegion A3: "a3"
- *PageRegion A4: "a4"
- *PageRegion A5: "a5"
- *PageRegion ISOB5: "b5"
- *PageRegion Letter: "letter"
- *CloseUI: *PageRegion
- *DefaultImageableArea: Letter.Transverse
- *ImageableArea Letter.Transverse: "0 0 612 792"
- *ImageableArea Legal: "0 0 612 1008"
- *ImageableArea Ledger: "0 0 1224 792"
- *ImageableArea Tabloid: "0 0 792 1224"
- *ImageableArea A3.Transverse: "0 0 842 1191"
- *ImageableArea A4.Transverse: "0 0 596 842"
- *ImageableArea A5.Transverse: "0 0 420 596 "
- *ImageableArea ISOB5.Transverse: "0 0 498 709 "
- *ImageableArea A3: "0 0 842 1191"
- *ImageableArea A4: "0 0 596 842"
- *ImageableArea A5: "0 0 420 596"
- *ImageableArea ISOB5: "0 0 499 709 "
- *ImageableArea Letter: "0 0 612 792"
- *?ImageableArea: "
- save
- /cvp {( ) cvs print ( ) print } bind def
- /upperright {10000 mul floor 10000 div} bind def
- /lowerleft {10000 mul ceiling 10000 div} bind def
- newpath clippath pathbbox
- 4 -2 roll exch 2 {lowerleft cvp} repeat
- exch 2 {upperright cvp} repeat flush
- restore
- "
- *End
- *DefaultPaperDimension: Letter.Transverse
- *PaperDimension Letter.Transverse: "612 792"
- *PaperDimension Legal: "612 1008"
- *PaperDimension Ledger: "1224 792"
- *PaperDimension Tabloid: "792 1224"
- *PaperDimension A3.Transverse: "842 1191"
- *PaperDimension A4.Transverse: "595 842"
- *PaperDimension A5.Transverse: "420 595"
- *PaperDimension ISOB5.Transverse: "499 709"
- *PaperDimension A3: "842 1191"
- *PaperDimension A4: "595 842"
- *PaperDimension A5: "420 595"
- *PaperDimension ISOB5: "499 709"
- *PaperDimension Letter: "612 792"
- *RequiresPageRegion All: True
- *OpenUI *InputSlot: PickOne
- *OrderDependency: 20 AnySetup *InputSlot
- *DefaultInputSlot: Cassette
- *InputSlot Cassette: ""
- *CloseUI: *InputSlot
- *DefaultFont: Courier
- *Font Courier: Standard "(001.004)" Standard ROM
- *Font Courier-Bold: Standard "(001.004)" Standard ROM
- *Font Courier-BoldOblique: Standard "(001.004)" Standard ROM
- *Font Courier-Oblique: Standard "(001.004)" Standard ROM
- *Font Helvetica: Standard "(001.002)" Standard ROM
- *Font Helvetica-Bold: Standard "(001.002)" Standard ROM
- *Font Helvetica-BoldOblique: Standard "(001.002)" Standard ROM
- *Font Helvetica-Oblique: Standard "(001.002)" Standard ROM
- *Font Symbol: Special "(001.003)" Special ROM
- *Font Times-Bold: Standard "(001.002)" Standard ROM
- *Font Times-BoldItalic: Standard "(001.004)" Standard ROM
- *Font Times-Italic: Standard "(001.002)" Standard ROM
- *Font Times-Roman: Standard "(001.002)" Standard ROM
-