home *** CD-ROM | disk | FTP | other *** search
/ What the Doctor Required - The Freshest December / December.iso / windows / mem1614 / driver20.cab / v5334522.spd < prev    next >
Encoding:
PostScript Printer Description  |  1997-10-20  |  7.7 KB  |  269 lines
  1. *PPD-Adobe: "4.1"
  2. *% V5334522.spd: Simplified form of V5334522.ppd
  3. *PCFileName: "V5334522.PPD"
  4. *Product: "(Varityper)"
  5. *PSVersion: "(49.3) 4.2"
  6. *PSVersion: "(52.2) 4.2"
  7. *ModelName: "Varityper Series 4000-5330"
  8. *ShortNickName: "Varityper Series 4000-5330"
  9. *NickName: "Varityper Series 4000-5330 v49.3 or 52.2"
  10. *FreeVM: "2402238"
  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. *SetResolution 3048dpi: "
  31.   count 0 eq {  % is the password on the stack?
  32.     true
  33.   }{
  34.     dup    % potential password
  35.     statusdict /checkpassword get exec not
  36.   } ifelse
  37.   {  %  if no password or not valid
  38.     (WARNING : Cannot perform the exitserver command.) =
  39.     (Password supplied is not valid.) =
  40.     (Please contact the author of this software.) = flush
  41.     quit
  42.   } if
  43.   serverdict /exitserver get exec
  44. 3048 statusdict /setresolution get exec
  45. "
  46. *End
  47. *SetResolution 1524dpi: "
  48.   count 0 eq {  % is the password on the stack?
  49.     true
  50.   }{
  51.     dup    % potential password
  52.     statusdict /checkpassword get exec not
  53.   } ifelse
  54.   {  %  if no password or not valid
  55.     (WARNING : Cannot set the resolution.) =
  56.     (Password supplied is not valid.) =
  57.     (Please contact the author of this software.) = flush
  58.     quit
  59.   } if
  60.   serverdict /exitserver get exec
  61. 1524 statusdict /setresolution get exec
  62. "
  63. *End
  64. *SetResolution 2540dpi: "
  65.   count 0 eq {  % is the password on the stack?
  66.     true
  67.   }{
  68.     dup    % potential password
  69.     statusdict /checkpassword get exec not
  70.   } ifelse
  71.   {  %  if no password or not valid
  72.     (WARNING : Cannot perform the exitserver command.) =
  73.     (Password supplied is not valid.) =
  74.     (Please contact the author of this software.) = flush
  75.     quit
  76.   } if
  77.   serverdict /exitserver get exec
  78. 2540 statusdict /setresolution get exec
  79. "
  80. *End
  81. *SetResolution 1270dpi: "
  82.   count 0 eq {  % is the password on the stack?
  83.     true
  84.   }{
  85.     dup    % potential password
  86.     statusdict /checkpassword get exec not
  87.   } ifelse
  88.   {  %  if no password or not valid
  89.     (WARNING : Cannot set the resolution.) =
  90.     (Password supplied is not valid.) =
  91.     (Please contact the author of this software.) = flush
  92.     quit
  93.   } if
  94.   serverdict /exitserver get exec
  95. 1270 statusdict /setresolution get exec
  96. "
  97. *End
  98. *SetResolution 2032dpi: "
  99.   count 0 eq {  % is the password on the stack?
  100.     true
  101.   }{
  102.     dup    % potential password
  103.     statusdict /checkpassword get exec not
  104.   } ifelse
  105.   {  %  if no password or not valid
  106.     (WARNING : Cannot perform the exitserver command.) =
  107.     (Password supplied is not valid.) =
  108.     (Please contact the author of this software.) = flush
  109.     quit
  110.   } if
  111.   serverdict /exitserver get exec
  112. 2032 statusdict /setresolution get exec
  113. "
  114. *End
  115. *SetResolution 1016dpi: "
  116.   count 0 eq {  % is the password on the stack?
  117.     true
  118.   }{
  119.     dup    % potential password
  120.     statusdict /checkpassword get exec not
  121.   } ifelse
  122.   {  %  if no password or not valid
  123.     (WARNING : Cannot set the resolution.) =
  124.     (Password supplied is not valid.) =
  125.     (Please contact the author of this software.) = flush
  126.     quit
  127.   } if
  128.   serverdict /exitserver get exec
  129. 1016 statusdict /setresolution get exec
  130. "
  131. *End
  132. *SetResolution 600dpi: "
  133.   count 0 eq {  % is the password on the stack?
  134.     true
  135.   }{
  136.     dup    % potential password
  137.     statusdict /checkpassword get exec not
  138.   } ifelse
  139.   {  %  if no password or not valid
  140.     (WARNING : Cannot set the resolution.) =
  141.     (Password supplied is not valid.) =
  142.     (Please contact the author of this software.) = flush
  143.     quit
  144.   } if
  145.   serverdict /exitserver get exec
  146. 600 statusdict /setresolution get exec
  147. "
  148. *End
  149. *?Resolution: "
  150. save
  151.   initgraphics
  152.   0 0 moveto currentpoint matrix defaultmatrix transform
  153.   0 72 lineto currentpoint matrix defaultmatrix transform
  154.   3 -1 roll sub dup mul
  155.   3 1 roll exch sub dup mul
  156.   add sqrt round cvi
  157.   (          ) cvs print (dpi) = flush
  158. restore
  159. "
  160. *End
  161. *ScreenAngle: "45.0"
  162. *OpenUI *PageSize: PickOne
  163. *OrderDependency: 30 AnySetup *PageSize
  164. *DefaultPageSize: Letter
  165. *PageSize Letter: "letter"
  166. *PageSize Legal: "legal"
  167. *PageSize Ledger: "ledger"
  168. *PageSize Tabloid: "11x17"
  169. *PageSize A3: "a3"
  170. *PageSize A4: "a4"
  171. *PageSize A5: "a5"
  172. *PageSize ISOB5: "b5"
  173. *PageSize Letter.Transverse: "Letter"
  174. *PageSize A4.Transverse: "A4"
  175. *PageSize A5.Transverse: "A5"
  176. *PageSize ISOB5.Transverse: "B5"
  177. *?PageSize: "
  178.   save
  179.   mark  statusdict /pageparams get exec  exch pop
  180.   5 dict
  181.     dup [595 420] (A5.Transverse) put
  182.     dup [709 499] (ISOB5.Transverse) put
  183.     dup [842 595] (A4.Transverse) put
  184.     dup [792 612] (Letter.Transverse) put
  185.     dup [1224 792] (Ledger) put
  186.   7 dict
  187.     dup [595 420] (A5) put
  188.     dup [709 499] (ISOB5) put
  189.     dup [792 612] (Letter) put
  190.     dup [842 595] (A4) put
  191.     dup [1008 612] (Legal) put
  192.     dup [1191 842] (A3) put
  193.     dup [1224 792] (Tabloid) put
  194.   3 -1 roll 0 eq { pop } { exch pop }ifelse
  195.   (Unknown) exch
  196.   { exch aload pop
  197.     4 index eq exch 5 index eq and
  198.     { exch pop exit } { pop } ifelse
  199.   } bind forall = flush cleartomark
  200.   restore
  201. "
  202. *End
  203. *CloseUI: *PageSize
  204. *OpenUI *PageRegion: PickOne
  205. *OrderDependency: 40 AnySetup *PageRegion
  206. *DefaultPageRegion: Letter
  207. *PageRegion Letter: "letter"
  208. *PageRegion Legal: "legal"
  209. *PageRegion Ledger: "ledger"
  210. *PageRegion Tabloid: "11x17"
  211. *PageRegion A3: "a3"
  212. *PageRegion A4: "a4"
  213. *PageRegion A5: "a5"
  214. *PageRegion ISOB5: "b5"
  215. *PageRegion Letter.Transverse: "Letter"
  216. *PageRegion A4.Transverse: "A4"
  217. *PageRegion A5.Transverse: "A5"
  218. *PageRegion ISOB5.Transverse: "B5"
  219. *CloseUI: *PageRegion
  220. *DefaultImageableArea: Letter
  221. *ImageableArea Letter: "0 1 612 792 "
  222. *ImageableArea Legal: "0 1 612 1008 "
  223. *ImageableArea Ledger: "0 0 1223 792 "
  224. *ImageableArea Tabloid: "0 1 792 1224 "
  225. *ImageableArea A3: "0 1 842 1191 "
  226. *ImageableArea A4: "0 1 595 842 "
  227. *ImageableArea A5: "0 1 420 595 "
  228. *ImageableArea ISOB5: "0 1 499 709 "
  229. *ImageableArea Letter.Transverse: "0 0 611 792 "
  230. *ImageableArea A4.Transverse: "0 0 594 842 "
  231. *ImageableArea A5.Transverse: "0 0 419 595 "
  232. *ImageableArea ISOB5.Transverse: "0 0 498 709 "
  233. *?ImageableArea: "
  234. save
  235.   /cvp {(                ) cvs print ( ) print } bind def
  236.   /upperright {10000 mul floor 10000 div} bind def
  237.   /lowerleft {10000 mul ceiling 10000 div} bind def
  238.   newpath clippath pathbbox
  239.   4 -2 roll exch 2 {lowerleft cvp} repeat
  240.   exch 2 {upperright cvp} repeat flush
  241.  restore
  242. "
  243. *End
  244. *DefaultPaperDimension: Letter
  245. *PaperDimension Letter: "612 792"
  246. *PaperDimension Legal: "612 1008"
  247. *PaperDimension Ledger: "1224 792"
  248. *PaperDimension Tabloid: "792 1224"
  249. *PaperDimension A3: "842 1191"
  250. *PaperDimension A4: "595 842"
  251. *PaperDimension A5: "420 595"
  252. *PaperDimension ISOB5: "499 709"
  253. *PaperDimension Letter.Transverse: "612 792"
  254. *PaperDimension A4.Transverse: "595 842"
  255. *PaperDimension A5.Transverse: "420 595"
  256. *PaperDimension ISOB5.Transverse: "499 709"
  257. *RequiresPageRegion All: True
  258. *OpenUI *InputSlot: PickOne
  259. *OrderDependency: 20 AnySetup *InputSlot
  260. *DefaultInputSlot: Cassette
  261. *InputSlot Cassette: ""
  262. *CloseUI: *InputSlot
  263. *DefaultFont: Courier
  264. *Font Courier: Standard "(001.004)" Standard ROM
  265. *Font Courier-Bold: Standard "(001.004)" Standard ROM
  266. *Font Courier-BoldOblique: Standard "(001.004)" Standard ROM
  267. *Font Courier-Oblique: Standard "(001.004)" Standard ROM
  268. *Font Symbol: Special "(001.003)" Special ROM
  269.