home *** CD-ROM | disk | FTP | other *** search
/ What the Doctor Required - The Freshest December / December.iso / windows / mem1614 / driver20.cab / vt5100e1.spd < prev    next >
Encoding:
PostScript Printer Description  |  1997-10-20  |  7.9 KB  |  225 lines
  1. *PPD-Adobe: "4.1"
  2. *% VT5100E1.spd: Simplified form of VT5100E1.ppd
  3. *PCFileName: "VT5100E1.PPD"
  4. *LanguageEncoding: ISOLatin1
  5. *Product: "(Varityper)"
  6. *PSVersion: "(52.3) 1.0"
  7. *ModelName: "Varityper 5100E"
  8. *NickName: "Varityper 5100E v52.3"
  9. *ShortNickName: "Varityper 5100E v52.3"
  10. *FreeVM: "2415554"
  11. *LanguageLevel: "1"
  12. *ColorDevice: False
  13. *Password: "0"
  14. *ExitServer: "
  15.   count 0 eq {  % is the password on the stack?
  16.     true 
  17.   }{
  18.     dup  % potential password
  19.     statusdict /checkpassword get exec not 
  20.   } ifelse 
  21.   {  %  if no password or not valid 
  22.     (WARNING : Cannot perform the exitserver command.) = 
  23.     (Password supplied is not valid.) = 
  24.     (Please contact the author of this software.) = flush
  25.     quit 
  26.   } if 
  27.   serverdict /exitserver get exec
  28. "
  29. *End
  30. *OpenUI *Resolution: Pickone
  31. *OrderDependency: 10 AnySetup *Resolution
  32. *DefaultResolution: 600dpi
  33. *?Resolution: "
  34.   save
  35.   initgraphics
  36.   0 0 moveto currentpoint matrix defaultmatrix transform
  37.   0 72 lineto currentpoint matrix defaultmatrix transform
  38.   3 -1 roll sub dup mul
  39.   3 1 roll exch sub dup mul
  40.   add sqrt round cvi
  41.   (          ) cvs print (dpi) = flush
  42.   restore
  43. "
  44. *End
  45. *CloseUI: *Resolution
  46. *ScreenFreq: "75.0" 
  47. *ScreenAngle: "45.0"
  48. *OpenUI *PageSize: PickOne
  49. *OrderDependency: 30 AnySetup *PageSize
  50. *DefaultPageSize: Letter.Transverse
  51. *PageSize Letter: "letter"
  52. *PageSize Letter.Transverse: "Letter"
  53. *PageSize Letter.Extra: "684 864 1 statusdict /setpage get exec"
  54. *PageSize Legal: "legal"
  55. *PageSize Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  56. *PageSize Tabloid: "11x17"
  57. *PageSize Ledger: "ledger"
  58. *PageSize A4: "a4"
  59. *PageSize A4.Transverse: "A4"
  60. *PageSize A4.Extra: "668 914 1 statusdict /setpage get exec"
  61. *PageSize A5: "a5"
  62. *PageSize A5.Transverse: "A5"   
  63. *PageSize A5.Extra: "492 668 1 statusdict /setpage get exec"
  64. *PageSize A5.Extra.Transverse: "668 492 0 statusdict /setpage get exec"
  65. *PageSize B4: "729.72 1031.46 1 statusdict /setpage get exec"
  66. *PageSize ISOB5: "b5"
  67. *PageSize ISOB5.Transverse: "B5"
  68. *PageSize ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  69. *PageSize ISOB5.Extra.Transverse: "781 571 0 statusdict /setpage get exec"
  70. *?PageSize: "
  71.   save
  72.   mark  statusdict /pageparams get exec  exch pop
  73.   12 dict
  74.   dup [612 792] (Letter) put
  75.   dup [684 864] (Letter.Extra) put
  76.   dup [612 1008] (Legal) put
  77.   dup [684 1080] (Legal.Extra) put
  78.   dup [792 1224] (Tabloid) put
  79.   dup [595 842] (A4) put
  80.   dup [668 914] (A4.Extra) put
  81.   dup [420 595] (A5) put
  82.   dup [492 668] (A5.Extra) put
  83.   dup [729.72 1031.46] (B4) put
  84.   dup [499 709] (ISOB5) put
  85.   dup [571 781] (ISOB5.Extra) put
  86.   7 dict
  87.   dup [792 612] (Letter.Transverse) put
  88.   dup [792 1224] (Ledger) put
  89.   dup [842 595] (A4.Transverse) put
  90.   dup [595 420] (A5.Transverse) put
  91.   dup [668 492] (A5.Extra.Transverse) put
  92.   dup [709 499] (ISOB5.Transverse) put
  93.   dup [781 571] (ISOB5.Extra.Transverse) put
  94.   3 -1 roll 1 eq { pop } { exch pop }ifelse
  95.   (Unknown) exch
  96.   { exch aload pop
  97.     4 index eq exch 5 index eq and
  98.     { exch pop exit } { pop } ifelse
  99.   } bind forall = flush cleartomark
  100.   restore
  101. "
  102. *End
  103. *CloseUI: *PageSize
  104. *OpenUI *PageRegion: PickOne
  105. *OrderDependency: 40 AnySetup *PageRegion
  106. *DefaultPageRegion: Letter.Transverse
  107. *PageRegion Letter: "letter"
  108. *PageRegion Letter.Transverse: "Letter"
  109. *PageRegion Letter.Extra: "684 864 1 statusdict /setpage get exec"
  110. *PageRegion Legal: "legal"
  111. *PageRegion Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  112. *PageRegion Tabloid: "11x17"
  113. *PageRegion Ledger: "ledger"
  114. *PageRegion A4: "a4"
  115. *PageRegion A4.Transverse: "A4"
  116. *PageRegion A4.Extra: "668 914 1 statusdict /setpage get exec"
  117. *PageRegion A5: "a5"
  118. *PageRegion A5.Transverse: "A5"   
  119. *PageRegion A5.Extra: "492 668 1 statusdict /setpage get exec"
  120. *PageRegion A5.Extra.Transverse: "668 492 0 statusdict /setpage get exec"
  121. *PageRegion B4: "729.72 1031.46 1 statusdict /setpage get exec"
  122. *PageRegion ISOB5: "b5"
  123. *PageRegion ISOB5.Transverse: "B5"
  124. *PageRegion ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  125. *PageRegion ISOB5.Extra.Transverse: "781 571 0 statusdict /setpage get exec"
  126. *CloseUI: *PageRegion
  127. *DefaultImageableArea: Letter.Transverse
  128. *ImageableArea Letter: "17 9 604 782 "
  129. *ImageableArea Letter.Transverse: "17 9 604 782 "
  130. *ImageableArea Letter.Extra: "17 9 684 864"
  131. *ImageableArea Legal: "17 9 604 998 "
  132. *ImageableArea Legal.Extra: "17 9 684 1080"
  133. *ImageableArea Tabloid: "17 9 784 1214 "
  134. *ImageableArea Ledger: "17 9 1214 784 "
  135. *ImageableArea A4: "17 9 587 832 "
  136. *ImageableArea A4.Transverse: "17 9 587 832"
  137. *ImageableArea A4.Extra: "17 9 668 914"
  138. *ImageableArea A5: "17 9 412 585 "
  139. *ImageableArea A5.Transverse: "17 9 412 585 "
  140. *ImageableArea A5.Extra: "17 9 492 668"
  141. *ImageableArea A5.Extra.Transverse: "17 9 491 668"
  142. *ImageableArea B4: "17 9 698 991.629"
  143. *ImageableArea ISOB5: "17 9 491 698 "
  144. *ImageableArea ISOB5.Transverse: "17 9 491 698 "
  145. *ImageableArea ISOB5.Extra: "17 9 571 781"
  146. *ImageableArea ISOB5.Extra.Transverse: "17 9 570 781"
  147. *?ImageableArea: "
  148. save
  149. /cvp {(                ) cvs print ( ) print } bind def
  150. /upperright {10000 mul floor 10000 div} bind def
  151. /lowerleft {10000 mul ceiling 10000 div} bind def
  152. newpath clippath pathbbox
  153. 4 -2 roll exch 2 {lowerleft cvp} repeat
  154. exch 2 {upperright cvp} repeat flush
  155. restore
  156. "
  157. *End
  158. *DefaultPaperDimension: Letter.Transverse
  159. *PaperDimension Letter: "612 792 "
  160. *PaperDimension Letter.Transverse: "612 792 "
  161. *PaperDimension Letter.Extra: "684 864 "
  162. *PaperDimension Legal: "612 1008 "
  163. *PaperDimension Legal.Extra:  "684 1080 "
  164. *PaperDimension Tabloid: "792 1224 "
  165. *PaperDimension Ledger: "1224 792"
  166. *PaperDimension A4: "595.3 842 "
  167. *PaperDimension A4.Transverse: "595.3 842 "
  168. *PaperDimension A4.Extra: "668 914 "
  169. *PaperDimension A5: "420 595.3 "
  170. *PaperDimension A5.Transverse: "420 595.3 "
  171. *PaperDimension A5.Extra: "492 668 "
  172. *PaperDimension A5.Extra.Transverse: "492 668 "
  173. *PaperDimension B4: "729.72 1031.46"
  174. *PaperDimension ISOB5: "499 709 "
  175. *PaperDimension ISOB5.Transverse: "499 709 "
  176. *PaperDimension ISOB5.Extra: "571 781 "
  177. *PaperDimension ISOB5.Extra.Transverse: "571 781 "
  178. *CustomPageSize True: "exch pop statusdict /setpageparams get exec"
  179. *ParamCustomPageSize Width: 1 points 1 792
  180. *ParamCustomPageSize Height: 2 points 1 1224
  181. *ParamCustomPageSize WidthOffset/Margins: 3 points 0 791
  182. *ParamCustomPageSize HeightOffset: 4 points 0 0
  183. *ParamCustomPageSize Orientation: 5 points 0 1
  184. *MaxMediaWidth: "792"
  185. *HWMargins: 17 9 8 10
  186. *RequiresPageRegion All: True
  187. *OpenUI *InputSlot: PickOne
  188. *OrderDependency: 20 AnySetup *InputSlot
  189. *DefaultInputSlot: Lower
  190. *InputSlot Upper: "2 statusdict2 /setmediasource get exec"
  191. *InputSlot Lower: "1 statusdict2 /setmediasource get exec"
  192. *InputSlot LargeCapacity: "3 statusdict2 /setmediasource get exec"
  193. *?InputSlot: "
  194.   statusdict2 /getmediasource get exec dup 1 eq {
  195.     pop (Lower)
  196.   }{
  197.     2 eq {(Upper)}{(LargeCapacity)}ifelse
  198.   } ifelse
  199.   = flush
  200. "
  201. *End
  202. *CloseUI: *InputSlot
  203. *OpenGroup: Imagesetter
  204. *OpenUI *MirrorPrint/Mirror: Boolean
  205. *OrderDependency: 50 AnySetup *MirrorPrint
  206. *DefaultMirrorPrint: False
  207. *MirrorPrint True: "true statusdict /setmirrorprint get exec"
  208. *MirrorPrint False: "false statusdict /setmirrorprint get exec"
  209. *?MirrorPrint: "statusdict /mirrorprint get exec {(True)}{(False)}ifelse = flush"
  210. *CloseUI: *MirrorPrint
  211. *OpenUI *NegativePrint/Negative: Boolean
  212. *OrderDependency: 50 AnySetup *NegativePrint
  213. *DefaultNegativePrint: False
  214. *NegativePrint True: "true statusdict /negativeprint get exec"
  215. *NegativePrint False: "false statusdict /negativeprint get exec"
  216. *?NegativePrint: "statusdict /getglobrev get exec {(True)}{(False)}ifelse = flush"
  217. *CloseUI: *NegativePrint
  218. *CloseGroup: Imagesetter
  219. *DefaultFont: Courier
  220. *Font Courier: Standard "(001.004)" Standard ROM
  221. *Font Courier-Bold: Standard "(001.004)" Standard ROM
  222. *Font Courier-BoldOblique: Standard "(001.004)" Standard ROM
  223. *Font Courier-Oblique: Standard "(001.004)" Standard ROM
  224. *Font Symbol: Special "(001.003)" Special ROM
  225.