home *** CD-ROM | disk | FTP | other *** search
/ What the Doctor Required - The Freshest December / December.iso / windows / mem1614 / driver20.cab / lh930__1.spd < prev    next >
Encoding:
PostScript Printer Description  |  1997-10-20  |  12.1 KB  |  318 lines

  1. *PPD-Adobe: "4.1"
  2. *% LH930__1.spd: Simplified form of LH930__1.ppd
  3. *PCFileName: "LH930__1.PPD"
  4. *Product: "(Linotype)"
  5. *PSVersion: "(52.3) 906"
  6. *ModelName: "Linotronic 930"
  7. *NickName: "Linotronic 930 v52.3"
  8. *ShortNickName: "Linotronic 930 v52.3"
  9. *FreeVM: "1068498"
  10. *LanguageLevel: "1"
  11. *ColorDevice: False
  12. *Password: "0"
  13. *ExitServer: "
  14.   count 0 eq {  % is the password on the stack?
  15.     true
  16.   }{
  17.     dup    % potential password
  18.     statusdict /checkpassword get exec not
  19.   } ifelse
  20.   {  %  if no password or not valid
  21.     (WARNING : Cannot perform the exitserver command.) =
  22.     (Password supplied is not valid.) =
  23.     (Please contact the author of this software.) = flush
  24.     quit
  25.   } if
  26.   serverdict /exitserver get exec
  27. "
  28. *End
  29. *DefaultResolution: 2438dpi
  30. *SetResolution 1219dpi: "
  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.   statusdict /changeresolution known {
  45.      1219 statusdict /changeresolution get exec
  46.   } if"
  47. *End
  48. *SetResolution 2438dpi: "
  49.   count 0 eq {  % is the password on the stack?
  50.     true
  51.   }{
  52.     dup    % potential password
  53.     statusdict /checkpassword get exec not
  54.   } ifelse
  55.   {  %  if no password or not valid
  56.     (WARNING : Cannot perform the exitserver command.) =
  57.     (Password supplied is not valid.) =
  58.     (Please contact the author of this software.) = flush
  59.     quit
  60.   } if
  61.   serverdict /exitserver get exec
  62.   statusdict /changeresolution known {
  63.      2438 statusdict /changeresolution get exec
  64.   } if"
  65. *End
  66. *SetResolution 3251dpi: "
  67.   count 0 eq {  % is the password on the stack?
  68.     true
  69.   }{
  70.     dup    % potential password
  71.     statusdict /checkpassword get exec not
  72.   } ifelse
  73.   {  %  if no password or not valid
  74.     (WARNING : Cannot perform the exitserver command.) =
  75.     (Password supplied is not valid.) =
  76.     (Please contact the author of this software.) = flush
  77.     quit
  78.   } if
  79.   serverdict /exitserver get exec
  80.   statusdict /changeresolution known {
  81.      3251 statusdict /changeresolution get exec
  82.   } if"
  83. *End
  84. *?Resolution: "
  85. save
  86.   initgraphics
  87.   0 0 moveto currentpoint matrix defaultmatrix transform
  88.   0 72 lineto currentpoint matrix defaultmatrix transform
  89.   3 -1 roll sub dup mul
  90.   3 1 roll exch sub dup mul
  91.   add sqrt round cvi
  92.   (          ) cvs print (dpi) = flush
  93. restore
  94. "
  95. *End
  96. *ScreenFreq: "120"
  97. *ScreenAngle: "45"
  98. *OpenUI *PageSize: PickOne
  99. *OrderDependency: 30 AnySetup *PageSize
  100. *DefaultPageSize: Letter
  101. *PageSize Letter: "612 792 1 statusdict /setpage get exec"
  102. *PageSize Letter.Extra: "684 864 1 statusdict /setpage get exec"
  103. *PageSize Legal: "612 1008 1 statusdict /setpage get exec"
  104. *PageSize Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  105. *PageSize Tabloid: "792 1224 1 statusdict /setpage get exec"
  106. *PageSize Tabloid.Extra: "864 1296 1 statusdict /setpage get exec"
  107. *PageSize A2: "1191 1684 1 statusdict /setpage get exec"
  108. *PageSize A3: "842 1191 1 statusdict /setpage get exec"
  109. *PageSize A3.Extra: "914 1262 1 statusdict /setpage get exec"
  110. *PageSize A4: "595 842 1 statusdict /setpage get exec"
  111. *PageSize A4.Extra: "667 914 1 statusdict /setpage get exec"
  112. *PageSize A5: "420 595 1 statusdict /setpage get exec"
  113. *PageSize A5.Extra: "492 667 1 statusdict /setpage get exec"
  114. *PageSize ISOB5: "499 709 1 statusdict /setpage get exec"
  115. *PageSize ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  116. *PageSize Letter.Transverse: "792 612 0 statusdict /setpage get exec"
  117. *PageSize A4.Transverse: "842 595 0 statusdict /setpage get exec"
  118. *PageSize A5.Transverse: "595 420 0 statusdict /setpage get exec"
  119. *PageSize ISOB5.Transverse: "709 499 0 statusdict /setpage get exec"
  120. *PageSize A3.Transverse: "1191 842 0 statusdict /setpage get exec"
  121. *PageSize A3.Extra.Transverse: "1262 914 0 statusdict /setpage get exec"
  122. *PageSize MaxMeasure: "2834 2125 0 statusdict /setpage get exec"
  123. *?PageSize: "
  124. save
  125.     mark statusdict /pageparams get exec exch pop
  126.     15 dict
  127.     dup [420 595] (A5) put
  128.     dup [492 667] (A5.Extra) put
  129.     dup [499 709] (ISOB5) put
  130.     dup [571 781] (ISOB5.Extra) put
  131.     dup [612 792] (Letter) put
  132.     dup [684 864] (Letter.Extra) put
  133.     dup [595 842] (A4) put
  134.     dup [667 914] (A4.Extra) put
  135.     dup [612 1008] (Legal) put
  136.     dup [684 1080] (Legal.Extra) put
  137.     dup [1191 1684] (A2) put
  138.     dup [842 1191] (A3) put
  139.     dup [914 1262] (A3.Extra) put
  140.     dup [792 1224] (Tabloid) put
  141.   dup [864 1296] (Tabloid.Extra) put
  142.     7 dict
  143.     dup [1191 842] (A3.Transverse) put
  144.     dup [1262 914] (A3.Extra.Transverse) put
  145.     dup [595 420] (A5.Transverse) put
  146.     dup [709 499] (ISOB5.Transverse) put
  147.     dup [842 595] (A4.Transverse) put
  148.     dup [792 612] (Letter.Transverse) put
  149.   dup [2834 2125] (MaxMeasure) put
  150.     3 -1 roll 1 eq { pop } { exch pop } ifelse
  151.     (Unknown) exch
  152.     { exch aload pop
  153.         4 index eq exch 5 index eq and
  154.         { exch pop exit } { pop } ifelse
  155.     } bind forall = flush cleartomark
  156. restore
  157. "
  158. *End
  159. *CloseUI: *PageSize
  160. *OpenUI *PageRegion: PickOne
  161. *OrderDependency: 40 AnySetup *PageRegion
  162. *DefaultPageRegion: Letter
  163. *PageRegion Letter: "612 792 1 statusdict /setpage get exec"
  164. *PageRegion Letter.Extra: "684 864 1 statusdict /setpage get exec"
  165. *PageRegion Legal: "612 1008 1 statusdict /setpage get exec"
  166. *PageRegion Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  167. *PageRegion Tabloid: "792 1224 1 statusdict /setpage get exec"
  168. *PageRegion Tabloid.Extra: "864 1296 1 statusdict /setpage get exec"
  169. *PageRegion A2: "1191 1684 1 statusdict /setpage get exec"
  170. *PageRegion A3: "842 1191 1 statusdict /setpage get exec"
  171. *PageRegion A3.Extra: "914 1262 1 statusdict /setpage get exec"
  172. *PageRegion A4: "595 842 1 statusdict /setpage get exec"
  173. *PageRegion A4.Extra: "667 914 1 statusdict /setpage get exec"
  174. *PageRegion A5: "420 595 1 statusdict /setpage get exec"
  175. *PageRegion A5.Extra: "492 667 1 statusdict /setpage get exec"
  176. *PageRegion ISOB5: "499 709 1 statusdict /setpage get exec"
  177. *PageRegion ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  178. *PageRegion Letter.Transverse: "792 612 0 statusdict /setpage get exec"
  179. *PageRegion A4.Transverse: "842 595 0 statusdict /setpage get exec"
  180. *PageRegion A5.Transverse: "595 420 0 statusdict /setpage get exec"
  181. *PageRegion ISOB5.Transverse: "709 499 0 statusdict /setpage get exec"
  182. *PageRegion A3.Transverse: "1191 842 0 statusdict /setpage get exec"
  183. *PageRegion A3.Extra.Transverse: "1262 914 0 statusdict /setpage get exec"
  184. *PageRegion MaxMeasure: "2834 2125 0 statusdict /setpage get exec"
  185. *CloseUI: *PageRegion
  186. *DefaultImageableArea: Letter
  187. *ImageableArea Letter: "0 0 612 792"
  188. *ImageableArea Letter.Extra: "0 0 684 864"
  189. *ImageableArea Legal: "0 0 612 1008"
  190. *ImageableArea Legal.Extra: "0 0 684 1080"
  191. *ImageableArea Tabloid: "0 0 794 1224"
  192. *ImageableArea Tabloid.Extra: "0 0 864 1296"
  193. *ImageableArea A2: "0 0 1191 1684"
  194. *ImageableArea A3: "0 0 842 1190"
  195. *ImageableArea A3.Extra: "0 0 914 1262"
  196. *ImageableArea A4: "0 0 595 842"
  197. *ImageableArea A4.Extra: "0 0 667 914"
  198. *ImageableArea A5: "0 0 420 595"
  199. *ImageableArea A5.Extra: "0 0 492 667"
  200. *ImageableArea ISOB5: "0 0 499 709"
  201. *ImageableArea ISOB5.Extra: "0 0 571 781"
  202. *ImageableArea Letter.Transverse: "0 0 612 792"
  203. *ImageableArea A4.Transverse: "0 0 595 842"
  204. *ImageableArea A5.Transverse: "0 0 420 595"
  205. *ImageableArea ISOB5.Transverse: "0 0 499 709"
  206. *ImageableArea A3.Transverse: "0 0 842 1190"
  207. *ImageableArea A3.Extra.Transverse: "0 0 914 1262"
  208. *ImageableArea MaxMeasure: "0 0 2125 2834"
  209. *?ImageableArea: "
  210. save
  211.   /cvp {(                ) cvs print ( ) print } bind def
  212.   /upperright {10000 mul floor 10000 div} bind def
  213.   /lowerleft {10000 mul ceiling 10000 div} bind def
  214.   newpath clippath pathbbox
  215.   4 -2 roll exch 2 {lowerleft cvp} repeat
  216.   exch 2 {upperright cvp} repeat flush
  217.  restore
  218. "
  219. *End
  220. *DefaultPaperDimension: Letter
  221. *PaperDimension Letter: "612 792"
  222. *PaperDimension Letter.Extra: "684 864"
  223. *PaperDimension Legal: "612 1008"
  224. *PaperDimension Legal.Extra: "684 1080"
  225. *PaperDimension Tabloid: "792 1224"
  226. *PaperDimension Tabloid.Extra: "864 1296"
  227. *PaperDimension A2: "1191 1684"
  228. *PaperDimension A3: "842 1191"
  229. *PaperDimension A3.Extra: "914 1262"
  230. *PaperDimension A4: "595 842"
  231. *PaperDimension A4.Extra: "667 914"
  232. *PaperDimension A5: "420 595"
  233. *PaperDimension A5.Extra: "492 667"
  234. *PaperDimension ISOB5: "499 709"
  235. *PaperDimension ISOB5.Extra: "571 781"
  236. *PaperDimension Letter.Transverse: "612 792"
  237. *PaperDimension A4.Transverse: "595 842"
  238. *PaperDimension A5.Transverse: "420 595"
  239. *PaperDimension ISOB5.Transverse: "499 709"
  240. *PaperDimension A3.Transverse: "842 1191"
  241. *PaperDimension A3.Extra.Transverse: "914 1262"
  242. *PaperDimension MaxMeasure: "2125 2834"
  243. *CustomPageSize True: "1 exch sub exch pop statusdict /setpageparams get exec"
  244. *ParamCustomPageSize Width: 2 points 1 2125
  245. *ParamCustomPageSize Height: 1 points 1 2834
  246. *ParamCustomPageSize WidthOffset/Margins: 3 points 0 2124
  247. *ParamCustomPageSize HeightOffset: 4 points 0 0
  248. *ParamCustomPageSize Orientation: 5 int 0 1
  249. *MaxMediaWidth: "2125"
  250. *OpenGroup: Imagesetter
  251. *OpenUI *MirrorPrint/Mirror: Boolean
  252. *OrderDependency: 50 AnySetup *MirrorPrint
  253. *DefaultMirrorPrint: False
  254. *MirrorPrint True: "statusdict /mirrorprint true put"
  255. *MirrorPrint False: "statusdict /mirrorprint false put"
  256. *?MirrorPrint: "
  257. save
  258.   statusdict /mirrorprint get {(True)}{(False)}ifelse = flush
  259. restore
  260. "
  261. *End
  262. *CloseUI: *MirrorPrint
  263. *OpenUI *NegativePrint/Negative: Boolean
  264. *OrderDependency: 50 AnySetup *NegativePrint
  265. *DefaultNegativePrint: False
  266. *NegativePrint True: "statusdict /negativeprint true put"
  267. *NegativePrint False: "statusdict /negativeprint false put"
  268. *?NegativePrint: "
  269. save
  270.   statusdict /negativeprint get {(True)}{(False)}ifelse = flush
  271. restore
  272. "
  273. *End
  274. *CloseUI: *NegativePrint
  275. *CloseGroup: Imagesetter
  276. *RequiresPageRegion All: True
  277. *OpenUI *InputSlot: PickOne
  278. *OrderDependency: 20 AnySetup *InputSlot
  279. *DefaultInputSlot: Cassette
  280. *InputSlot Cassette: ""
  281. *CloseUI: *InputSlot
  282. *DefaultFont: Courier
  283. *Font AvantGarde-Book: Standard "(001.001)" Standard Disk
  284. *Font AvantGarde-BookOblique: Standard "(001.001)" Standard Disk
  285. *Font AvantGarde-Demi: Standard "(001.001)" Standard Disk
  286. *Font AvantGarde-DemiOblique: Standard "(001.001)" Standard Disk
  287. *Font Bookman-Demi: Standard "(001.001)" Standard Disk
  288. *Font Bookman-DemiItalic: Standard "(001.001)" Standard Disk
  289. *Font Bookman-Light: Standard "(001.001)" Standard Disk
  290. *Font Bookman-LightItalic: Standard "(001.001)" Standard Disk
  291. *Font Courier: Standard "(002.002)" Standard ROM
  292. *Font Courier-Bold: Standard "(002.002)" Standard ROM
  293. *Font Courier-BoldOblique: Standard "(002.002)" Standard ROM
  294. *Font Courier-Oblique: Standard "(002.002)" Standard ROM
  295. *Font Helvetica: Standard "(001.006)" Standard ROM
  296. *Font Helvetica-Bold: Standard "(001.007)" Standard ROM
  297. *Font Helvetica-BoldOblique: Standard "(001.007)" Standard ROM
  298. *Font Helvetica-Narrow: Standard "(001.006)" Standard ROM
  299. *Font Helvetica-Narrow-Bold: Standard "(001.007)" Standard ROM
  300. *Font Helvetica-Narrow-BoldOblique: Standard "(001.007)" Standard ROM
  301. *Font Helvetica-Narrow-Oblique: Standard "(001.006)" Standard ROM
  302. *Font Helvetica-Oblique: Standard "(001.006)" Standard ROM
  303. *Font NewCenturySchlbk-Bold: Standard "(001.002)" Standard Disk
  304. *Font NewCenturySchlbk-BoldItalic: Standard "(001.001)" Standard Disk
  305. *Font NewCenturySchlbk-Italic: Standard "(001.001)" Standard Disk
  306. *Font NewCenturySchlbk-Roman: Standard "(001.002)" Standard Disk
  307. *Font Palatino-Bold: Standard "(001.000)" Standard Disk
  308. *Font Palatino-BoldItalic: Standard "(001.000)" Standard Disk
  309. *Font Palatino-Italic: Standard "(001.000)" Standard Disk
  310. *Font Palatino-Roman: Standard "(001.000)" Standard Disk
  311. *Font Symbol: Special "(001.003)"Standard ROM
  312. *Font Times-Bold: Standard "(001.007)" Standard ROM
  313. *Font Times-BoldItalic: Standard "(001.009)" Standard ROM
  314. *Font Times-Italic: Standard "(001.007)" Standard ROM
  315. *Font Times-Roman: Standard "(001.007)" Standard ROM
  316. *Font ZapfChancery-MediumItalic: Standard "(001.002)" Standard Disk
  317. *Font ZapfDingbats: Special "(001.000)" Standard Disk
  318.