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