2 *% Adobe Systems PostScript(R) Printer Description File
3 *% For "DANKA PostScript to PDF Conversion Filter". Useful only for
4 *% the "pdf:/"-backend in CUPS on grml system
5 *% Date: 28-02-2004, Kurt Pfeifle (-kp-). Based on the INFOSTRM.PPD by Heinz Pieper.
6 *% Latest change: Sun Sep 11 12:54:25 CEST 2005 [mika]
7 *% ************************************************************************
9 *% ************************************************************************
10 *% The above statement indicates that this PPD was written using the
11 *% Adobe PPD File Format Specification 4.3, but does not intend to imply
12 *% approval and acceptance by Adobe Systems, Inc.
14 *% This PPD comes with no guarantee of any kind. Support by its authors, by
15 *% Knoppix, by Danka Deutschland or by Heise Verlag is not available.
16 *% Feedback is appreciated, but no response time is guaranteed:
17 *% Kurt Pfeifle <kpfeifle@danka.de>
20 *% ************************************************************************
21 *% C O N F O R M A N C E T E S T R E S U L T S
22 *% ************************************************************************
23 *% This PPD has been tested with the Easy Software Products PPD test tool.
24 *% This tool, 'testcupsppd' has discovered no deviation from the Adobe PPD
25 *% Specification. 'testcupsppd' is the best tool known to the author for
28 *% ************************************************************************
29 *% INTERNAL INFORMATION
30 *% ************************************************************************
31 *% InternalVersion: "07.00.02"
32 *% Platform(s) Supported: "Windows 95" "Windows 98" "Windows Me"
33 *% "Windows NT" "Windows 2000" "Windows XP"
35 *% "Linux" "AIX" "HP-UX" "NetBSD" "FreeBSD" "OpenBSD"
36 *% "Mac OS X" "Irix" "Solaris" "Digital UNIX" "OSF/1"
37 *% "Compaq Tru64 UNIX" "CUPS" "ESP PrintPro"
39 *% ************************************************************************
40 *% M O D I F I C A T I O N I N F O R M A T I O N
41 *% ************************************************************************
42 *% 28-02-2004 Initial design and testing
44 *% ************************************************************************
45 *% V E R S I O N I N F O R M A T I O N
46 *% ************************************************************************
49 *PSVersion: "(3010.103) 0"
50 *% InternalVersion: "07.00.02"
52 *% ************************************************************************
53 *% N A M E I N F O R M A T I O N
54 *% ************************************************************************
55 *Product: "(DANKA PS2PDF Conversion)"
56 *Manufacturer: "DANKA Digital Product Development"
57 *ModelName: "DANKA PS2PDF"
58 *NickName: "DANKA PS2PDF Conversion"
59 *ShortNickName: "DANKA PS2PDF"
60 *PCFileName: "PS2PDF.PPD"
62 *% ************************************************************************
63 *% L A N G U A G E I N F O R M A T I O N
64 *% ************************************************************************
65 *LanguageVersion: German
66 *LanguageEncoding: ISOLatin1
69 *% ************************************************************************
70 *% C U P S F I L T E R I N F O R M A T I O N
71 *% ************************************************************************
72 *% *cupsFilter: "application/vnd.cups-postscript 0 dankapdfmark"
73 *% *cupsFilter: "application/vnd.danka-pdfmarked 0 - "
74 *% the above lines are currently not used (may change in a later version
75 *% of the 'DANKA PS2PDF Conversion').
77 *% *************************************************************************
78 *% G E N E R A L I N F O R M A T I O N A N D D E F A U L T S
79 *% *************************************************************************
81 *DefaultColorSpace: RGB
82 *DefaultResolution: 600dpi
86 *?FileSystem: "(True) == flush"
89 *DefaultOutputOrder: Normal
90 *OutputOrder Normal: " "
95 { false } { true exch startjob } ifelse
98 % if no password or not valid
99 (WARNING : Cannot modify initial VM.) =
100 (Missing or invalid password.) =
101 (Please contact the author of this software.) = flush
107 *% ************************************************************************
108 *% H A L F T O N E I N F O R M A T I O N
109 *% ************************************************************************
111 *DefaultHalftoneType: 1
114 *DefaultScreenProc: Dot
116 {abs exch abs 2 copy add 1 gt {1 sub dup mul exch 1 sub dup mul add 1 sub }
117 {dup mul exch dup mul add 1 exch sub } ifelse }
122 { exch pop abs neg } bind
126 *ScreenProc Ellipse: "
127 {abs exch abs 2 copy mul exch 4 mul add 3 sub dup 0 lt
128 { pop dup mul exch .75 div dup mul add 4 div 1 exch sub }
129 { dup 1 gt { pop 1 exch sub dup mul exch 1 exch sub .75 div dup mul add 4 div 1 sub }
130 { .5 exch sub exch pop exch pop } ifelse } ifelse } bind
135 { abs exch abs 2 copy gt { exch } if pop neg } bind
139 *DefaultTransfer: Null
140 *Transfer Null: "{ } bind"
141 *Transfer Null.Inverse: "{ 1 exch sub } bind"
143 *% ************************************************************************
144 *% C U S T O M P A G E S I Z E
145 *% ************************************************************************
146 *NonUIOrderDependency: 50.0 AnySetup *CustomPageSize
147 *MaxMediaWidth: "3240"
148 *MaxMediaHeight: "3240"
149 *CenterRegistered: True
150 *HWMargins: 10 10 10 10
151 *LeadingEdge Forced: ""
152 *DefaultLeadingEdge: Forced
153 *VariablePaperSize: True
154 *ParamCustomPageSize Width: 1 points 283 842
155 *ParamCustomPageSize Height: 2 points 420 1225
156 *ParamCustomPageSize WidthOffset: 3 points 0 0
157 *ParamCustomPageSize HeightOffset: 4 points 0 0
158 *ParamCustomPageSize Orientation: 5 int 0 3
160 *CustomPageSize True: "pop pop pop <</PageSize [5 -2 roll] /ImagingBBox null
161 /DeferredMediaSelection true /Policies <</PageSize 2>> >> setpagedevice"
164 *% ************************************************************************
165 *% P A P E R H A N D L I N G
166 *% ************************************************************************
167 *% make the correct rotation Heinz Pieper 10-05-99
168 *LandscapeOrientation: Plus90
170 *OpenUI *InputSlot: PickOne
171 *DefaultInputSlot: PickOne
172 *InputSlot OnlyOne: ""
175 *OpenUI *PageSize: PickOne
176 *OrderDependency: 30 AnySetup *PageSize
178 *PageSize Letter/USBrief: "
181 dup /PageSize [612 792] put
182 dup /ImagingBBox [0 0 612 792] put
183 setpagedevice setscreen "
186 *PageSize Legal/USLang: "
189 dup /PageSize [612 1008] put
190 dup /ImagingBBox [0 0 612 1008] put
191 setpagedevice setscreen "
197 dup /PageSize [420 595] put
198 dup /ImagingBBox [0 0 420 595] put
199 setpagedevice setscreen "
205 dup /PageSize [595 842] put
206 dup /ImagingBBox [0 0 595 842] put
207 setpagedevice setscreen "
213 dup /PageSize [842 1191] put
214 dup /ImagingBBox [0 0 842 1191] put
215 setpagedevice setscreen "
220 *OpenUI *PageRegion: PickOne
221 *OrderDependency: 40 AnySetup *PageRegion
222 *DefaultPageRegion: A4
223 *PageRegion Letter/USBrief: "
226 dup /PageSize [612 792] put
227 dup /ImagingBBox [0 0 612 792] put
228 setpagedevice setscreen "
231 *PageRegion Legal/USLang: "
234 dup /PageSize [612 1008] put
235 dup /ImagingBBox [0 0 612 1008] put
236 setpagedevice setscreen "
242 dup /PageSize [420 595] put
243 dup /ImagingBBox [0 0 420 595] put
244 setpagedevice setscreen "
250 dup /PageSize [595 842] put
251 dup /ImagingBBox [0 0 595 842] put
252 setpagedevice setscreen "
258 dup /PageSize [842 1191] put
259 dup /ImagingBBox [0 0 842 1191] put
260 setpagedevice setscreen "
262 *CloseUI: *PageRegion
265 *DefaultImageableArea: A4
266 *ImageableArea Letter/USBrief: "0 0 612 792 "
267 *ImageableArea Legal/USLang: "0 0 612 1008 "
268 *ImageableArea A4/A4: "0 0 595 842 "
269 *ImageableArea A3/A3: "0 0 842 1191 "
270 *ImageableArea A5/A5: "0 0 420 595 "
271 *ImageableArea Screen: "0 0 468 373 "
272 *ImageableArea Executive: "0 0 522 756 "
273 *ImageableArea Ledger: "0 0 1224 792 "
274 *ImageableArea Tabloid/11 x 17: "0 0 792 1224 "
276 *DefaultPaperDimension: A4
277 *PaperDimension Letter/USBrief: "612 792 "
278 *PaperDimension Legal/USLang: "612 1008 "
279 *PaperDimension A4/A4: "595 842 "
280 *PaperDimension A3/A3: "842 1191 "
281 *PaperDimension A5/A5: "420 595 "
282 *PaperDimension Screen: "468 373 "
283 *PaperDimension Executive: "522 756 "
284 *PaperDimension Ledger: "1224 792 "
285 *PaperDimension Tabloid/11 x 17: "792 1224 "
287 *RequiresPageRegion All: True
290 *% ************************************************************************
291 *% M U L T I P L E R E S O L U T I O N S U P P O R T
292 *% ************************************************************************
293 *OpenUI *Resolution: PickOne
294 *OrderDependency: 50 AnySetup *Resolution
295 *DefaultResolution: 600dpi
296 *Resolution 36dpi: "1 dict dup /HWResolution [36 36] put setpagedevice"
297 *Resolution 72dpi: "1 dict dup /HWResolution [72 72] put setpagedevice"
298 *Resolution 144dpi: "1 dict dup /HWResolution [144 144] put setpagedevice"
299 *Resolution 300dpi: "1 dict dup /HWResolution [300 300] put setpagedevice"
300 *Resolution 600dpi: "1 dict dup /HWResolution [600 600] put setpagedevice"
301 *Resolution 1200dpi: "1 dict dup /HWResolution [1200 1200] put setpagedevice"
302 *Resolution 2400dpi: "1 dict dup /HWResolution [2400 2400] put setpagedevice"
303 *Resolution 4800dpi: "1 dict dup /HWResolution [4800 4800] put setpagedevice"
304 *Resolution 9600dpi: "1 dict dup /HWResolution [9600 9600] put setpagedevice"
307 currentpagedevice /HWResolution get
309 ( ) cvs print (dpi) = flush
312 *CloseUI: *Resolution
314 *ResScreenFreq 36dpi: "60.0"
315 *ResScreenFreq 72dpi: "60.0"
316 *ResScreenFreq 144dpi: "60.0"
317 *ResScreenFreq 300dpi: "60.0"
318 *ResScreenFreq 600dpi: "60.0"
319 *ResScreenFreq 1200dpi: "60.0"
320 *ResScreenFreq 2400dpi: "60.0"
321 *ResScreenFreq 4800dpi: "60.0"
322 *ResScreenFreq 9600dpi: "60.0"
324 *ResScreenAngle 36dpi: "45.0"
325 *ResScreenAngle 72dpi: "45.0"
326 *ResScreenAngle 144dpi: "45.0"
327 *ResScreenAngle 300dpi: "45.0"
328 *ResScreenAngle 600dpi: "45.0"
329 *ResScreenAngle 1200dpi: "45.0"
330 *ResScreenAngle 2400dpi: "45.0"
331 *ResScreenAngle 4800dpi: "45.0"
332 *ResScreenAngle 9600dpi: "45.0"
335 *% ************************************************************************
336 *% O T H E R U S E R I N T E R F A C E O P T I O N S
337 *% ************************************************************************
338 *% this version doesn't support any user interface options other than
339 *% the 'n-up' and 'watermark' stuff derived from HP's MIT-licensed code (-kp-)
342 *% ******************************************************************
343 *% ====== N-up Printing (Kurt Pfeifle) ========
344 *% ******************************************************************
346 *OpenUI *KP-n-up/Pages per Sheet: PickOne
347 *OrderDependency: 68 AnySetup *KP-n-up
348 *DefaultKP-n-up: OneUp
349 *KP-n-up OneUp/1 (Portrait): "
350 % Copyright (c) <pipitas 2002>
353 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
354 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
355 userdict /KPWMSize known not {/KPWMSize 48 def} if
356 userdict /KPWMLocation known not {/KPWMLocation true def} if
357 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
358 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
359 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
360 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
364 /EndPage {userdict begin userdict /KPWMText known KPWM /KPWMOn get and
366 0.5 setgray 4 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
367 currentpagedevice /PageSize get aload pop 2 div exch 2 div exch translate
368 KPWMAngle rotate /KPWMFont userdict /HPppScale known {KPWMSize HPppScale mul}{KPWMSize}ifelse selectfont
369 KPWMText stringwidth 2 div neg exch 2 div neg exch
370 userdict /HPppScale known {KPWMSize HPppScale mul}{KPWMSize}ifelse .25 mul sub moveto
371 KPWMText false charpath userdict /KPWMStyle1 known
372 {gsave 1 setgray KPWMStyle1 KPWMStyle add setlinewidth stroke grestore} if
373 0 setgray KPWMStyle setlinewidth stroke
374 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
376 2 eq {pop false}{pop KPWM begin KPWMEOP end} ifelse
382 *% ******************************************************************
383 *% ========= 1-Up Landscape (Kurt Pfeifle) ============
384 *% ******************************************************************
386 *KP-n-up OneUpL/1 (Landscape): "
387 % Copyright (c) <pipitas 2002>
389 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
391 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
392 userdict /KPWMSize known not {/KPWMSize 48 def} if
393 userdict /KPWMLocation known not {/KPWMLocation true def} if
394 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
395 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
397 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
398 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
403 userdict /KPWMText known KPWM /KPWMOn get and
404 {initmatrix 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
405 currentpagedevice /PageSize get aload pop 2 div exch 2 div exch translate
406 KPWMAngle 90 add rotate /KPWMFont userdict /HPppScale known {KPWMSize HPppScale mul}{KPWMSize}ifelse selectfont
407 KPWMText stringwidth 2 div neg exch 2 div neg exch
408 userdict /HPppScale known {KPWMSize HPppScale mul}{KPWMSize}ifelse .25 mul sub moveto
409 KPWMText false charpath userdict /KPWMStyle1 known
410 {gsave 1 setgray KPWMStyle1 KPWMStyle add setlinewidth stroke grestore} if
411 0 setgray KPWMStyle setlinewidth stroke KPWMLocation not
412 {true setglobal KPWM /KPWMOn false put false setglobal} if
414 2 eq {pop false}{pop KPWM begin KPWMEOP end} ifelse end
419 *% ******************************************************************
420 *% ========= 2-Up Portrait (Kurt Pfeifle) ============
421 *% ******************************************************************
423 *KP-n-up TwoUp/2 (Portrait): "
424 % Copyright (c) <pipitas 2002>
426 userdict /KPWMPgWidth known not
427 {/KPWMPgWidth currentpagedevice /PageSize get aload pop /KPWMPgHeight exch def def} if
428 /KPWMShWidth currentpagedevice /PageSize get aload pop /KPWMShHeight exch def def
431 /KPWMScale KPWMShWidth 32 sub KPWMPgHeight div dup KPWMShHeight 32 sub 2 div
432 KPWMPgWidth div dup 3 1 roll lt {pop} {exch pop} ifelse def
433 /KPWMX1 KPWMShWidth KPWMPgHeight KPWMScale mul sub 2 div KPWMPgHeight KPWMScale mul add def
434 /KPWMY1 KPWMShHeight KPWMPgWidth KPWMScale mul 2 mul sub 2 div def
435 /KPWMY2 KPWMPgWidth KPWMScale mul KPWMY1 add def
438 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
440 /restore {/PageSV where {pop dup PageSV eq
441 {restore KPWM begin KPWMMatrix setmatrix end}{restore}ifelse}{restore}ifelse} bind def
443 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
444 userdict /KPWMSize known not {/KPWMSize 48 def} if
445 userdict /KPWMLocation known not {/KPWMLocation true def} if
446 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
447 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
449 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
450 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
453 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
454 0 0 KPWMPgWidth KPWMPgHeight rectstroke
455 userdict /KPWMText known KPWMOn and
456 {KPWMPgWidth 2 div KPWMPgHeight 2 div translate
457 KPWMAngle rotate /KPWMFont KPWMSize selectfont
458 KPWMText stringwidth 2 div neg exch 2 div neg exch KPWMSize .25 mul sub moveto
459 KPWMText false charpath userdict /KPWMStyle1 known
460 {gsave 1 setgray KPWMStyle1 KPWMScale div KPWMStyle add setlinewidth stroke grestore} if
461 0 setgray KPWMStyle setlinewidth stroke
462 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
468 /BeginPage {userdict begin
469 2 mod 0 eq { KPWMX1 KPWMY1 translate }{ KPWMX1 KPWMY2 translate } ifelse
470 90 rotate KPWMScale KPWMScale scale
471 KPWM begin true setglobal
472 /KPWMMatrix matrix currentmatrix def
476 /EndPage {userdict begin
477 KPWM begin KPWMMatrix setmatrix
478 2 eq {2 mod 0 ne {KPWMEOP}{false}ifelse}{KPwatermark 2 mod 1 eq {KPWMEOP}{false}ifelse} ifelse end
482 /setpagedevice {userdict begin dup /PageSize known {/KPWMPgWidth exch /PageSize get aload pop /KPWMPgHeight exch def def
483 KPWMCTM <</PageSize [KPWMShWidth KPWMShHeight] /ImagingBBox null>>
484 userdict /KPWMSPD known {KPWMSPD}{setpagedevice} ifelse}if end} bind def"
488 *% ******************************************************************
489 *% ========= 2-Up Landscape (Kurt Pfeifle) ============
490 *% ******************************************************************
492 *KP-n-up TwoUpL/2 (Landscape): "
493 % Copyright (c) <pipitas 2002>
495 userdict /KPWMPgWidth known not
496 {/KPWMPgWidth currentpagedevice /PageSize get aload pop /KPWMPgHeight exch def def} if
497 /KPWMShWidth currentpagedevice /PageSize get aload pop /KPWMShHeight exch def def
500 /KPWMScale KPWMShWidth 32 sub KPWMPgHeight div dup KPWMShHeight 32 sub 2 div
501 KPWMPgWidth div dup 3 1 roll lt {pop} {exch pop} ifelse def
502 /KPWMX1 KPWMShWidth KPWMPgHeight KPWMScale mul sub 2 div def
503 /KPWMY1 KPWMShHeight KPWMPgWidth KPWMScale mul 2 mul sub 2 div KPWMShHeight exch sub def
504 /KPWMY2 KPWMY1 KPWMPgWidth KPWMScale mul sub def
507 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
509 /restore {/PageSV where {pop dup PageSV eq
510 {restore KPWM begin KPWMMatrix setmatrix end}{restore}ifelse}{restore}ifelse} bind def
512 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
513 userdict /KPWMSize known not {/KPWMSize 48 def} if
514 userdict /KPWMLocation known not {/KPWMLocation true def} if
515 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
516 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
518 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
519 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
522 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
523 0 0 KPWMPgWidth KPWMPgHeight rectstroke
524 userdict /KPWMText known KPWMOn and
525 {KPWMPgWidth 2 div KPWMPgHeight 2 div translate
526 KPWMAngle 90 add rotate /KPWMFont KPWMSize selectfont
527 KPWMText stringwidth 2 div neg exch 2 div neg exch KPWMSize .25 mul sub moveto
528 KPWMText false charpath userdict /KPWMStyle1 known
529 {gsave 1 setgray KPWMStyle1 KPWMScale div KPWMStyle add setlinewidth stroke grestore} if
530 0 setgray KPWMStyle setlinewidth stroke
531 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
537 /BeginPage {userdict begin
538 2 mod 0 eq { KPWMX1 KPWMY1 translate }{ KPWMX1 KPWMY2 translate } ifelse
539 -90 rotate KPWMScale KPWMScale scale
540 KPWM begin true setglobal
541 /KPWMMatrix matrix currentmatrix def
545 /EndPage {userdict begin
546 KPWM begin KPWMMatrix setmatrix
547 2 eq {2 mod 0 ne {KPWMEOP}{false}ifelse}{KPwatermark 2 mod 1 eq {KPWMEOP}{false}ifelse} ifelse end
551 /setpagedevice {userdict begin dup /PageSize known {/KPWMPgWidth exch /PageSize get aload pop /KPWMPgHeight exch def def
552 KPWMCTM <</PageSize [KPWMShWidth KPWMShHeight] /ImagingBBox null>>
553 userdict /KPWMSPD known {KPWMSPD}{setpagedevice} ifelse}if end} bind def"
556 *% ******************************************************************
557 *% ========= 4-Up (Kurt Pfeifle) ============
558 *% ******************************************************************
560 *KP-n-up FourUp/4 (Portrait): "
561 % Copyright (c) <pipitas 2002>
563 userdict /KPWMPgWidth known not
564 {/KPWMPgWidth currentpagedevice /PageSize get aload pop /KPWMPgHeight exch def def} if
565 /KPWMShWidth currentpagedevice /PageSize get aload pop /KPWMShHeight exch def def
568 /KPWMScale KPWMShWidth 32 sub 2 div KPWMPgWidth div dup KPWMShHeight 32 sub 2 div
569 KPWMPgHeight div dup 3 1 roll lt {pop} {exch pop} ifelse def
570 /KPWMX1 KPWMShWidth KPWMPgWidth KPWMScale mul 2 mul sub 2 div def
571 /KPWMX2 KPWMPgWidth KPWMScale mul KPWMX1 add def
572 /KPWMY1 KPWMShHeight KPWMPgHeight KPWMScale mul 2 mul sub 2 div def
573 /KPWMY2 KPWMPgHeight KPWMScale mul KPWMY1 add def
576 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
578 /restore {/PageSV where {pop dup PageSV eq
579 {restore KPWM begin KPWMMatrix setmatrix end}{restore}ifelse}{restore}ifelse} bind def
581 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
582 userdict /KPWMSize known not {/KPWMSize 48 def} if
583 userdict /KPWMLocation known not {/KPWMLocation true def} if
584 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
585 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
587 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
588 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
591 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
592 0 0 KPWMPgWidth KPWMPgHeight rectstroke
593 userdict /KPWMText known KPWMOn and
594 {KPWMPgWidth 2 div KPWMPgHeight 2 div translate
595 KPWMAngle rotate /KPWMFont KPWMSize selectfont
596 KPWMText stringwidth 2 div neg exch 2 div neg exch KPWMSize .25 mul sub moveto
597 KPWMText false charpath userdict /KPWMStyle1 known
598 {gsave 1 setgray KPWMStyle1 KPWMScale div KPWMStyle add setlinewidth stroke grestore} if
599 0 setgray KPWMStyle setlinewidth stroke
600 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
606 /BeginPage {userdict begin
608 0 eq {KPWMX1 KPWMY2 translate} if
609 1 eq {KPWMX2 KPWMY2 translate} if
610 2 eq {KPWMX1 KPWMY1 translate} if
611 3 eq {KPWMX2 KPWMY1 translate} if
612 KPWMScale KPWMScale scale
613 KPWM begin true setglobal
614 /KPWMMatrix matrix currentmatrix def
618 /EndPage {userdict begin
619 KPWM begin KPWMMatrix setmatrix
620 2 eq {4 mod 0 ne {KPWMEOP}{false}ifelse}{KPwatermark 4 mod 3 eq {KPWMEOP}{false}ifelse} ifelse end
624 /setpagedevice {userdict begin dup /PageSize known {/KPWMPgWidth exch /PageSize get aload pop /KPWMPgHeight exch def def
625 KPWMCTM <</PageSize [KPWMShWidth KPWMShHeight] /ImagingBBox null>>
626 userdict /KPWMSPD known {KPWMSPD}{setpagedevice} ifelse}if end} bind def"
630 *% ******************************************************************
631 *% ========= 4-Up Landscape (Kurt Pfeifle) ============
632 *% ******************************************************************
634 *KP-n-up FourUpL/4 (Landscape): "
635 % Copyright (c) <pipitas 2002>
637 userdict /KPWMPgWidth known not
638 {/KPWMPgWidth currentpagedevice /PageSize get aload pop /KPWMPgHeight exch def def} if
639 /KPWMShWidth currentpagedevice /PageSize get aload pop /KPWMShHeight exch def def
642 /KPWMScale KPWMShWidth 32 sub 2 div KPWMPgWidth div dup KPWMShHeight 32 sub 2 div
643 KPWMPgHeight div dup 3 1 roll lt {pop} {exch pop} ifelse def
644 /KPWMX1 KPWMShWidth KPWMPgWidth KPWMScale mul 2 mul sub 2 div def
645 /KPWMX2 KPWMPgWidth KPWMScale mul KPWMX1 add def
646 /KPWMY1 KPWMShHeight KPWMPgHeight KPWMScale mul 2 mul sub 2 div def
647 /KPWMY2 KPWMPgHeight KPWMScale mul KPWMY1 add def
650 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
652 /restore {/PageSV where {pop dup PageSV eq
653 {restore KPWM begin KPWMMatrix setmatrix end}{restore}ifelse}{restore}ifelse} bind def
655 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
656 userdict /KPWMSize known not {/KPWMSize 48 def} if
657 userdict /KPWMLocation known not {/KPWMLocation true def} if
658 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
659 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
661 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
662 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
665 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
666 0 0 KPWMPgWidth KPWMPgHeight rectstroke
667 userdict /KPWMText known KPWMOn and
668 {KPWMPgWidth 2 div KPWMPgHeight 2 div translate
669 KPWMAngle 90 add rotate /KPWMFont KPWMSize selectfont
670 KPWMText stringwidth 2 div neg exch 2 div neg exch KPWMSize .25 mul sub moveto
671 KPWMText false charpath userdict /KPWMStyle1 known
672 {gsave 1 setgray KPWMStyle1 KPWMScale div KPWMStyle add setlinewidth stroke grestore} if
673 0 setgray KPWMStyle setlinewidth stroke
674 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
680 /BeginPage {userdict begin
682 0 eq {KPWMX1 KPWMY1 translate} if
683 1 eq {KPWMX1 KPWMY2 translate} if
684 2 eq {KPWMX2 KPWMY1 translate} if
685 3 eq {KPWMX2 KPWMY2 translate} if
686 KPWMScale KPWMScale scale
687 KPWM begin true setglobal
688 /KPWMMatrix matrix currentmatrix def
692 /EndPage {userdict begin
693 KPWM begin KPWMMatrix setmatrix
694 2 eq {4 mod 0 ne {KPWMEOP}{false}ifelse}{KPwatermark 4 mod 3 eq {KPWMEOP}{false}ifelse} ifelse end
698 /setpagedevice {userdict begin dup /PageSize known {/KPWMPgWidth exch /PageSize get aload pop /KPWMPgHeight exch def def
699 KPWMCTM <</PageSize [KPWMShWidth KPWMShHeight] /ImagingBBox null>>
700 userdict /KPWMSPD known {KPWMSPD}{setpagedevice} ifelse}if end} bind def"
704 *% ******************************************************************
705 *% ========= 6-Up Portrait (Kurt Pfeifle) ============
706 *% ******************************************************************
708 *KP-n-up SixUp/6 (Portrait): "
709 % Copyright (c) <pipitas 2002>
711 userdict /KPWMPgWidth known not
712 {/KPWMPgWidth currentpagedevice /PageSize get aload pop /KPWMPgHeight exch def def} if
713 /KPWMShWidth currentpagedevice /PageSize get aload pop /KPWMShHeight exch def def
716 /KPWMScale KPWMShWidth 32 sub 2 div KPWMPgHeight div dup KPWMShHeight 32 sub 3 div
717 KPWMPgWidth div dup 3 1 roll lt {pop} {exch pop} ifelse def
718 /KPWMX1 KPWMShWidth KPWMPgHeight KPWMScale mul 2 mul sub 2 div KPWMPgHeight KPWMScale mul add def
719 /KPWMY1 KPWMShHeight KPWMPgWidth KPWMScale mul 3 mul sub 2 div def
722 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
724 /restore {/PageSV where {pop dup PageSV eq
725 {restore KPWM begin KPWMMatrix setmatrix end}{restore}ifelse}{restore}ifelse} bind def
727 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
728 userdict /KPWMSize known not {/KPWMSize 48 def} if
729 userdict /KPWMLocation known not {/KPWMLocation true def} if
730 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
731 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
733 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
734 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
737 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
738 0 0 KPWMPgWidth KPWMPgHeight rectstroke
739 userdict /KPWMText known KPWMOn and
740 {KPWMPgWidth 2 div KPWMPgHeight 2 div translate
741 KPWMAngle rotate /KPWMFont KPWMSize selectfont
742 KPWMText stringwidth 2 div neg exch 2 div neg exch KPWMSize .25 mul sub moveto
743 KPWMText false charpath userdict /KPWMStyle1 known
744 {gsave 1 setgray KPWMStyle1 KPWMScale div KPWMStyle add setlinewidth stroke grestore} if
745 0 setgray KPWMStyle setlinewidth stroke
746 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
752 /BeginPage {userdict begin
754 3 idiv KPWMPgHeight KPWMScale mul mul KPWMX1 add
755 exch dup 3 idiv 3 mul sub KPWMPgWidth KPWMScale mul mul KPWMY1 add
757 90 rotate KPWMScale KPWMScale scale
758 KPWM begin true setglobal
759 /KPWMMatrix matrix currentmatrix def
763 /EndPage {userdict begin
764 KPWM begin KPWMMatrix setmatrix
765 2 eq {6 mod 0 ne {KPWMEOP}{false}ifelse}{KPwatermark 6 mod 5 eq {KPWMEOP}{false}ifelse} ifelse end
769 /setpagedevice {userdict begin dup /PageSize known {/KPWMPgWidth exch /PageSize get aload pop /KPWMPgHeight exch def def
770 KPWMCTM <</PageSize [KPWMShWidth KPWMShHeight] /ImagingBBox null>>
771 userdict /KPWMSPD known {KPWMSPD}{setpagedevice} ifelse}if end} bind def"
775 *% ******************************************************************
776 *% ========= 6-Up Landscape (Kurt Pfeifle) ============
777 *% ******************************************************************
779 *KP-n-up SixUpL/6 (Landscape): "
780 % Copyright (c) <pipitas 2002>
782 userdict /KPWMPgWidth known not
783 {/KPWMPgWidth currentpagedevice /PageSize get aload pop /KPWMPgHeight exch def def} if
784 /KPWMShWidth currentpagedevice /PageSize get aload pop /KPWMShHeight exch def def
787 /KPWMScale KPWMShWidth 32 sub 2 div KPWMPgHeight div dup KPWMShHeight 32 sub 3 div
788 KPWMPgWidth div dup 3 1 roll lt {pop} {exch pop} ifelse def
789 /KPWMX1 KPWMShWidth KPWMPgHeight KPWMScale mul 2 mul sub 2 div def
790 /KPWMY1 KPWMShHeight KPWMPgWidth KPWMScale mul 3 mul sub 2 div KPWMPgWidth KPWMScale mul add def
793 true setglobal /KPWM 5 dict dup begin /KPWMOn true def /KPWMOdd true def end def false setglobal
795 /restore {/PageSV where {pop dup PageSV eq
796 {restore KPWM begin KPWMMatrix setmatrix end}{restore}ifelse}{restore}ifelse} bind def
798 userdict /KPWMAngle known not {/KPWMAngle 45 def} if
799 userdict /KPWMSize known not {/KPWMSize 48 def} if
800 userdict /KPWMLocation known not {/KPWMLocation true def} if
801 userdict /KPWMStyle known not {/KPWMStyle .48 def} if
802 userdict /KPWMDuplex known not {/KPWMDuplex 0 def} if
804 /KPWMEOP {KPWMDuplex 0 eq {true}{KPWMDuplex 1 eq KPWMOdd eq dup not {erasepage}if
805 true setglobal /KPWMOdd KPWMOdd not def false setglobal}ifelse} bind def
808 0 setgray 1 setlinewidth true setstrokeadjust 0 setlinejoin 0 setlinecap [] 0 setdash
809 0 0 KPWMPgWidth KPWMPgHeight rectstroke
810 userdict /KPWMText known KPWMOn and
811 {KPWMPgWidth 2 div KPWMPgHeight 2 div translate
812 KPWMAngle 90 add rotate /KPWMFont KPWMSize selectfont
813 KPWMText stringwidth 2 div neg exch 2 div neg exch KPWMSize .25 mul sub moveto
814 KPWMText false charpath userdict /KPWMStyle1 known
815 {gsave 1 setgray KPWMStyle1 KPWMScale div KPWMStyle add setlinewidth stroke grestore} if
816 0 setgray KPWMStyle setlinewidth stroke
817 KPWMLocation not {true setglobal KPWM /KPWMOn false put false setglobal} if
823 /BeginPage {userdict begin
825 dup 2 idiv 2 mul sub KPWMPgHeight KPWMScale mul mul KPWMX1 add
826 exch 2 idiv 2 exch sub KPWMPgWidth KPWMScale mul mul KPWMY1 add
828 -90 rotate KPWMScale KPWMScale scale
829 KPWM begin true setglobal
830 /KPWMMatrix matrix currentmatrix def
834 /EndPage {userdict begin
835 KPWM begin KPWMMatrix setmatrix
836 2 eq {6 mod 0 ne {KPWMEOP}{false}ifelse}{KPwatermark 6 mod 5 eq {KPWMEOP}{false}ifelse} ifelse end
840 /setpagedevice {userdict begin dup /PageSize known {/KPWMPgWidth exch /PageSize get aload pop /KPWMPgHeight exch def def
841 KPWMCTM <</PageSize [KPWMShWidth KPWMShHeight] /ImagingBBox null>>
842 userdict /KPWMSPD known {KPWMSPD}{setpagedevice} ifelse}if end} bind def"
847 *% *************************************************************************
848 *% === Watermark Text Selection (Kurt Pfeifle) ========
849 *% *************************************************************************
851 *OpenUI *KPWMText/Watermark: PickOne
852 *OrderDependency: 65 AnySetup *KPWMText
853 *DefaultKPWMText: grml
854 *KPWMText None/None: ""
855 *KPWMText DankaDigitalProductsDevelopment/Danka Digital Products Development: "userdict /KPWMText (Danka Digital Products Development) put"
856 *KPWMText DPD/DPD: "userdict /KPWMText (DPD) put"
857 *KPWMText grml/grml: "userdict /KPWMText (grml) put"
858 *KPWMText DankaAtTheDesktop/Danka at the Desktop: "userdict /KPWMText (Danka at the Desktop) put"
859 *KPWMText CompanyConfidential/Company Confidential: "userdict /KPWMText (Company Confidential) put"
860 *KPWMText CompanyProprietary/Company Proprietary: "userdict /KPWMText (Company Proprietary) put"
861 *KPWMText CompanyPrivate/Company Private: "userdict /KPWMText (Company Private) put"
862 *KPWMText Confidential/Confidential: "userdict /KPWMText (Confidential) put"
863 *KPWMText Copy/Copy: "userdict /KPWMText (Copy) put"
864 *KPWMText Copyright/Copyright: "userdict /KPWMText (Copyright) put"
865 *KPWMText Draft/Draft: "userdict /KPWMText (Draft) put"
866 *KPWMText FileCopy/File Copy: "userdict /KPWMText (File Copy) put"
867 *KPWMText Final/Final Version: "userdict /KPWMText (Final Version) put"
868 *KPWMText ForInternalUse/For Internal Use Only: "userdict /KPWMText (For Internal Use Only) put"
869 *KPWMText Preliminary/Preliminary Version: "userdict /KPWMText (Preliminary Version) put"
870 *KPWMText Proof/Proof: "userdict /KPWMText (Proof) put"
871 *KPWMText ReviewCopy/Review Copy: "userdict /KPWMText (Review Copy) put"
872 *KPWMText Sample/Sample: "userdict /KPWMText (Sample) put"
873 *KPWMText TopSecret/Top Secret: "userdict /KPWMText (Top Secret) put"
874 *KPWMText Urgent/Urgent: "userdict /KPWMText (Urgent) put"
878 *% ******************************************************************
879 *% === WaterMark Font Selection (Kurt Pfeifle)========
880 *% ******************************************************************
882 *OpenUI *KPWMFont/Watermark Font: PickOne
883 *OrderDependency: 65 AnySetup *KPWMFont
884 *DefaultKPWMFont: HelveticaB
885 *KPWMFont CourierB/Courier Bold: "
886 /Courier-Bold findfont dup length dict begin
887 {1 index /FID ne {def} {pop pop} ifelse} forall
888 /Encoding ISOLatin1Encoding def currentdict
890 /KPWMFont exch definefont pop"
892 *KPWMFont TimesB/Times Bold: "
893 /Times-Bold findfont dup length dict begin
894 {1 index /FID ne {def} {pop pop} ifelse} forall
895 /Encoding ISOLatin1Encoding def currentdict
897 /KPWMFont exch definefont pop"
899 *KPWMFont HelveticaB/Helvetica Bold: "
900 /Helvetica-Bold findfont dup length dict begin
901 {1 index /FID ne {def} {pop pop} ifelse} forall
902 /Encoding ISOLatin1Encoding def currentdict
904 /KPWMFont exch definefont pop"
906 *KPWMFont PalatinoB/Palatino Bold:"
907 /Palatino-Bold findfont dup length dict begin
908 {1 index /FID ne {def} {pop pop} ifelse} forall
909 /Encoding ISOLatin1Encoding def currentdict
911 /KPWMFont exch definefont pop"
913 *KPWMFont PalatinoBI/Palatino Bold Italic: "
914 /Palatino-BoldItalic findfont dup length dict begin
915 {1 index /FID ne {def} {pop pop} ifelse} forall
916 /Encoding ISOLatin1Encoding def currentdict
918 /KPWMFont exch definefont pop"
920 *KPWMFont NewCenturySchlbk-Bold/New Century Schoolbook Bold: "
921 /NewCenturySchlbk-Bold findfont dup length dict begin
922 {1 index /FID ne {def} {pop pop} ifelse} forall
923 /Encoding ISOLatin1Encoding def currentdict
925 /KPWMFont exch definefont pop"
930 *% ******************************************************************
931 *% === WaterMark Size Selection (Kurt Pfeifle) ========
932 *% ******************************************************************
934 *OpenUI *KPWMFontSize/Watermark Font Size: PickOne
935 *OrderDependency: 65 AnySetup *KPWMFontSize
936 *DefaultKPWMFontSize: pt144
937 *KPWMFontSize pt24/24 Punkte: "userdict /KPWMSize 24 put"
938 *KPWMFontSize pt30/30 Punkte: "userdict /KPWMSize 30 put"
939 *KPWMFontSize pt36/36 Punkte: "userdict /KPWMSize 36 put"
940 *KPWMFontSize pt42/42 Punkte: "userdict /KPWMSize 42 put"
941 *KPWMFontSize pt48/48 Punkte: "userdict /KPWMSize 48 put"
942 *KPWMFontSize pt54/54 Punkte: "userdict /KPWMSize 54 put"
943 *KPWMFontSize pt60/60 Punkte: "userdict /KPWMSize 60 put"
944 *KPWMFontSize pt66/66 Punkte: "userdict /KPWMSize 66 put"
945 *KPWMFontSize pt72/72 Punkte: "userdict /KPWMSize 72 put"
946 *KPWMFontSize pt78/78 Punkte: "userdict /KPWMSize 78 put"
947 *KPWMFontSize pt84/84 Punkte: "userdict /KPWMSize 84 put"
948 *KPWMFontSize pt90/90 Punkte: "userdict /KPWMSize 90 put"
949 *KPWMFontSize pt96/96 Punkte: "userdict /KPWMSize 96 put"
950 *KPWMFontSize pt108/108 Punkte: "userdict /KPWMSize 108 put"
951 *KPWMFontSize pt120/120 Punkte: "userdict /KPWMSize 120 put"
952 *KPWMFontSize pt144/144 Punkte: "userdict /KPWMSize 144 put"
953 *CloseUI: *KPWMFontSize
956 *% ******************************************************************
957 *% === WaterMark Angle Selection (Kurt Pfeifle) ========
958 *% ******************************************************************
960 *OpenUI *KPWMTextAngle/Watermark Text Angel: PickOne
961 *OrderDependency: 65 AnySetup *KPWMTextAngle
962 *DefaultKPWMTextAngle: Deg60
963 *KPWMTextAngle Deg90/90 Grad: "userdict /KPWMAngle 90 put"
964 *KPWMTextAngle Deg80/80 Grad: "userdict /KPWMAngle 80 put"
965 *KPWMTextAngle Deg75/75 Grad: "userdict /KPWMAngle 75 put"
966 *KPWMTextAngle Deg66/66 Grad: "userdict /KPWMAngle 66 put"
967 *KPWMTextAngle Deg60/60 Grad: "userdict /KPWMAngle 60 put"
968 *KPWMTextAngle Deg50/50 Grad: "userdict /KPWMAngle 50 put"
969 *KPWMTextAngle Deg45/45 Grad: "userdict /KPWMAngle 45 put"
970 *KPWMTextAngle Deg40/40 Grad: "userdict /KPWMAngle 40 put"
971 *KPWMTextAngle Deg30/30 Grad: "userdict /KPWMAngle 30 put"
972 *KPWMTextAngle Deg20/20 Grad: "userdict /KPWMAngle 20 put"
973 *KPWMTextAngle Deg15/15 Grad: "userdict /KPWMAngle 15 put"
974 *KPWMTextAngle Deg10/10 Grad: "userdict /KPWMAngle 10 put"
975 *KPWMTextAngle Deg0/0 Grad: "userdict /KPWMAngle 0 put"
976 *KPWMTextAngle DegN10/-10 Grad: "userdict /KPWMAngle -10 put"
977 *KPWMTextAngle DegN15/-15 Grad: "userdict /KPWMAngle -15 put"
978 *KPWMTextAngle DegN20/-20 Grad: "userdict /KPWMAngle -20 put"
979 *KPWMTextAngle DegN30/-30 Grad: "userdict /KPWMAngle -30 put"
980 *KPWMTextAngle DegN40/-40 Grad: "userdict /KPWMAngle -40 put"
981 *KPWMTextAngle DegN45/-45 Grad: "userdict /KPWMAngle -45 put"
982 *KPWMTextAngle DegN50/-50 Grad: "userdict /KPWMAngle -50 put"
983 *KPWMTextAngle DegN60/-60 Grad: "userdict /KPWMAngle -60 put"
984 *KPWMTextAngle DegN66/-66 Grad: "userdict /KPWMAngle -66 put"
985 *KPWMTextAngle DegN75/-75 Grad: "userdict /KPWMAngle -75 put"
986 *KPWMTextAngle DegN80/-80 Grad: "userdict /KPWMAngle -80 put"
987 *KPWMTextAngle DegN90/-90 Grad: "userdict /KPWMAngle -90 put"
988 *CloseUI: *KPWMTextAngle
991 *% ******************************************************************
992 *% === WaterMark Style Selection (Kurt Pfeifle) ========
993 *% ******************************************************************
995 *OpenUI *KPWMTextStyle/Watermark Font Style: PickOne
996 *OrderDependency: 65 AnySetup *KPWMTextStyle
997 *DefaultKPWMTextStyle: Halo
998 *KPWMTextStyle Narrow/Narrow Outline: "userdict /KPWMStyle .24 put"
999 *KPWMTextStyle Medium/Medium Outline: "userdict /KPWMStyle .48 put"
1000 *KPWMTextStyle Wide/Wide Outline: "userdict /KPWMStyle .96 put"
1001 *KPWMTextStyle VeryWide/Very Wide Outline: "userdict /KPWMStyle 1.92 put"
1002 *KPWMTextStyle Halo/Wide Outline Halo: "userdict /KPWMStyle .96 put userdict /KPWMStyle1 .84 put"
1003 *CloseUI: *KPWMTextStyle
1006 *% ******************************************************************
1007 *% === WaterMark Location Selection (Kurt Pfeifle) ========
1008 *% ******************************************************************
1011 *OpenUI *KPWMLocation/Print Watermark: Boolean
1012 *OrderDependency: 65 AnySetup *KPWMLocation
1013 *DefaultKPWMLocation: False
1014 *KPWMLocation True/All Pages: "userdict /KPWMLocation true put"
1015 *KPWMLocation False/First Page Only: "userdict /KPWMLocation false put"
1016 *CloseUI: *KPWMLocation
1018 *% ******************************************************************
1019 *% ===== PPD Version information & warning (Kurt Pfeifle) ======
1020 *% ******************************************************************
1022 *OpenUI *KPPPDInfo/About this Danka-enhanced PPD: PickOne
1023 *OrderDependency: 65 AnySetup *KPPPDInfo
1024 *DefaultKPPPDInfo: KPModified
1025 *KPPPDInfo KPModified/PPD was modified by Kurt Pfeifle -- Danka DPD: ""
1026 *KPPPDInfo KPGuarantee/* no guarantee is provided whatsoever: ""
1027 *KPPPDInfo KPLimitation/* new functions might not work under all conditions: ""
1028 *KPPPDInfo KPDanger/* please do take your own precautions --: ""
1029 *KPPPDInfo KPWarning/ -- it does not prevent pregnancy nor AIDS: ""
1030 *CloseUI: *KPPPDInfo
1033 *% ************************************************************************
1034 *% F O N T I N F O R M A T I O N
1035 *% ************************************************************************
1037 *DefaultFont: Courier
1038 *Font AdobeSansMM: Standard "(001.000)" Standard Disk
1039 *Font AdobeSerifMM: Standard "(001.001)" Standard Disk
1040 *Font AlbertusMT-Italic: Standard "(001.001)" Standard Disk
1041 *Font AlbertusMT-Light: Standard "(001.001)" Standard Disk
1042 *Font AlbertusMT: Standard "(001.001)" Standard Disk
1043 *Font AntiqueOlive-Bold: Standard "(001.002)" Standard Disk
1044 *Font AntiqueOlive-Compact: Standard "(001.002)" Standard Disk
1045 *Font AntiqueOlive-Italic: Standard "(001.002)" Standard Disk
1046 *Font AntiqueOlive-Roman: Standard "(001.002)" Standard Disk
1047 *Font Apple-Chancery: Standard "(3.0)" Standard Disk
1048 *Font Arial-BoldItalicMT: Standard "(001.002)" Standard Disk
1049 *Font Arial-BoldMT: Standard "(001.002)" Standard Disk
1050 *Font Arial-ItalicMT: Standard "(001.002)" Standard Disk
1051 *Font ArialMT: Standard "(001.002)" Standard Disk
1052 *Font AvantGarde-Book: Standard "(003.000)" Standard Disk
1053 *Font AvantGarde-BookOblique: Standard "(003.000)" Standard Disk
1054 *Font AvantGarde-Demi: Standard "(003.000)" Standard Disk
1055 *Font AvantGarde-DemiOblique: Standard "(003.000)" Standard Disk
1056 *Font Bodoni-Bold: Standard "(001.003)" Standard Disk
1057 *Font Bodoni-BoldItalic: Standard "(001.003)" Standard Disk
1058 *Font Bodoni-Italic: Standard "(001.003)" Standard Disk
1059 *Font Bodoni-Poster: Standard "(001.003)" Standard Disk
1060 *Font Bodoni-PosterCompressed: Standard "(001.002)" Standard Disk
1061 *Font Bodoni: Standard "(001.003)" Standard Disk
1062 *Font Bookman-Demi: Standard "(003.000)" Standard Disk
1063 *Font Bookman-DemiItalic: Standard "(003.000)" Standard Disk
1064 *Font Bookman-Light: Standard "(003.000)" Standard Disk
1065 *Font Bookman-LightItalic: Standard "(003.000)" Standard Disk
1066 *Font Carta: Special "(001.001)" Special Disk
1067 *Font Chicago: Standard "(3.0)" Standard Disk
1068 *Font Clarendon-Bold: Standard "(001.002)" Standard Disk
1069 *Font Clarendon-Light: Standard "(001.002)" Standard Disk
1070 *Font Clarendon: Standard "(001.002)" Standard Disk
1071 *Font CooperBlack-Italic: Standard "(001.004)" Standard Disk
1072 *Font CooperBlack: Standard "(001.004)" Standard Disk
1073 *Font Copperplate-ThirtyThreeBC: Standard "(001.003)" Standard Disk
1074 *Font Copperplate-ThirtyTwoBC: Standard "(001.003)" Standard Disk
1075 *Font Coronet-Regular: Standard "(001.001)" Standard Disk
1076 *Font Courier-Bold: Standard "(004.000)" Standard Disk
1077 *Font Courier-BoldOblique: Standard "(004.000)" Standard Disk
1078 *Font Courier-Oblique: Standard "(004.000)" Standard Disk
1079 *Font Courier: Standard "(004.000)" Standard Disk
1080 *Font Eurostile-Bold: Standard "(001.002)" Standard Disk
1081 *Font Eurostile-BoldExtendedTwo: Standard "(001.003)" Standard Disk
1082 *Font Eurostile-ExtendedTwo: Standard "(001.003)" Standard Disk
1083 *Font Eurostile: Standard "(001.003)" Standard Disk
1084 *Font Geneva: Standard "(3.0)" Standard Disk
1085 *Font GillSans-Bold: Standard "(001.002)" Standard Disk
1086 *Font GillSans-BoldCondensed: Standard "(001.002)" Standard Disk
1087 *Font GillSans-BoldItalic: Standard "(001.003)" Standard Disk
1088 *Font GillSans-Condensed: Standard "(001.002)" Standard Disk
1089 *Font GillSans-ExtraBold: Standard "(001.002)" Standard Disk
1090 *Font GillSans-Italic: Standard "(001.003)" Standard Disk
1091 *Font GillSans-Light: Standard "(001.002)" Standard Disk
1092 *Font GillSans-LightItalic: Standard "(001.003)" Standard Disk
1093 *Font GillSans: Standard "(001.003)" Standard Disk
1094 *Font Goudy-Bold: Standard "(001.003)" Standard Disk
1095 *Font Goudy-BoldItalic: Standard "(001.003)" Standard Disk
1096 *Font Goudy-ExtraBold: Standard "(001.002)" Standard Disk
1097 *Font Goudy-Italic: Standard "(001.003)" Standard Disk
1098 *Font Goudy: Standard "(001.004)" Standard Disk
1099 *Font Helvetica-Bold: Standard "(003.000)" Standard Disk
1100 *Font Helvetica-BoldOblique: Standard "(003.000)" Standard Disk
1101 *Font Helvetica-Condensed-Bold: Standard "(003.000)" Standard Disk
1102 *Font Helvetica-Condensed-BoldObl: Standard "(003.000)" Standard Disk
1103 *Font Helvetica-Condensed-Oblique: Standard "(003.000)" Standard Disk
1104 *Font Helvetica-Condensed: Standard "(003.000)" Standard Disk
1105 *Font Helvetica-Narrow-Bold: Standard "(003.000)" Standard Disk
1106 *Font Helvetica-Narrow-BoldOblique: Standard "(003.000)" Standard Disk
1107 *Font Helvetica-Narrow-Oblique: Standard "(003.000)" Standard Disk
1108 *Font Helvetica-Narrow: Standard "(003.000)" Standard Disk
1109 *Font Helvetica-Oblique: Standard "(003.000)" Standard Disk
1110 *Font Helvetica: Standard "(003.000)" Standard Disk
1111 *Font HoeflerText-Black: Standard "(1.0)" Unknown Disk
1112 *Font HoeflerText-BlackItalic: Standard "(1.0)" Unknown Disk
1113 *Font HoeflerText-Italic: Standard "(1.0)" Unknown Disk
1114 *Font HoeflerText-Ornaments: Special "(001.001)" Standard Disk
1115 *Font HoeflerText-Regular: Standard "(1.0)" Unknown Disk
1116 *Font JoannaMT-Bold: Standard "(001.001)" Standard Disk
1117 *Font JoannaMT-BoldItalic: Standard "(001.001)" Standard Disk
1118 *Font JoannaMT-Italic: Standard "(001.001)" Standard Disk
1119 *Font JoannaMT: Standard "(001.001)" Standard Disk
1120 *Font LetterGothic-Bold: Standard "(001.007)" Standard Disk
1121 *Font LetterGothic-BoldSlanted: Standard "(001.006)" Standard Disk
1122 *Font LetterGothic-Slanted: Standard "(001.005)" Standard Disk
1123 *Font LetterGothic: Standard "(001.005)" Standard Disk
1124 *Font LubalinGraph-Book: Standard "(001.004)" Standard Disk
1125 *Font LubalinGraph-BookOblique: Standard "(001.004)" Standard Disk
1126 *Font LubalinGraph-Demi: Standard "(001.004)" Standard Disk
1127 *Font LubalinGraph-DemiOblique: Standard "(001.004)" Standard Disk
1128 *Font Marigold: Standard "(001.001)" Standard Disk
1129 *Font MonaLisa-Recut: Standard "(001.001)" Standard Disk
1130 *Font Monaco: Standard "(3.0)" Standard Disk
1131 *Font NewCenturySchlbk-Bold: Standard "(003.000)" Standard Disk
1132 *Font NewCenturySchlbk-BoldItalic: Standard "(003.000)" Standard Disk
1133 *Font NewCenturySchlbk-Italic: Standard "(003.000)" Standard Disk
1134 *Font NewCenturySchlbk-Roman: Standard "(003.000)" Standard Disk
1135 *Font NewYork: Standard "(3.0)" Standard Disk
1136 *Font Optima-Bold: Standard "(001.007)" Standard Disk
1137 *Font Optima-BoldItalic: Standard "(001.001)" Standard Disk
1138 *Font Optima-Italic: Standard "(001.001)" Standard Disk
1139 *Font Optima: Standard "(001.006)" Standard Disk
1140 *Font Oxford: Standard "(001.001)" Standard Disk
1141 *Font Palatino-Bold: Standard "(003.000)" Standard Disk
1142 *Font Palatino-BoldItalic: Standard "(003.000)" Standard Disk
1143 *Font Palatino-Italic: Standard "(003.000)" Standard Disk
1144 *Font Palatino-Roman: Standard "(003.000)" Standard Disk
1145 *Font StempelGaramond-Bold: Standard "(001.003)" Standard Disk
1146 *Font StempelGaramond-BoldItalic: Standard "(001.003)" Standard Disk
1147 *Font StempelGaramond-Italic: Standard "(001.003)" Standard Disk
1148 *Font StempelGaramond-Roman: Standard "(001.003)" Standard Disk
1149 *Font Symbol: Special "(001.008)" Special Disk
1150 *Font Tekton: Standard "(001.002)" Standard Disk
1151 *Font Times-Bold: Standard "(003.000)" Standard Disk
1152 *Font Times-BoldItalic: Standard "(003.000)" Standard Disk
1153 *Font Times-Italic: Standard "(003.000)" Standard Disk
1154 *Font Times-Roman: Standard "(003.000)" Standard Disk
1155 *Font TimesNewRomanPS-BoldItalicMT: Standard "(001.003)" Standard Disk
1156 *Font TimesNewRomanPS-BoldMT: Standard "(001.003)" Standard Disk
1157 *Font TimesNewRomanPS-ItalicMT: Standard "(001.003)" Standard Disk
1158 *Font TimesNewRomanPSMT: Standard "(001.003)" Standard Disk
1159 *Font Univers-Bold: Standard "(001.004)" Standard Disk
1160 *Font Univers-BoldExt: Standard "(001.001)" Standard Disk
1161 *Font Univers-BoldExtObl: Standard "(001.001)" Standard Disk
1162 *Font Univers-BoldOblique: Standard "(001.004)" Standard Disk
1163 *Font Univers-Condensed: Standard "(001.003)" Standard Disk
1164 *Font Univers-CondensedBold: Standard "(001.002)" Standard Disk
1165 *Font Univers-CondensedBoldOblique: Standard "(001.002)" Standard Disk
1166 *Font Univers-CondensedOblique: Standard "(001.003)" Standard Disk
1167 *Font Univers-Extended: Standard "(001.001)" Standard Disk
1168 *Font Univers-ExtendedObl: Standard "(001.001)" Standard Disk
1169 *Font Univers-Light: Standard "(001.004)" Standard Disk
1170 *Font Univers-LightOblique: Standard "(001.004)" Standard Disk
1171 *Font Univers-Oblique: Standard "(001.004)" Standard Disk
1172 *Font Univers: Standard "(001.004)" Standard Disk
1173 *Font Wingdings-Regular: Special "(002.000)" Special Disk
1174 *Font ZapfChancery-MediumItalic: Standard "(003.000)" Standard Disk
1175 *Font ZapfDingbats: Special "(002.000)" Special Disk
1180 { exch dup 127 string cvs (/) print print (:) print
1181 /Font resourcestatus {pop pop (Yes)} {(No)} ifelse =
1189 (*) {cvn ==} 128 string /Font resourceforall
1194 *% ************************************************************************
1196 *% Last Edit Date: 03-05-2003 Kurt Pfeifle (-kp-), DANKA Europe Ltd.
1197 *% End of PPD file for DANKA PostScript Merge Filter
1199 *% ************************************************************************
1201 *% ************************************************************************