home *** CD-ROM | disk | FTP | other *** search
/ What the Doctor Required - The Freshest December / December.iso / windows / mem1614 / driver20.cab / vt4l3001.spd < prev    next >
Encoding:
PostScript Printer Description  |  1997-10-20  |  9.1 KB  |  242 lines
  1. *PPD-Adobe: "4.1"
  2. *% VT4L3001.spd: Simplified form of VT4L3001.ppd
  3. *PCFileName: "VT4L3001.PPD"
  4. *LanguageEncoding: ISOLatin1
  5. *Product: "(Varityper)"
  6. *PSVersion: "(52.3) 4.7"
  7. *ModelName: "Varityper 4000/L300"
  8. *NickName: "Varityper 4000/L300 v52.3"
  9. *ShortNickName:    "Varityper 4000-L300 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: 2540dpi
  33. *Resolution 423dpi: "423 statusdict /setresolution get exec"
  34. *Resolution 635dpi: "635 statusdict /setresolution get exec"
  35. *Resolution 847dpi: "847 statusdict /setresolution get exec"
  36. *Resolution 1016dpi: "1016 statusdict /setresolution get exec"
  37. *Resolution 1270dpi: "1270 statusdict /setresolution get exec"
  38. *Resolution 1693dpi: "1693 statusdict /setresolution get exec"
  39. *Resolution 2032dpi: "2032 statusdict /setresolution get exec"
  40. *Resolution 2309dpi: "2309 statusdict /setresolution get exec"
  41. *Resolution 2540dpi: "2540 statusdict /setresolution get exec"
  42. *?Resolution: "
  43.   save
  44.   initgraphics
  45.   0 0 moveto currentpoint matrix defaultmatrix transform
  46.   0 72 lineto currentpoint matrix defaultmatrix transform
  47.   3 -1 roll sub dup mul
  48.   3 1 roll exch sub dup mul
  49.   add sqrt round cvi
  50.   (          ) cvs print (dpi) = flush
  51.   restore
  52. "
  53. *End
  54. *CloseUI: *Resolution
  55. *ScreenFreq: "112.5"
  56. *ScreenAngle: "45.0"
  57. *OpenUI *PageSize: PickOne
  58. *OrderDependency: 30 AnySetup *PageSize
  59. *DefaultPageSize: Letter.Transverse
  60. *PageSize Letter: "letter"
  61. *PageSize Letter.Transverse: "Letter"
  62. *PageSize Letter.Extra: "684 864 1 statusdict /setpage get exec"
  63. *PageSize Letter.Extra.Transverse: "864 684 0 statusdict /setpage get exec"
  64. *PageSize Legal: "legal"
  65. *PageSize Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  66. *PageSize Tabloid: "11x17"
  67. *PageSize Tabloid.Extra: "864 1296 1 statusdict /setpage get exec"
  68. *PageSize Ledger: "ledger"
  69. *PageSize A3: "a3"
  70. *PageSize A4: "a4"
  71. *PageSize A4.Transverse: "A4"
  72. *PageSize A4.Extra: "668 914 1 statusdict /setpage get exec"
  73. *PageSize A5: "a5"
  74. *PageSize A5.Transverse: "A5"   
  75. *PageSize A5.Extra: "492 668 1 statusdict /setpage get exec"
  76. *PageSize A5.Extra.Transverse: "668 492 0 statusdict /setpage get exec"
  77. *PageSize B4: "729.72 1031.46 1 statusdict /setpage get exec"
  78. *PageSize B4.Extra: "801.72 1103.46 1 statusdict /setpage get exec"
  79. *PageSize ISOB5: "b5"
  80. *PageSize ISOB5.Transverse: "B5"
  81. *PageSize ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  82. *PageSize ISOB5.Extra.Transverse: "781 571 0 statusdict /setpage get exec"
  83. *?PageSize: "
  84.   save
  85.   mark  statusdict /pageparams get exec  exch pop
  86.   15 dict
  87.   dup [612 792] (Letter) put
  88.   dup [684 864] (Letter.Extra) put
  89.   dup [612 1008] (Legal) put
  90.   dup [684 1080] (Legal.Extra) put
  91.   dup [792 1224] (Tabloid) put
  92.   dup [864 1296] (Tabloid.Extra) put
  93.   dup [842 1191] (A3) put
  94.   dup [595 842] (A4) put
  95.   dup [668 914] (A4.Extra) put
  96.   dup [420 595] (A5) put
  97.   dup [492 668] (A5.Extra) put
  98.   dup [729.72 1031.46] (B4) put
  99.   dup [801.72 1103.46] (B4.Extra) put
  100.   dup [499 709] (ISOB5) put
  101.   dup [571 781] (ISOB5.Extra) put
  102.   8 dict
  103.   dup [792 612] (Letter.Transverse) put
  104.   dup [864 684] (Letter.Extra.Transverse) put
  105.   dup [792 1224] (Ledger) put
  106.   dup [842 595] (A4.Transverse) put
  107.   dup [595 420] (A5.Transverse) put
  108.   dup [668 492] (A5.Extra.Transverse) put
  109.   dup [709 499] (ISOB5.Transverse) put
  110.   dup [781 571] (ISOB5.Extra.Transverse) put
  111.   3 -1 roll 1 eq { pop } { exch pop }ifelse
  112.   (Unknown) exch
  113.   { exch aload pop
  114.     4 index eq exch 5 index eq and
  115.     { exch pop exit } { pop } ifelse
  116.   } bind forall = flush cleartomark
  117.   restore
  118. "
  119. *End
  120. *CloseUI: *PageSize
  121. *OpenUI *PageRegion: PickOne
  122. *OrderDependency: 40 AnySetup *PageRegion
  123. *DefaultPageRegion: Letter.Transverse
  124. *PageRegion Letter: "letter"
  125. *PageRegion Letter.Transverse: "Letter"
  126. *PageRegion Letter.Extra: "684 864 1 statusdict /setpage get exec"
  127. *PageRegion Letter.Extra.Transverse: "864 684 0 statusdict /setpage get exec"
  128. *PageRegion Legal: "legal"
  129. *PageRegion Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  130. *PageRegion Tabloid: "11x17"
  131. *PageRegion Tabloid.Extra: "864 1296 1 statusdict /setpage get exec"
  132. *PageRegion Ledger: "ledger"
  133. *PageRegion A3: "a3"
  134. *PageRegion A4: "a4"
  135. *PageRegion A4.Transverse: "A4"
  136. *PageRegion A4.Extra: "668 914 1 statusdict /setpage get exec"
  137. *PageRegion A5: "a5"
  138. *PageRegion A5.Transverse: "A5"   
  139. *PageRegion A5.Extra: "492 668 1 statusdict /setpage get exec"
  140. *PageRegion A5.Extra.Transverse: "668 492 0 statusdict /setpage get exec"
  141. *PageRegion B4: "729.72 1031.46 1 statusdict /setpage get exec"
  142. *PageRegion B4.Extra: "801.72 1103.46 1 statusdict /setpage get exec"
  143. *PageRegion ISOB5: "b5"
  144. *PageRegion ISOB5.Transverse: "B5"
  145. *PageRegion ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  146. *PageRegion ISOB5.Extra.Transverse: "781 571 0 statusdict /setpage get exec"
  147. *CloseUI: *PageRegion
  148. *DefaultImageableArea: Letter.Transverse
  149. *ImageableArea Letter: "0 1 612 792"
  150. *ImageableArea Letter.Transverse: "0 0 611 791"
  151. *ImageableArea Letter.Extra: "0 1 684 864"
  152. *ImageableArea Letter.Extra.Transverse: "0 0 683 863"
  153. *ImageableArea Legal: "0 1 612 1008"
  154. *ImageableArea Legal.Extra: " 0 1 684 1080"
  155. *ImageableArea Tabloid: "0 1 792 1224"
  156. *ImageableArea Tabloid.Extra: "0 1 863 1296"
  157. *ImageableArea Ledger: "0 1 1223 791"
  158. *ImageableArea A3: "0 1 842 1191"
  159. *ImageableArea A4: "0 1 595.3 842"
  160. *ImageableArea A4.Transverse: "0 0 595.3 842"
  161. *ImageableArea A4.Extra: "0 1 668 914"
  162. *ImageableArea A5: "0 1 420 595.3"
  163. *ImageableArea A5.Transverse: "0 0 419 595.3"
  164. *ImageableArea A5.Extra: "0 1 492 668"
  165. *ImageableArea A5.Extra.Transverse: "0 0 491 668"
  166. *ImageableArea B4: "0 1 729.72 1031.46"
  167. *ImageableArea B4.Extra: "0 1 801.72 1103.46"
  168. *ImageableArea ISOB5: "0 1 499 709"
  169. *ImageableArea ISOB5.Transverse: "0 0 498 709"
  170. *ImageableArea ISOB5.Extra: "0 1 571 781"
  171. *ImageableArea ISOB5.Extra.Transverse: "0 0 570 781"
  172. *?ImageableArea: "
  173. save
  174. /cvp {(                ) cvs print ( ) print } bind def
  175. /upperright {10000 mul floor 10000 div} bind def
  176. /lowerleft {10000 mul ceiling 10000 div} bind def
  177. newpath clippath pathbbox
  178. 4 -2 roll exch 2 {lowerleft cvp} repeat
  179. exch 2 {upperright cvp} repeat flush
  180. restore
  181. "
  182. *End
  183. *DefaultPaperDimension: Letter.Transverse
  184. *PaperDimension Letter: "612 792 "
  185. *PaperDimension Letter.Transverse: "612 792 "
  186. *PaperDimension Letter.Extra: "684 864 "
  187. *PaperDimension Letter.Extra.Transverse: "684 864 "
  188. *PaperDimension Legal: "612 1008 "
  189. *PaperDimension Legal.Extra:  "684 1080 "
  190. *PaperDimension Tabloid: "792 1224 "
  191. *PaperDimension Tabloid.Extra: "864 1296 "
  192. *PaperDimension Ledger: "1224 792"
  193. *PaperDimension A3: "842 1191 "
  194. *PaperDimension A4: "595.3 842 "
  195. *PaperDimension A4.Transverse: "595.3 842 "
  196. *PaperDimension A4.Extra: "668 914 "
  197. *PaperDimension A5: "420 595.3 "
  198. *PaperDimension A5.Transverse: "420 595.3 "
  199. *PaperDimension A5.Extra: "492 668 "
  200. *PaperDimension A5.Extra.Transverse: "492 668 "
  201. *PaperDimension B4: "729.72 1031.46"
  202. *PaperDimension B4.Extra: "801.72 1103.46"
  203. *PaperDimension ISOB5: "499 709 "
  204. *PaperDimension ISOB5.Transverse: "499 709 "
  205. *PaperDimension ISOB5.Extra: "571 781 "
  206. *PaperDimension ISOB5.Extra.Transverse: "571 781 "
  207. *CustomPageSize True: "exch pop statusdict/setpageparams get exec"
  208. *ParamCustomPageSize Width: 1 points 1 864
  209. *ParamCustomPageSize Height: 2 points 1 1296
  210. *ParamCustomPageSize WidthOffset/Margins: 3 points 0 863
  211. *ParamCustomPageSize HeightOffset: 4 points 0 0
  212. *ParamCustomPageSize Orientation: 5 points 0 1
  213. *MaxMediaWidth: "864"
  214. *RequiresPageRegion All: True
  215. *OpenUI *InputSlot: PickOne
  216. *OrderDependency: 20 AnySetup *InputSlot
  217. *DefaultInputSlot: Cassette
  218. *InputSlot Cassette: ""   
  219. *CloseUI: *InputSlot
  220. *OpenGroup: Imagesetter
  221. *OpenUI *MirrorPrint/Mirror: Boolean
  222. *OrderDependency: 50 AnySetup *MirrorPrint
  223. *DefaultMirrorPrint: False
  224. *MirrorPrint True: "true statusdict/setmirrorprint get exec"
  225. *MirrorPrint False: "false statusdict/setmirrorprint get exec"
  226. *?MirrorPrint: "statusdict/mirrorprint get exec {(True)}{(False)}ifelse = flush"
  227. *CloseUI: *MirrorPrint
  228. *OpenUI *NegativePrint/Negative: Boolean
  229. *OrderDependency: 50 AnySetup *NegativePrint
  230. *DefaultNegativePrint: False
  231. *NegativePrint True: "true statusdict/negativeprint get exec"
  232. *NegativePrint False: "false statusdict/negativeprint get exec"
  233. *?NegativePrint: "statusdict/getglobrev get exec {(True)}{(False)}ifelse = flush"
  234. *CloseUI: *NegativePrint
  235. *CloseGroup: Imagesetter
  236. *DefaultFont: Courier
  237. *Font Courier: Standard "(001.004)" Standard ROM
  238. *Font Courier-Bold: Standard "(001.004)" Standard ROM
  239. *Font Courier-BoldOblique: Standard "(001.004)" Standard ROM
  240. *Font Courier-Oblique: Standard "(001.004)" Standard ROM
  241. *Font Symbol: Special "(001.003)" Special ROM
  242.