home *** CD-ROM | disk | FTP | other *** search
/ Soft 19 / Soft19.iso / win95-rc / win95_15.cab / ibm20470.spd < prev    next >
PostScript Printer Description  |  1995-07-11  |  12KB  |  277 lines

  1. *PPD-Adobe: "4.1"
  2. *% IBM20470.spd: Simplified form of IBM20470.ppd
  3. *PCFileName: "IBM20470.PPD"
  4. *Product: "(IBM Personal Pageprinter)"
  5. *PSVersion: "(47.0) 14"
  6. *ModelName: "IBM 4216-020"
  7. *NickName: "IBM 4216-020 v47.0"
  8. *ShortNickName: "IBM Personal Pageprinter"
  9. *ColorDevice: False
  10. *FreeVM: "432134"
  11. *LanguageLevel: "1"
  12. *Password: "0"
  13. *ExitServer: "
  14.   count 0 eq  % is the password on the stack?
  15.   { true }
  16.   { dup    % potential password
  17.     statusdict /checkpassword get exec not
  18.   } ifelse
  19.   {  %  if no password or not valid
  20.     (WARNING : Cannot perform the exitserver command.) =
  21.     (Password supplied is not valid.) =
  22.     (Please contact the author of this software.) = flush
  23.     quit
  24.   } if
  25.   serverdict /exitserver get exec
  26. "
  27. *End
  28. *DefaultResolution: 300dpi
  29. *?Resolution: "
  30. save
  31.   initgraphics
  32.   0 0 moveto currentpoint matrix defaultmatrix transform
  33.   0 72 lineto currentpoint matrix defaultmatrix transform
  34.   3 -1 roll sub dup mul
  35.   3 1 roll exch sub dup mul
  36.   add sqrt round cvi
  37.   (          ) cvs print (dpi) = flush
  38. restore
  39. "
  40. *End
  41. *ScreenFreq: "60.0"
  42. *ScreenAngle: "45.0"
  43. *OpenUI *PageSize: PickOne
  44. *OrderDependency: 30 AnySetup *PageSize
  45. *DefaultPageSize: Letter
  46. *PageSize Letter: "letter"
  47. *PageSize Legal: "legal"
  48. *PageSize A4: "a4"
  49. *PageSize A5: "a5"
  50. *PageSize B5: "b5"
  51. *PageSize Statement: "statement"
  52. *PageSize Envelope.612.792/Letter Envelope: "
  53.  statusdict /envelopewidth 612 put statusdict /envelopeheight 792 put envelope"
  54. *End
  55. *PageSize Envelope.612.1008/Legal Envelope: "
  56.  statusdict /envelopewidth 612 put statusdict /envelopeheight 1008 put envelope"
  57. *End
  58. *PageSize Envelope.396.612/Statement Envelope: "
  59.  statusdict /envelopewidth 396 put statusdict /envelopeheight 612 put envelope"
  60. *End
  61. *PageSize Envelope.595.842/A4 Envelope: "
  62.  statusdict /envelopewidth 595 put statusdict /envelopeheight 842 put envelope"
  63. *End
  64. *PageSize Envelope.420.595/A5 Envelope: "
  65.  statusdict /envelopewidth 420 put statusdict /envelopeheight 595 put envelope"
  66. *End
  67. *PageSize Envelope.516.729/B5 Envelope: "
  68.  statusdict /envelopewidth 516 put statusdict /envelopeheight 729 put envelope"
  69. *End
  70. *PageSize Envelope.567.903/Folio Envelope: "
  71.  statusdict /envelopewidth 567 put statusdict /envelopeheight 903 put envelope"
  72. *End
  73. *PageSize Envelope.279.639/3 7/8 Inch x 8 7/8 Inch Envelope: "
  74.  statusdict /envelopewidth 279 put statusdict /envelopeheight 639 put envelope"
  75. *End
  76. *PageSize Comm10/4 1/8 Inch x 9 1/2 Inch Envelope: "
  77.  statusdict /envelopewidth 297 put statusdict /envelopeheight 684 put envelope"
  78. *End
  79. *PageSize Envelope.324.747/4 1/2 Inch x 10 3/8 Inch Envelope: "
  80.  statusdict /envelopewidth 324 put statusdict /envelopeheight 747 put envelope"
  81. *End
  82. *PageSize Envelope.342.792/4 3/4 Inch x 11 Inch Envelope: "
  83.  statusdict /envelopewidth 342 put statusdict /envelopeheight 792 put envelope"
  84. *End
  85. *PageSize Envelope.360.828/5 Inch x 11 1/2 Inch Envelope: "
  86.  statusdict /envelopewidth 360 put statusdict /envelopeheight 828 put envelope"
  87. *End
  88. *PageSize Envelope.468.684/6 1/2 Inch x 9 1/2 Inch Envelope: "
  89.  statusdict /envelopewidth 468 put statusdict /envelopeheight 684 put envelope"
  90. *End
  91. *PageSize Envelope.540.756/7 1/2 Inch x 10 1/2 Inch Envelope: "
  92.  statusdict /envelopewidth 540 put statusdict /envelopeheight 756 put envelope"
  93. *End
  94. *PageSize Envelope.630.810/8 3/4 Inch x 11 1/4 Inch Envelope: "
  95.  statusdict /envelopewidth 630 put statusdict /envelopeheight 810 put envelope"
  96. *End
  97. *?PageSize: "
  98. save
  99. 12 dict
  100.  dup /letter (Letter) put
  101.  dup /legal (Legal) put
  102.  dup /a4 (A4) put
  103.  dup /a5 (A5) put
  104.  dup /b5 (B5) put
  105.  dup /statement (Statement) put
  106.  dup /envelope (Envelope) put
  107.  statusdict /papersize get exec
  108.  3 1 roll  {get} stopped {(Unknown)}if
  109.  exch  not { print (.Transverse) }if
  110.  = flush
  111. restore
  112. "
  113. *End
  114. *CloseUI: *PageSize
  115. *OpenUI *PageRegion: PickOne
  116. *OrderDependency: 40 AnySetup *PageRegion
  117. *DefaultPageRegion: Letter
  118. *PageRegion Letter: "letter"
  119. *PageRegion Legal: "legal"
  120. *PageRegion A4: "a4"
  121. *PageRegion A5: "a5"
  122. *PageRegion B5: "b5"
  123. *PageRegion Statement: "statement"
  124. *PageRegion Envelope.612.792/Letter Envelope: "
  125.  statusdict /envelopewidth 612 put statusdict /envelopeheight 792 put envelope"
  126. *End
  127. *PageRegion Envelope.612.1008/Legal Envelope: "
  128.  statusdict /envelopewidth 612 put statusdict /envelopeheight 1008 put envelope"
  129. *End
  130. *PageRegion Envelope.396.612/Statement Envelope: "
  131.  statusdict /envelopewidth 396 put statusdict /envelopeheight 612 put envelope"
  132. *End
  133. *PageRegion Envelope.595.842/A4 Envelope: "
  134.  statusdict /envelopewidth 595 put statusdict /envelopeheight 842 put envelope"
  135. *End
  136. *PageRegion Envelope.420.595/A5 Envelope: "
  137.  statusdict /envelopewidth 420 put statusdict /envelopeheight 595 put envelope"
  138. *End
  139. *PageRegion Envelope.516.729/B5 Envelope: "
  140.  statusdict /envelopewidth 516 put statusdict /envelopeheight 729 put envelope"
  141. *End
  142. *PageRegion Envelope.567.903/Folio Envelope: "
  143.  statusdict /envelopewidth 567 put statusdict /envelopeheight 903 put envelope"
  144. *End
  145. *PageRegion Envelope.279.639/3 7/8 Inch x 8 7/8 Inch Envelope: "
  146.  statusdict /envelopewidth 279 put statusdict /envelopeheight 639 put envelope"
  147. *End
  148. *PageRegion Comm10/4 1/8 Inch x 9 1/2 Inch Envelope: "
  149.  statusdict /envelopewidth 297 put statusdict /envelopeheight 684 put envelope"
  150. *End
  151. *PageRegion Envelope.324.747/4 1/2 Inch x 10 3/8 Inch Envelope: "
  152.  statusdict /envelopewidth 324 put statusdict /envelopeheight 747 put envelope"
  153. *End
  154. *PageRegion Envelope.342.792/4 3/4 Inch x 11 Inch Envelope: "
  155.  statusdict /envelopewidth 342 put statusdict /envelopeheight 792 put envelope"
  156. *End
  157. *PageRegion Envelope.360.828/5 Inch x 11 1/2 Inch Envelope: "
  158.  statusdict /envelopewidth 360 put statusdict /envelopeheight 828 put envelope"
  159. *End
  160. *PageRegion Envelope.468.684/6 1/2 Inch x 9 1/2 Inch Envelope: "
  161.  statusdict /envelopewidth 468 put statusdict /envelopeheight 684 put envelope"
  162. *End
  163. *PageRegion Envelope.540.756/7 1/2 Inch x 10 1/2 Inch Envelope: "
  164.  statusdict /envelopewidth 540 put statusdict /envelopeheight 756 put envelope"
  165. *End
  166. *PageRegion Envelope.630.810/8 3/4 Inch x 11 1/4 Inch Envelope: "
  167.  statusdict /envelopewidth 630 put statusdict /envelopeheight 810 put envelope"
  168. *End
  169. *CloseUI: *PageRegion
  170. *DefaultImageableArea: Letter
  171. *ImageableArea Letter: "17 19 595 774 "
  172. *ImageableArea Legal: "17 19 595 990 "
  173. *ImageableArea A4: "18 19 577 823 "
  174. *ImageableArea A5: "18 19 401 577 "
  175. *ImageableArea B5: "18 19 481 690 "
  176. *ImageableArea Statement: "18 19 378 594 "
  177. *ImageableArea Envelope.612.792/Letter Envelope: "15 8 597 784 "
  178. *ImageableArea Envelope.612.1008/Legal Envelope: "15 15 597 993 "
  179. *ImageableArea Envelope.396.612/Statement Envelope: "14 8 382 604 "
  180. *ImageableArea Envelope.595.842/A4 Envelope: "14 8 581 834 "
  181. *ImageableArea Envelope.420.595/A5 Envelope: "15 8 405 588 "
  182. *ImageableArea Envelope.516.729/B5 Envelope: "13 8 503 721 "
  183. *ImageableArea Envelope.567.903/Folio Envelope: "14 8 581 928 "
  184. *ImageableArea Envelope.279.639/3 7/8 Inch x 8 7/8 Inch Envelope: "13 15 266 624 "
  185. *ImageableArea Comm10/4 1/8 Inch x 9 1/2 Inch Envelope: "15 15 282 669 "
  186. *ImageableArea Envelope.324.747/4 1/2 Inch x 10 3/8 Inch Envelope: "17 15 307 732 "
  187. *ImageableArea Envelope.342.792/4 3/4 Inch x 11 Inch Envelope: "14 15 328 777 "
  188. *ImageableArea Envelope.360.828/5 Inch x 11 1/2 Inch Envelope: "15 15 344 813 "
  189. *ImageableArea Envelope.468.684/6 1/2 Inch x 9 1/2 Inch Envelope: "16 15 452 669 "
  190. *ImageableArea Envelope.540.756/7 1/2 Inch x 10 1/2 Inch Envelope: "13 15 527 741 "
  191. *ImageableArea Envelope.630.810/8 3/4 Inch x 11 1/4 Inch Envelope: "16 15 614 795 "
  192. *?ImageableArea: "
  193. save
  194.   /cvp {(                ) cvs print ( ) print } bind def
  195.   /upperright {10000 mul floor 10000 div} bind def
  196.   /lowerleft {10000 mul ceiling 10000 div} bind def
  197.   newpath clippath pathbbox
  198.   4 -2 roll exch 2 {lowerleft cvp} repeat
  199.   exch 2 {upperright cvp} repeat flush
  200.  restore
  201. "
  202. *End
  203. *DefaultPaperDimension: Letter
  204. *PaperDimension Letter: "612 792"
  205. *PaperDimension Legal: "612 1008"
  206. *PaperDimension A4: "595 842"
  207. *PaperDimension A5: "420 595"
  208. *PaperDimension B5: "516 729"
  209. *PaperDimension Statement: "396 612"
  210. *PaperDimension Envelope.612.792/Letter Envelope: "612 792"
  211. *PaperDimension Envelope.612.1008/Legal Envelope: "612 1008"
  212. *PaperDimension Envelope.396.612/Statement Envelope: "396 612"
  213. *PaperDimension Envelope.595.842/A4 Envelope: "595 842"
  214. *PaperDimension Envelope.420.595/A5 Envelope: "420 595"
  215. *PaperDimension Envelope.516.729/B5 Envelope: "516 729"
  216. *PaperDimension Envelope.567.903/Folio Envelope: "567 903"
  217. *PaperDimension Envelope.279.639/3 7/8 Inch x 8 7/8 Inch Envelope: "279 639"
  218. *PaperDimension Comm10/4 1/8 Inch x 9 1/2 Inch Envelope: "297 684"
  219. *PaperDimension Envelope.324.747/4 1/2 Inch x 10 3/8 Inch Envelope: "324 747"
  220. *PaperDimension Envelope.342.792/4 3/4 Inch x 11 Inch Envelope: "342 792"
  221. *PaperDimension Envelope.360.828/5 Inch x 11 1/2 Inch Envelope: "360 828"
  222. *PaperDimension Envelope.468.684/6 1/2 Inch x 9 1/2 Inch Envelope: "468 684"
  223. *PaperDimension Envelope.540.756/7 1/2 Inch x 10 1/2 Inch Envelope: "540 756"
  224. *PaperDimension Envelope.630.810/8 3/4 Inch x 11 1/4 Inch Envelope: "630 810"
  225. *RequiresPageRegion All: True
  226. *OpenUI *InputSlot: PickOne
  227. *OrderDependency: 20 AnySetup *InputSlot
  228. *DefaultInputSlot: Cassette
  229. *InputSlot Cassette: ""
  230. *CloseUI: *InputSlot
  231. *DefaultFont: Courier
  232. *Font AvantGarde-Book: Standard "(001.002)" Standard ROM
  233. *Font AvantGarde-BookOblique: Standard "(001.002)" Standard ROM
  234. *Font AvantGarde-Demi: Standard "(001.002)" Standard ROM
  235. *Font AvantGarde-DemiOblique: Standard "(001.002)" Standard ROM
  236. *Font Bookman-Demi: Standard "(001.001)" Standard ROM
  237. *Font Bookman-DemiItalic: Standard "(001.001)" Standard ROM
  238. *Font Bookman-Light: Standard "(001.001)" Standard ROM
  239. *Font Bookman-LightItalic: Standard "(001.001)" Standard ROM
  240. *Font Courier: Standard "(001.004)" Standard ROM
  241. *Font Courier-Bold: Standard "(001.004)" Standard ROM
  242. *Font Courier-BoldOblique: Standard "(001.004)" Standard ROM
  243. *Font Courier-Oblique: Standard "(001.004)" Standard ROM
  244. *Font Emulatorfont: Special "(001.000)" Special ROM
  245. *Font Emulatorfont-Bold: Special "(001.000)" Special ROM
  246. *Font Garamond-Bold: Standard "(001.001)" Standard ROM
  247. *Font Garamond-BoldItalic: Standard "(001.001)" Standard ROM
  248. *Font Garamond-Light: Standard "(001.001)" Standard ROM
  249. *Font Garamond-LightItalic: Standard "(001.001)" Standard ROM
  250. *Font Helvetica: Standard "(001.002)" Standard ROM
  251. *Font Helvetica-Black: Standard "(001.001)" Standard ROM
  252. *Font Helvetica-BlackOblique: Standard "(001.001)" Standard ROM
  253. *Font Helvetica-Bold: Standard "(001.002)" Standard ROM
  254. *Font Helvetica-BoldOblique: Standard "(001.002)" Standard ROM
  255. *Font Helvetica-Light: Standard "(001.001)" Standard ROM
  256. *Font Helvetica-LightOblique: Standard "(001.001)" Standard ROM
  257. *Font Helvetica-Oblique: Standard "(001.002)" Standard ROM
  258. *Font Korinna-Bold: Standard "(001.001)" Standard ROM
  259. *Font Korinna-KursivBold: Standard "(001.001)" Standard ROM
  260. *Font Korinna-KursivRegular: Standard "(001.001)" Standard ROM
  261. *Font Korinna-Regular: Standard "(001.001)" Standard ROM
  262. *Font NewCenturySchlbk-Bold: Standard "(001.003)" Standard ROM
  263. *Font NewCenturySchlbk-BoldItalic: Standard "(001.002)" Standard ROM
  264. *Font NewCenturySchlbk-Italic: Standard "(001.002)" Standard ROM
  265. *Font NewCenturySchlbk-Roman: Standard "(001.003)" Standard ROM
  266. *Font Palatino-Bold: Standard "(001.001)" Standard ROM
  267. *Font Palatino-BoldItalic: Standard "(001.001)" Standard ROM
  268. *Font Palatino-Italic: Standard "(001.001)" Standard ROM
  269. *Font Palatino-Roman: Standard "(001.001)" Standard ROM
  270. *Font Symbol: Special "(001.003)" Special ROM
  271. *Font Times-Bold: Standard "(001.002)" Standard ROM
  272. *Font Times-BoldItalic: Standard "(001.004)" Standard ROM
  273. *Font Times-Italic: Standard "(001.002)" Standard ROM
  274. *Font Times-Roman: Standard "(001.002)" Standard ROM
  275. *Font ZapfChancery-MediumItalic: Standard "(001.002)" Standard ROM
  276. *Font ZapfDingbats: Special "(001.001)" Special ROM
  277.