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