]> git.ipfire.org Git - thirdparty/cups.git/blame - data/classified
The lp command now prints multiple files as a single job.
[thirdparty/cups.git] / data / classified
CommitLineData
85ef1f5c 1%!PS-Adobe-3.0
2%%BoundingBox: 0 0 612 792
3%%Pages: 1
4%%LanguageLevel: 1
5%%DocumentData: Clean7Bit
3d0188f6 6%%DocumentSuppliedResources: procset bannerprint/1.0
85ef1f5c 7%%DocumentNeededResources: font Helvetica Helvetica-Bold Times-Roman
8%%Creator: Michael Sweet, Easy Software Products
3d0188f6 9%%CreationDate: May 10, 2000
85ef1f5c 10%%Title: Test Page
11%%EndComments
12%%BeginProlog
3d0188f6 13%%BeginResource procset bannerprint 1.1 0
85ef1f5c 14%
3d0188f6 15% PostScript banner page for the Common UNIX Printing System ("CUPS").
85ef1f5c 16%
17% Copyright 1993-2000 Easy Software Products
18%
19% These coded instructions, statements, and computer programs contain
20% unpublished proprietary information of Easy Software Products, and
21% are protected by Federal copyright law. They may not be disclosed
22% to third parties or copied or duplicated in any form, in whole or
23% in part, without the prior written consent of Easy Software Products.
24%
85ef1f5c 25/CENTER { % Draw centered text
26 % (name) CENTER -
27 dup stringwidth pop % Get the width of the string
28 0.5 mul neg 0 rmoveto % Shift left 1/2 of the distance
29 show % Show the string
30} bind def
31/RIGHT { % Draw right-justified text
32 % (name) RIGHT -
33 dup stringwidth pop % Get the width of the string
34 neg 0 rmoveto % Shift left the entire distance
35 show % Show the string
36} bind def
37/NUMBER { % Draw a number
38 % power n NUMBER -
39 1 index 1 eq { % power == 1?
40 round cvi exch pop % Convert "n" to integer
41 } {
42 1 index mul round exch div % Truncate extra decimal places
43 } ifelse
44 100 string cvs show % Convert to a string and show it...
45} bind def
46/CUPSLOGO { % Draw the CUPS logo
47 % height CUPSLOGO
48 % Start with a big C...
49 /Helvetica findfont 1 index scalefont setfont
50 0 setgray
51 0 0 moveto
52 (C) show
53
54 % Then "UNIX Printing System" much smaller...
55 /Helvetica-Bold findfont 1 index 9 div scalefont setfont
56 0.25 mul
57 dup dup 2.0 mul moveto
58 (UNIX) show
59 dup dup 1.6 mul moveto
60 (Printing) show
61 dup 1.2 mul moveto
62 (System) show
63} bind def
64/ESPLOGO { % Draw the ESP logo
65 % height ESPLOGO
66 % Compute the size of the logo...
67 0 0
68 2 index 1.5 mul 3 index
69
70 % Do the "metallic" fill from 10% black to 40% black...
71 1 -0.001 0 {
72 dup % loopval
73 -0.15 mul % loopval * -0.15
74 0.9 add % 0.9 - loopval * 0.15
75 setgray % set gray shade
76
77 0 % x
78 1 index neg % loopval
79 1 add % 1 - loopval
80 3 index % height
81 mul % height * (1 - loopval)
82 moveto % starting point
83
84 dup % loopval
85 3 index % width
86 mul % loopval * width
87 2 index % height
88 lineto % Next point
89
90 0 % x
91 2 index % height
92 lineto % Next point
93
94 closepath
95 fill
96
97 dup % loopval
98 0.15 mul % loopval * 0.15
99 0.6 add % 0.6 + loopval * 0.15
100 setgray
101
102 dup % loopval
103 neg 1 add % 1 - loopval
104 3 index % width
105 mul % (1 - loopval) * width
106 0 % y
107 moveto % Starting point
108
109 2 index % width
110 exch % loopval
111 2 index % height
112 mul % loopval * height
113 lineto % Next point
114
115 1 index % width
116 0 % y
117 lineto % Next point
118
119 closepath
120 fill
121 } for
122
123 0 setgray rectstroke
124
125 /Helvetica-BoldOblique findfont 1 index 3 div scalefont setfont
126 dup 40 div
127
128 dup 4 mul 1 index 25 mul moveto (E) show
129 dup 10 mul 1 index 15 mul moveto (S) show
130 dup 16 mul 1 index 5 mul moveto (P) show
131
132 /Helvetica-BoldOblique findfont 2 index 5 div scalefont setfont
133 dup 14 mul 1 index 29 mul moveto (asy) show
134 dup 20 mul 1 index 19 mul moveto (oftware) show
135 dup 26 mul 1 index 9 mul moveto (roducts) show
136
137 pop
138} bind def
139%%EndResource
140%%EndProlog
141%%Page: 1 1
142gsave
143
144 % Determine the imageable area and device resolution...
145 initclip newpath clippath pathbbox % Get bounding rectangle
146 72 div /pageTop exch def % Get top margin in inches
147 72 div /pageRight exch def % Get right margin in inches
148 72 div /pageBottom exch def % Get bottom margin in inches
149 72 div /pageLeft exch def % Get left margin in inches
150
85ef1f5c 151 /pageWidth pageRight pageLeft sub def % pageWidth = pageRight - pageLeft
152 /pageHeight pageTop pageBottom sub def% pageHeight = pageTop - pageBottom
153
3d0188f6 154 newpath % Clear bounding path
85ef1f5c 155
156 % Create fonts...
157 /bigFont /Helvetica-Bold findfont % bigFont = Helvetica-Bold
158 pageWidth 4 mul scalefont def % size = pageWidth * 4 (nominally 34)
159
160 /mediumFont /Helvetica findfont % mediumFont = Helvetica
161 pageWidth 2 mul scalefont def % size = pageWidth * 2 (nominally 17)
162
85ef1f5c 163 % Offset page to account for lower-left margin...
164 pageLeft 72 mul
165 pageBottom 72 mul
166 translate
167
3d0188f6 168 % Draw the label at the top and bottom...
85ef1f5c 169 0 setgray % Color
170
3d0188f6 171 pageWidth 36 mul % Center of page
172 pageHeight 72 mul % Top of page
173 pageWidth -9 mul add % - 1 line
174 moveto % Position text
175 bigFont setfont % Font
176 (Classified) CENTER % Show text centered
85ef1f5c 177
3d0188f6 178 pageWidth 36 mul % Center of page
179 pageWidth 8 mul % Bottom of page
180 moveto % Position text
181 bigFont setfont % Font
182 (Classified) CENTER % Show text centered
85ef1f5c 183
3d0188f6 184 % Job information box...
185 pageWidth 18 mul 9 add % x = pageWidth * 1/4 * 72 + 9
186 pageHeight 27 mul 9 sub % y = pageHeight * 3/8 * 72 - 9
187 pageWidth 36 mul % w = pageWidth * 1/2 * 72
188 pageHeight 18 mul % h = pageHeight * 1/4 * 72
85ef1f5c 189 0.5 setgray rectfill % Draw a shadow
190
3d0188f6 191 pageWidth 18 mul % x = pageWidth * 1/4 * 72
192 pageHeight 27 mul % y = pageHeight * 3/8 * 72
193 pageWidth 36 mul % w = pageWidth * 1/2 * 72
194 pageHeight 18 mul % h = pageHeight * 1/4 * 72
85ef1f5c 195
85ef1f5c 196 4 copy 1 setgray rectfill % Clear the box to white
197 0 setgray rectstroke % Draw a black box around it...
198
3d0188f6 199 % Job information text...
200 mediumFont setfont % Medium sized font
85ef1f5c 201
3d0188f6 202 pageWidth 36 mul % x = pageWidth * 1/2 * 72
203 pageHeight 36 mul % y = pageHeight * 1/2 * 72
204 pageWidth 4 mul add % y += 2 lines
205 2 copy % Copy X & Y
206 moveto
207 (Job ID:) RIGHT
208 moveto
209 ({printer-name}-{job-id}) show
210
211 pageWidth 36 mul % x = pageWidth * 1/2 * 72
212 pageHeight 36 mul % y = pageHeight * 1/2 * 72
213 pageWidth 1 mul add % y += 1 line
214 2 copy % Copy X & Y
215 moveto
216 (Title:) RIGHT
217 moveto
218 ({job-name}) show
219
220 pageWidth 36 mul % x = pageWidth * 1/2 * 72
221 pageHeight 36 mul % y = pageHeight * 1/2 * 72
222 pageWidth -2 mul add % y -= 1 line
223 2 copy % Copy X & Y
224 moveto
225 (Requesting User:) RIGHT
226 moveto
227 ({job-originating-user-name}) show
228
229 pageWidth 36 mul % x = pageWidth * 1/2 * 72
230 pageHeight 36 mul % y = pageHeight * 1/2 * 72
231 pageWidth -5 mul add % y -= 2 lines
232 2 copy % Copy X & Y
233 moveto
234 (Billing Info:) RIGHT
235 moveto
236 ({job-billing}) show
85ef1f5c 237
238 % Then the CUPS logo....
239 gsave
240 pageWidth 4 mul
241 pageWidth 6 mul
242 translate
243 pageWidth 9 mul CUPSLOGO
244 grestore
245
246 % And the ESP logo....
247 gsave
248 pageWidth 59 mul
249 pageWidth 6 mul
250 translate
251 pageWidth 6 mul ESPLOGO
252 grestore
253% Show the page...
254grestore
255showpage
256%
3d0188f6 257% End of "$Id: classified,v 1.2 2000/05/11 16:51:06 mike Exp $".
85ef1f5c 258%
259%%EOF