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