2 %%BoundingBox: 0 0 612 792
5 %%DocumentData: Clean7Bit
6 %%DocumentSuppliedResources: procset bannerprint/1.0
7 %%DocumentNeededResources: font Helvetica Helvetica-Bold Times-Roman
8 %%Creator: Michael Sweet, Easy Software Products
9 %%CreationDate: May 10, 2000
13 %%BeginResource procset bannerprint 1.1 0
15 % PostScript banner page for the Common UNIX Printing System ("CUPS").
17 % Copyright 1993-2002 Easy Software Products
19 % These coded instructions, statements, and computer programs are the
20 % property of Easy Software Products and are protected by Federal
21 % copyright law. Distribution and use rights are outlined in the file
22 % "LICENSE.txt" which should have been included with this file. If this
23 % file is missing or damaged please contact Easy Software Products
26 % Attn: CUPS Licensing Information
27 % Easy Software Products
28 % 44141 Airport View Drive, Suite 204
29 % Hollywood, Maryland 20636-3111 USA
31 % Voice: (301) 373-9603
32 % EMail: cups-info@cups.org
33 % WWW: http://www.cups.org
35 /CENTER { % Draw centered text
37 dup stringwidth pop % Get the width of the string
38 0.5 mul neg 0 rmoveto % Shift left 1/2 of the distance
39 show % Show the string
41 /RIGHT { % Draw right-justified text
43 dup stringwidth pop % Get the width of the string
44 neg 0 rmoveto % Shift left the entire distance
45 show % Show the string
47 /NUMBER { % Draw a number
49 1 index 1 eq { % power == 1?
50 round cvi exch pop % Convert "n" to integer
52 1 index mul round exch div % Truncate extra decimal places
54 100 string cvs show % Convert to a string and show it...
56 /CUPSLOGO { % Draw the CUPS logo
58 % Start with a big C...
59 /Helvetica findfont 1 index scalefont setfont
64 % Then "UNIX Printing System" much smaller...
65 /Helvetica-Bold findfont 1 index 9 div scalefont setfont
67 dup dup 2.0 mul moveto
69 dup dup 1.6 mul moveto
74 /ESPLOGO { % Draw the ESP logo
76 % Compute the size of the logo...
78 2 index 1.5 mul 3 index
80 % Do the "metallic" fill from 10% black to 40% black...
83 -0.15 mul % loopval * -0.15
84 0.9 add % 0.9 - loopval * 0.15
85 setgray % set gray shade
91 mul % height * (1 - loopval)
92 moveto % starting point
108 0.15 mul % loopval * 0.15
109 0.6 add % 0.6 + loopval * 0.15
113 neg 1 add % 1 - loopval
115 mul % (1 - loopval) * width
117 moveto % Starting point
122 mul % loopval * height
135 /Helvetica-BoldOblique findfont 1 index 3 div scalefont setfont
138 dup 4 mul 1 index 25 mul moveto (E) show
139 dup 10 mul 1 index 15 mul moveto (S) show
140 dup 16 mul 1 index 5 mul moveto (P) show
142 /Helvetica-BoldOblique findfont 2 index 5 div scalefont setfont
143 dup 14 mul 1 index 29 mul moveto (asy) show
144 dup 20 mul 1 index 19 mul moveto (oftware) show
145 dup 26 mul 1 index 9 mul moveto (roducts) show
154 % Determine the imageable area and device resolution...
155 initclip newpath clippath pathbbox % Get bounding rectangle
156 72 div /pageTop exch def % Get top margin in inches
157 72 div /pageRight exch def % Get right margin in inches
158 72 div /pageBottom exch def % Get bottom margin in inches
159 72 div /pageLeft exch def % Get left margin in inches
161 /pageWidth pageRight pageLeft sub def % pageWidth = pageRight - pageLeft
162 /pageHeight pageTop pageBottom sub def% pageHeight = pageTop - pageBottom
164 /boxWidth % width of text box
165 pageWidth pageHeight lt
167 { pageHeight 42 mul }
170 newpath % Clear bounding path
173 /bigFont /Helvetica-Bold findfont % bigFont = Helvetica-Bold
174 pageHeight 3 mul scalefont def % size = pageHeight * 3 (nominally 33)
176 /mediumFont /Helvetica findfont % mediumFont = Helvetica
177 pageHeight 1.5 mul scalefont def % size = pageHeight * 1.5 (nominally 16.5)
179 % Offset page to account for lower-left margin...
184 % Job information box...
185 pageWidth 36 mul 9 add % x = pageWidth * 1/2 * 72 + 9
186 boxWidth 0.5 mul sub % x-= 1/2 box width
187 pageHeight 30 mul 9 sub % y = pageHeight * 1/2 * 72 - 9
188 boxWidth % w = box width
189 pageHeight 14 mul % h = pageHeight * 1/2 * 72
190 0.5 setgray rectfill % Draw a shadow
192 pageWidth 36 mul % x = pageWidth * 1/2 * 72
193 boxWidth 0.5 mul sub % x-= 1/2 box width
194 pageHeight 30 mul % y = pageHeight * 1/4 * 72
195 boxWidth % w = box width
196 pageHeight 14 mul % h = pageHeight * 1/2 * 72
198 4 copy 1 setgray rectfill % Clear the box to white
199 0 setgray rectstroke % Draw a black box around it...
201 % Job information text...
202 mediumFont setfont % Medium sized font
204 pageWidth 36 mul % x = pageWidth * 1/2 * 72
205 pageHeight 36 mul % y = pageHeight * 1/2 * 72
206 pageHeight 5 mul add % y += 2 lines
211 ({printer-name}-{job-id}) show
213 pageWidth 36 mul % x = pageWidth * 1/2 * 72
214 pageHeight 36 mul % y = pageHeight * 1/2 * 72
215 pageHeight 2 mul add % y += 1 line
222 pageWidth 36 mul % x = pageWidth * 1/2 * 72
223 pageHeight 36 mul % y = pageHeight * 1/2 * 72
224 pageHeight -1 mul add % y -= 1 line
227 (Requesting User: ) RIGHT
229 ({job-originating-user-name}) show
231 pageWidth 36 mul % x = pageWidth * 1/2 * 72
232 pageHeight 36 mul % y = pageHeight * 1/2 * 72
233 pageHeight -4 mul add % y -= 2 lines
236 (Billing Info: ) RIGHT
240 % Then the CUPS logo....
245 pageWidth 9 mul CUPSLOGO
248 % And the ESP logo....
253 pageWidth 6 mul ESPLOGO
259 % End of "$Id: standard,v 1.7 2002/01/02 17:58:42 mike Exp $".