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

  1. *PPD-Adobe: "4.1"
  2. *% LH630__1.spd: Simplified form of LH630__1.ppd
  3. *PCFileName: "LH630__1.PPD"
  4. *Product: "(Linotype)"
  5. *PSVersion: "(52.3) 906"
  6. *ModelName: "Linotronic 630_630P"
  7. *NickName: "Linotronic 630_630P v52.3"
  8. *ShortNickName: "Linotronic 630"
  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 A3: "842 1191 1 statusdict /setpage get exec"
  107. *PageSize A3.Extra: "914 1262 1 statusdict /setpage get exec"
  108. *PageSize A4: "595 842 1 statusdict /setpage get exec"
  109. *PageSize A4.Extra: "667 914 1 statusdict /setpage get exec"
  110. *PageSize A5: "420 595 1 statusdict /setpage get exec"
  111. *PageSize A5.Extra: "492 667 1 statusdict /setpage get exec"
  112. *PageSize ISOB5: "499 709 1 statusdict /setpage get exec"
  113. *PageSize ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  114. *PageSize Letter.Transverse: "792 612 0 statusdict /setpage get exec"
  115. *PageSize A4.Transverse: "842 595 0 statusdict /setpage get exec"
  116. *PageSize A5.Transverse: "595 420 0 statusdict /setpage get exec"
  117. *PageSize ISOB5.Transverse: "709 499 0 statusdict /setpage get exec"
  118. *PageSize A3.Transverse: "1191 842 0 statusdict /setpage get exec"
  119. *PageSize A3.Extra.Transverse: "1262 914 0 statusdict /setpage get exec"
  120. *PageSize MaxMeasure.Punch: "1369 1213 0 statusdict /setpage get exec"
  121. *PageSize MaxMeasure: "1369 1275 0 statusdict /setpage get exec"
  122. *?PageSize: "
  123. save
  124.     mark statusdict /pageparams get exec exch pop
  125.     13 dict
  126.     dup [420 595] (A5) put
  127.     dup [492 667] (A5.Extra) put
  128.     dup [499 709] (ISOB5) put
  129.     dup [571 781] (ISOB5.Extra) put
  130.     dup [612 792] (Letter) put
  131.     dup [684 864] (Letter.Extra) put
  132.     dup [595 842] (A4) put
  133.     dup [667 914] (A4.Extra) put
  134.     dup [612 1008] (Legal) put
  135.     dup [684 1080] (Legal.Extra) put
  136.     dup [842 1191] (A3) put
  137.     dup [914 1262] (A3.Extra) put
  138.     dup [792 1224] (Tabloid) put
  139.     8 dict
  140.     dup [1191 842] (A3.Transverse) put
  141.     dup [1262 914] (A3.Extra.Transverse) put
  142.     dup [595 420] (A5.Transverse) put
  143.     dup [709 499] (ISOB5.Transverse) put
  144.     dup [842 595] (A4.Transverse) put
  145.     dup [792 612] (Letter.Transverse) put
  146.   dup [1369 1213] (MaxMeasure.Punch) put
  147.   dup [1369 1275] (MaxMeasure) put
  148.     3 -1 roll 1 eq { pop } { exch pop } ifelse
  149.     (Unknown) exch
  150.     { exch aload pop
  151.         4 index eq exch 5 index eq and
  152.         { exch pop exit } { pop } ifelse
  153.     } bind forall = flush cleartomark
  154. restore
  155. "
  156. *End
  157. *CloseUI: *PageSize
  158. *OpenUI *PageRegion: PickOne
  159. *OrderDependency: 40 AnySetup *PageRegion
  160. *DefaultPageRegion: Letter
  161. *PageRegion Letter: "612 792 1 statusdict /setpage get exec"
  162. *PageRegion Letter.Extra: "684 864 1 statusdict /setpage get exec"
  163. *PageRegion Legal: "612 1008 1 statusdict /setpage get exec"
  164. *PageRegion Legal.Extra: "684 1080 1 statusdict /setpage get exec"
  165. *PageRegion Tabloid: "792 1224 1 statusdict /setpage get exec"
  166. *PageRegion A3: "842 1191 1 statusdict /setpage get exec"
  167. *PageRegion A3.Extra: "914 1262 1 statusdict /setpage get exec"
  168. *PageRegion A4: "595 842 1 statusdict /setpage get exec"
  169. *PageRegion A4.Extra: "667 914 1 statusdict /setpage get exec"
  170. *PageRegion A5: "420 595 1 statusdict /setpage get exec"
  171. *PageRegion A5.Extra: "492 667 1 statusdict /setpage get exec"
  172. *PageRegion ISOB5: "499 709 1 statusdict /setpage get exec"
  173. *PageRegion ISOB5.Extra: "571 781 1 statusdict /setpage get exec"
  174. *PageRegion Letter.Transverse: "792 612 0 statusdict /setpage get exec"
  175. *PageRegion A4.Transverse: "842 595 0 statusdict /setpage get exec"
  176. *PageRegion A5.Transverse: "595 420 0 statusdict /setpage get exec"
  177. *PageRegion ISOB5.Transverse: "709 499 0 statusdict /setpage get exec"
  178. *PageRegion A3.Transverse: "1191 842 0 statusdict /setpage get exec"
  179. *PageRegion A3.Extra.Transverse: "1262 914 0 statusdict /setpage get exec"
  180. *PageRegion MaxMeasure.Punch: "1369 1213 0 statusdict /setpage get exec"
  181. *PageRegion MaxMeasure: "1369 1275 0 statusdict /setpage get exec"
  182. *CloseUI: *PageRegion
  183. *DefaultImageableArea: Letter
  184. *ImageableArea Letter: "0 0 612 792"
  185. *ImageableArea Letter.Extra: "0 0 684 864"
  186. *ImageableArea Legal: "0 0 612 1008"
  187. *ImageableArea Legal.Extra: "0 0 684 1080"
  188. *ImageableArea Tabloid: "0 0 794 1224"
  189. *ImageableArea A3: "0 0 842 1190"
  190. *ImageableArea A3.Extra: "0 0 914 1262"
  191. *ImageableArea A4: "0 0 595 842"
  192. *ImageableArea A4.Extra: "0 0 667 914"
  193. *ImageableArea A5: "0 0 420 595"
  194. *ImageableArea A5.Extra: "0 0 492 667"
  195. *ImageableArea ISOB5: "0 0 499 709"
  196. *ImageableArea ISOB5.Extra: "0 0 571 781"
  197. *ImageableArea Letter.Transverse: "0 0 612 792"
  198. *ImageableArea A4.Transverse: "0 0 595 842"
  199. *ImageableArea A5.Transverse: "0 0 420 595"
  200. *ImageableArea ISOB5.Transverse: "0 0 499 709"
  201. *ImageableArea A3.Transverse: "0 0 842 1190"
  202. *ImageableArea A3.Extra.Transverse: "0 0 914 1262"
  203. *ImageableArea MaxMeasure.Punch: "0 0 1213 1369"
  204. *ImageableArea MaxMeasure: "0 0 1275 1369"
  205. *?ImageableArea: "
  206. save
  207.   /cvp {(                ) cvs print ( ) print } bind def
  208.   /upperright {10000 mul floor 10000 div} bind def
  209.   /lowerleft {10000 mul ceiling 10000 div} bind def
  210.   newpath clippath pathbbox
  211.   4 -2 roll exch 2 {lowerleft cvp} repeat
  212.   exch 2 {upperright cvp} repeat flush
  213. restore
  214. "
  215. *End
  216. *DefaultPaperDimension: Letter
  217. *PaperDimension Letter: "612 792"
  218. *PaperDimension Letter.Extra: "684 864"
  219. *PaperDimension Legal: "612 1008"
  220. *PaperDimension Legal.Extra: "684 1080"
  221. *PaperDimension Tabloid: "792 1224"
  222. *PaperDimension A3: "842 1191"
  223. *PaperDimension A3.Extra: "914 1262"
  224. *PaperDimension A4: "595 842"
  225. *PaperDimension A4.Extra: "667 914"
  226. *PaperDimension A5: "420 595"
  227. *PaperDimension A5.Extra: "492 667"
  228. *PaperDimension ISOB5: "499 709"
  229. *PaperDimension ISOB5.Extra: "571 781"
  230. *PaperDimension Letter.Transverse: "612 792"
  231. *PaperDimension A4.Transverse: "595 842"
  232. *PaperDimension A5.Transverse: "420 595"
  233. *PaperDimension ISOB5.Transverse: "499 709"
  234. *PaperDimension A3.Transverse: "842 1191"
  235. *PaperDimension A3.Extra.Transverse: "914 1262"
  236. *PaperDimension MaxMeasure.Punch: "1213 1369"
  237. *PaperDimension MaxMeasure: "1275 1369"
  238. *CustomPageSize True: "1 exch sub exch pop statusdict /setpageparams get exec"
  239. *ParamCustomPageSize Width: 2 points 1 1275
  240. *ParamCustomPageSize Height: 1 points 1 1369
  241. *ParamCustomPageSize WidthOffset/Margins: 3 points 0 1274
  242. *ParamCustomPageSize HeightOffset: 4 points 0 0
  243. *ParamCustomPageSize Orientation: 5 int 0 1
  244. *MaxMediaWidth: "1275"
  245. *OpenGroup: Imagesetter
  246. *OpenUI *MirrorPrint/Mirror: Boolean
  247. *OrderDependency: 50 AnySetup *MirrorPrint
  248. *DefaultMirrorPrint: False
  249. *MirrorPrint True: "statusdict /mirrorprint true put"
  250. *MirrorPrint False: "statusdict /mirrorprint false put"
  251. *?MirrorPrint: "
  252. save
  253.   statusdict /mirrorprint get {(True)}{(False)}ifelse = flush
  254. restore
  255. "
  256. *End
  257. *CloseUI: *MirrorPrint
  258. *OpenUI *NegativePrint/Negative: Boolean
  259. *OrderDependency: 50 AnySetup *NegativePrint
  260. *DefaultNegativePrint: False
  261. *NegativePrint True: "statusdict /negativeprint true put"
  262. *NegativePrint False: "statusdict /negativeprint false put"
  263. *?NegativePrint: "
  264. save
  265.   statusdict /negativeprint get {(True)}{(False)}ifelse = flush
  266. restore
  267. "
  268. *End
  269. *CloseUI: *NegativePrint
  270. *CloseGroup: Imagesetter
  271. *RequiresPageRegion All: True
  272. *OpenUI *InputSlot: PickOne
  273. *OrderDependency: 20 AnySetup *InputSlot
  274. *DefaultInputSlot: Cassette
  275. *InputSlot Cassette: ""
  276. *CloseUI: *InputSlot
  277. *DefaultFont: Courier
  278. *Font AvantGarde-Book: Standard "(001.001)" Standard Disk
  279. *Font AvantGarde-BookOblique: Standard "(001.001)" Standard Disk
  280. *Font AvantGarde-Demi: Standard "(001.001)" Standard Disk
  281. *Font AvantGarde-DemiOblique: Standard "(001.001)" Standard Disk
  282. *Font Bookman-Demi: Standard "(001.001)" Standard Disk
  283. *Font Bookman-DemiItalic: Standard "(001.001)" Standard Disk
  284. *Font Bookman-Light: Standard "(001.001)" Standard Disk
  285. *Font Bookman-LightItalic: Standard "(001.001)" Standard Disk
  286. *Font Courier: Standard "(002.002)" Standard ROM
  287. *Font Courier-Bold: Standard "(002.002)" Standard ROM
  288. *Font Courier-BoldOblique: Standard "(002.002)" Standard ROM
  289. *Font Courier-Oblique: Standard "(002.002)" Standard ROM
  290. *Font Helvetica: Standard "(001.006)" Standard ROM
  291. *Font Helvetica-Bold: Standard "(001.007)" Standard ROM
  292. *Font Helvetica-BoldOblique: Standard "(001.007)" Standard ROM
  293. *Font Helvetica-Narrow: Standard "(001.006)" Standard ROM
  294. *Font Helvetica-Narrow-Bold: Standard "(001.007)" Standard ROM
  295. *Font Helvetica-Narrow-BoldOblique: Standard "(001.007)" Standard ROM
  296. *Font Helvetica-Narrow-Oblique: Standard "(001.006)" Standard ROM
  297. *Font Helvetica-Oblique: Standard "(001.006)" Standard ROM
  298. *Font NewCenturySchlbk-Bold: Standard "(001.002)" Standard Disk
  299. *Font NewCenturySchlbk-BoldItalic: Standard "(001.001)" Standard Disk
  300. *Font NewCenturySchlbk-Italic: Standard "(001.001)" Standard Disk
  301. *Font NewCenturySchlbk-Roman: Standard "(001.002)" Standard Disk
  302. *Font Palatino-Bold: Standard "(001.000)" Standard Disk
  303. *Font Palatino-BoldItalic: Standard "(001.000)" Standard Disk
  304. *Font Palatino-Italic: Standard "(001.000)" Standard Disk
  305. *Font Palatino-Roman: Standard "(001.000)" Standard Disk
  306. *Font Symbol: Special "(001.003)"Standard ROM
  307. *Font Times-Bold: Standard "(001.007)" Standard ROM
  308. *Font Times-BoldItalic: Standard "(001.009)" Standard ROM
  309. *Font Times-Italic: Standard "(001.007)" Standard ROM
  310. *Font Times-Roman: Standard "(001.007)" Standard ROM
  311. *Font ZapfChancery-MediumItalic: Standard "(001.002)" Standard Disk
  312. *Font ZapfDingbats: Special "(001.000)" Standard Disk
  313.