home *** CD-ROM | disk | FTP | other *** search
- *PPD-Adobe: "4.0"
- *% MOIM1201.spd: Simplified form of MOIM1201.ppd
- *PCFileName: "MOIM1201.PPD"
- *Product: "(Monotype Imagesetter)"
- *PSVersion: "(52.3) 2.11"
- *ModelName: "Monotype ImageMaster 1200"
- *NickName: "Monotype ImageMaster 1200 v52.3"
- *ShortNickName: "Monotype ImageMaster 1200 v52.3"
- *UIConstraints: *InputSlot Lower *PageSize Letter
- *UIConstraints: *InputSlot Lower *PageSize Legal
- *UIConstraints: *InputSlot Lower *PageSize Ledger
- *UIConstraints: *InputSlot Lower *PageRegion Letter
- *UIConstraints: *InputSlot Lower *PageRegion Legal
- *UIConstraints: *InputSlot Lower *PageRegion Ledger
- *UIConstraints: *InputSlot Upper *PageSize Letter
- *UIConstraints: *InputSlot Upper *PageSize Legal
- *UIConstraints: *InputSlot Upper *PageSize Ledger
- *UIConstraints: *InputSlot Upper *PageRegion Letter
- *UIConstraints: *InputSlot Upper *PageRegion Legal
- *UIConstraints: *InputSlot Upper *PageRegion Ledger
- *FreeVM: "2353786"
- *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
- *DefaultResolution: 600dpi
- *?Resolution: "
- save
- initgraphics
- 0 0 moveto currentpoint matrix defaultmatrix transform
- 0 72 lineto currentpoint matrix defaultmatrix transform
- 3 -1 roll sub dup mul
- 3 1 roll exch sub dup mul
- add sqrt round cvi
- ( ) cvs print (dpi) = flush
- restore
- "
- *End
- *ScreenFreq: "85.0"
- *ScreenAngle: "45.0"
- *OpenUI *PageSize: PickOne
- *OrderDependency: 30 AnySetup *PageSize
- *DefaultPageSize: Unknown
- *PageSize Letter: "statusdict /lettertray get exec letter"
- *PageSize Legal: "statusdict /legaltray get exec"
- *PageSize Ledger: "statusdict /ledgertray get exec"
- *PageSize A3: "statusdict /a3tray get exec a3"
- *PageSize A4: "statusdict /a4tray get exec a4"
- *PageSize A5: "statusdict /a5tray get exec a5"
- *?PageSize: "
- save
- mark
- statusdict /pageparams get exec
- pop pop
- (Unknown)
- 3 dict
- dup [612 792] (Letter) put
- dup [612 1008] (Legal) put
- dup [1224 792] (Ledger) put
- dup [420 595] (A5) put
- dup [595 842] (A4) put
- dup [842 1191] (A3) put
- { 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: Unknown
- *PageRegion Letter: "letter"
- *PageRegion Legal: "legal"
- *PageRegion Ledger: "ledger"
- *PageRegion A3: "a3"
- *PageRegion A4: "a4"
- *PageRegion A5: "a5"
- *CloseUI: *PageRegion
- *DefaultImageableArea: Unknown
- *ImageableArea Letter: "9 11 603 781 "
- *ImageableArea Legal: "9 11 603 997 "
- *ImageableArea Ledger: "9 11 1215 781 "
- *ImageableArea A3: "9 11 833 1179 "
- *ImageableArea A4: "9 11 586 831 "
- *ImageableArea A5: "0 1 422 595 "
- *?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: Unknown
- *PaperDimension Letter: "612 792"
- *PaperDimension Legal: "612 1008"
- *PaperDimension Ledger: "1224 792"
- *PaperDimension A3: "842 1191"
- *PaperDimension A4: "595 842"
- *PaperDimension A5: "420 595"
- *DefaultOutputBin: OnlyOne
- *RequiresPageRegion All: True
- *OpenUI *InputSlot: PickOne
- *OrderDependency: 20 AnySetup *InputSlot
- *DefaultInputSlot: Lower
- *InputSlot Upper: "0 statusdict /setpapertray get exec"
- *InputSlot Lower: "1 statusdict /setpapertray get exec"
- *?InputSlot: "
- save
- [ (Upper) (Lower) ] statusdict /papertray get exec
- {get exec} stopped { pop pop (Unknown)} if = flush
- restore
- "
- *End
- *CloseUI: *InputSlot
- *OpenUI *ManualFeed: Boolean
- *OrderDependency: 20 AnySetup *ManualFeed
- *DefaultManualFeed: False
- *ManualFeed True: "statusdict /manualfeed true put"
- *ManualFeed False: "statusdict /manualfeed false put"
- *?ManualFeed: "save
- statusdict /manualfeed get
- {(True)}{(False)}ifelse = flush restore"
- *End
- *CloseUI: *ManualFeed
- *DefaultFont: Courier
- *Font Courier: Standard "(001.004)" Standard ROM
- *Font Courier-Bold: Standard "(002.002)" Standard ROM
- *Font Courier-BoldOblique: Standard "(002.002)" Standard ROM
- *Font Courier-Oblique: Standard "(002.002)" Standard ROM
- *Font Helvetica: Standard "(001.006)" Standard ROM
- *Font Helvetica-Bold: Standard "(001.007)" Standard ROM
- *Font Helvetica-BoldOblique: Standard "(001.007)" Standard ROM
- *Font Helvetica-Narrow: Standard "(001.006)" Standard ROM
- *Font Helvetica-Narrow-Bold: Standard "(001.007)" Standard ROM
- *Font Helvetica-Narrow-BoldOblique: Standard "(001.007)" Standard ROM
- *Font Helvetica-Narrow-Oblique: Standard "(001.006)" Standard ROM
- *Font Helvetica-Oblique: Standard "(001.006)" Standard ROM
- *Font Symbol: Special "(001.003)" Special ROM
- *Font Times-Bold: Standard "(001.007)" Standard ROM
- *Font Times-BoldItalic: Standard "(001.009)" Standard ROM
- *Font Times-Italic: Standard "(001.007)" Standard ROM
- *Font Times-Roman: Standard "(001.007)" Standard ROM
-