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