]>
Commit | Line | Data |
---|---|---|
ef416fc2 | 1 | %!PS-Adobe-3.0 |
2 | %%BoundingBox: 0 0 612 792 | |
3 | %%Pages: 1 | |
4 | %%LanguageLevel: 1 | |
5 | %%DocumentData: Clean7Bit | |
6 | %%DocumentSuppliedResources: procset bannerprint/1.0 | |
7 | %%DocumentNeededResources: font Helvetica Helvetica-Bold Times-Roman | |
bc44d920 | 8 | %%Creator: Michael Sweet, Apple Inc. |
9 | %%CreationDate: D:20070620123000+0700 | |
ef416fc2 | 10 | %%Title: Test Page |
11 | %%EndComments | |
12 | %%BeginProlog | |
bc44d920 | 13 | %%BeginResource procset bannerprint 1.3 0 |
ef416fc2 | 14 | % |
15 | % PostScript banner page for the Common UNIX Printing System ("CUPS"). | |
16 | % | |
bc44d920 | 17 | % Copyright 2007 Apple Inc. |
ef416fc2 | 18 | % Copyright 1993-2005 Easy Software Products |
19 | % | |
20 | % These coded instructions, statements, and computer programs are the | |
bc44d920 | 21 | % property of Apple Inc. and are protected by Federal copyright law. |
22 | % Distribution and use rights are outlined in the file "LICENSE.txt" | |
23 | % which is included with the CUPS source distribution. | |
ef416fc2 | 24 | % |
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 | |
ef416fc2 | 46 | %%EndResource |
47 | %%EndProlog | |
48 | %%Page: 1 1 | |
49 | gsave | |
50 | ||
51 | % Determine the imageable area and device resolution... | |
52 | initclip newpath clippath pathbbox % Get bounding rectangle | |
53 | 72 div /pageTop exch def % Get top margin in inches | |
54 | 72 div /pageRight exch def % Get right margin in inches | |
55 | 72 div /pageBottom exch def % Get bottom margin in inches | |
56 | 72 div /pageLeft exch def % Get left margin in inches | |
57 | ||
58 | /pageWidth pageRight pageLeft sub def % pageWidth = pageRight - pageLeft | |
59 | /pageHeight pageTop pageBottom sub def% pageHeight = pageTop - pageBottom | |
60 | ||
61 | /boxWidth % width of text box | |
62 | pageWidth pageHeight lt | |
63 | { pageWidth 54 mul } | |
64 | { pageHeight 42 mul } | |
65 | ifelse def | |
66 | ||
67 | newpath % Clear bounding path | |
68 | ||
69 | % Create fonts... | |
70 | /bigFont /Helvetica-Bold findfont % bigFont = Helvetica-Bold | |
71 | pageHeight 3 mul scalefont def % size = pageHeight * 3 (nominally 33) | |
72 | ||
73 | /mediumFont /Helvetica findfont % mediumFont = Helvetica | |
74 | pageHeight 1.5 mul scalefont def % size = pageHeight * 1.5 (nominally 16.5) | |
75 | ||
76 | % Offset page to account for lower-left margin... | |
77 | pageLeft 72 mul | |
78 | pageBottom 72 mul | |
79 | translate | |
80 | ||
81 | % Draw the label at the top and bottom... | |
82 | 0 setgray % Color | |
83 | ||
84 | pageWidth 36 mul % Center of page | |
85 | pageHeight 72 mul % Top of page | |
bc44d920 | 86 | pageWidth 9 mul sub % - 3 lines |
ef416fc2 | 87 | moveto % Position text |
88 | bigFont setfont % Font | |
89 | (Unclassified) CENTER % Show text centered | |
90 | ||
91 | pageWidth 36 mul % Center of page | |
92 | pageHeight 6 mul % Bottom of page | |
93 | moveto % Position text | |
94 | bigFont setfont % Font | |
95 | (Unclassified) CENTER % Show text centered | |
96 | ||
97 | % Job information box... | |
98 | pageWidth 36 mul 9 add % x = pageWidth * 1/2 * 72 + 9 | |
99 | boxWidth 0.5 mul sub % x-= 1/2 box width | |
100 | pageHeight 30 mul 9 sub % y = pageHeight * 1/2 * 72 - 9 | |
101 | boxWidth % w = box width | |
102 | pageHeight 14 mul % h = pageHeight * 1/2 * 72 | |
103 | 0.5 setgray rectfill % Draw a shadow | |
104 | ||
105 | pageWidth 36 mul % x = pageWidth * 1/2 * 72 | |
106 | boxWidth 0.5 mul sub % x-= 1/2 box width | |
107 | pageHeight 30 mul % y = pageHeight * 1/4 * 72 | |
108 | boxWidth % w = box width | |
109 | pageHeight 14 mul % h = pageHeight * 1/2 * 72 | |
110 | ||
111 | 4 copy 1 setgray rectfill % Clear the box to white | |
112 | 0 setgray rectstroke % Draw a black box around it... | |
113 | ||
114 | % Job information text... | |
115 | mediumFont setfont % Medium sized font | |
116 | ||
117 | pageWidth 36 mul % x = pageWidth * 1/2 * 72 | |
118 | pageHeight 36 mul % y = pageHeight * 1/2 * 72 | |
bc44d920 | 119 | pageHeight 5 mul add % y += 3.333 lines |
ef416fc2 | 120 | 2 copy % Copy X & Y |
121 | moveto | |
122 | (Job ID: ) RIGHT | |
bc44d920 | 123 | 2 copy % Copy X & Y |
ef416fc2 | 124 | moveto |
125 | ({printer-name}-{job-id}) show | |
126 | ||
bc44d920 | 127 | pageHeight 3 mul sub % y -= 2 lines |
ef416fc2 | 128 | 2 copy % Copy X & Y |
129 | moveto | |
130 | (Title: ) RIGHT | |
bc44d920 | 131 | 2 copy % Copy X & Y |
ef416fc2 | 132 | moveto |
133 | ({job-name}) show | |
134 | ||
bc44d920 | 135 | pageHeight 3 mul sub % y -= 2 lines |
ef416fc2 | 136 | 2 copy % Copy X & Y |
137 | moveto | |
138 | (Requesting User: ) RIGHT | |
ef416fc2 | 139 | 2 copy % Copy X & Y |
140 | moveto | |
bc44d920 | 141 | ({job-originating-user-name}) show |
ef416fc2 | 142 | |
bc44d920 | 143 | ({?job-billing}) () ne { |
144 | pageHeight 3 mul sub % y -= 2 lines | |
145 | 2 copy % Copy X & Y | |
146 | moveto | |
147 | (Billing Info: ) RIGHT | |
148 | 2 copy % Copy X & Y | |
149 | moveto | |
150 | ({job-billing}) show | |
151 | } if | |
ef416fc2 | 152 | |
ef416fc2 | 153 | % Show the page... |
154 | grestore | |
155 | showpage | |
156 | % | |
bc44d920 | 157 | % End of "$Id: unclassified 6649 2007-07-11 21:46:42Z mike $". |
ef416fc2 | 158 | % |
159 | %%EOF |