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