data/confidential

   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
   8 %%Creator: Michael Sweet, Easy Software Products
   9 %%CreationDate: May 10, 2000
  10 %%Title: Test Page
  11 %%EndComments
  12 %%BeginProlog
  13 %%BeginResource procset bannerprint 1.1 0
  14 %
  15 %   PostScript banner page for the Common UNIX Printing System ("CUPS").
  16 %
  17 %   Copyright 1993-2005 Easy Software Products
  18 %
  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
  24 %   at:
  25 %
  26 %       Attn: CUPS Licensing Information
  27 %       Easy Software Products
  28 %       44141 Airport View Drive, Suite 204
  29 %       Hollywood, Maryland 20636 USA
  30 %
  31 %       Voice: (301) 373-9600
  32 %       EMail: cups-info@cups.org
  33 %         WWW: http://www.cups.org
  34 %
  35 /CENTER {                       % Draw centered text
  36                                 % (name) CENTER -
  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
  40 } bind def
  41 /RIGHT {                        % Draw right-justified text
  42                                 % (name) RIGHT -
  43   dup stringwidth pop           % Get the width of the string
  44   neg 0 rmoveto                 % Shift left the entire distance
  45   show                          % Show the string
  46 } bind def
  47 /NUMBER {                       % Draw a number
  48                                 % power n NUMBER -
  49   1 index 1 eq {                % power == 1?
  50     round cvi exch pop          % Convert "n" to integer
  51   } {
  52     1 index mul round exch div  % Truncate extra decimal places
  53   } ifelse
  54   100 string cvs show           % Convert to a string and show it...
  55 } bind def
  56 /CUPSLOGO {                     % Draw the CUPS logo
  57                                 % height CUPSLOGO
  58   % Start with a big C...
  59   /Helvetica findfont 1 index scalefont setfont
  60   0 setgray
  61   0 0 moveto
  62   (C) show
  63
  64   % Then "UNIX Printing System" much smaller...
  65   /Helvetica-Bold findfont 1 index 9 div scalefont setfont
  66   0.25 mul
  67   dup dup 2.0 mul moveto
  68   (UNIX) show
  69   dup dup 1.6 mul moveto
  70   (Printing) show
  71   dup 1.2 mul moveto
  72   (System) show
  73 } bind def
  74 /ESPLOGO {                      % Draw the ESP logo
  75                                 % height ESPLOGO
  76   % Compute the size of the logo...
  77   0 0
  78   2 index 1.5 mul 3 index
  79
  80   % Do the "metallic" fill from 10% black to 40% black...
  81   1 -0.001 0 {
  82     dup                 % loopval
  83     -0.15 mul           % loopval * -0.15
  84     0.9 add             % 0.9 - loopval * 0.15
  85     setgray             % set gray shade
  86
  87     0                   % x
  88     1 index neg         % loopval
  89     1 add               % 1 - loopval
  90     3 index             % height
  91     mul                 % height * (1 - loopval)
  92     moveto              % starting point
  93
  94     dup                 % loopval
  95     3 index             % width
  96     mul                 % loopval * width
  97     2 index             % height
  98     lineto              % Next point
  99
 100     0                   % x
 101     2 index             % height
 102     lineto              % Next point
 103
 104     closepath
 105     fill
 106
 107     dup                 % loopval
 108     0.15 mul            % loopval * 0.15
 109     0.6 add             % 0.6 + loopval * 0.15
 110     setgray
 111
 112     dup                 % loopval
 113     neg 1 add           % 1 - loopval
 114     3 index             % width
 115     mul                 % (1 - loopval) * width
 116     0                   % y
 117     moveto              % Starting point
 118
 119     2 index             % width
 120     exch                % loopval
 121     2 index             % height
 122     mul                 % loopval * height
 123     lineto              % Next point
 124
 125     1 index             % width
 126     0                   % y
 127     lineto              % Next point
 128
 129     closepath
 130     fill
 131   } for
 132
 133   0 setgray rectstroke
 134
 135   /Helvetica-BoldOblique findfont 1 index 3 div scalefont setfont
 136   dup 40 div
 137
 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
 141
 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
 146
 147   pop
 148 } bind def
 149 %%EndResource
 150 %%EndProlog
 151 %%Page: 1 1
 152 gsave
 153
 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
 160
 161   /pageWidth pageRight pageLeft sub def % pageWidth = pageRight - pageLeft
 162   /pageHeight pageTop pageBottom sub def% pageHeight = pageTop - pageBottom
 163
 164   /boxWidth                             % width of text box
 165   pageWidth pageHeight lt
 166   { pageWidth 54 mul }
 167   { pageHeight 42 mul }
 168   ifelse def
 169
 170   newpath                               % Clear bounding path
 171
 172   % Create fonts...
 173   /bigFont /Helvetica-Bold findfont     % bigFont = Helvetica-Bold
 174   pageHeight 3 mul scalefont def        % size = pageHeight * 3 (nominally 33)
 175
 176   /mediumFont /Helvetica findfont       % mediumFont = Helvetica
 177   pageHeight 1.5 mul scalefont def      % size = pageHeight * 1.5 (nominally 16.5)
 178
 179   % Offset page to account for lower-left margin...
 180   pageLeft 72 mul
 181   pageBottom 72 mul
 182   translate
 183
 184   % Draw the label at the top and bottom...
 185   0 setgray                             % Color
 186
 187   pageWidth 36 mul                      % Center of page
 188   pageHeight 72 mul                     % Top of page
 189   pageWidth -7 mul add                  % - 2 lines
 190   moveto                                % Position text
 191   bigFont setfont                       % Font
 192   (Confidential) CENTER                 % Show text centered
 193
 194   pageWidth 36 mul                      % Center of page
 195   pageHeight 6 mul                      % Bottom of page
 196   moveto                                % Position text
 197   bigFont setfont                       % Font
 198   (Confidential) CENTER                 % Show text centered
 199
 200   % Job information box...
 201   pageWidth 36 mul 9 add                % x = pageWidth * 1/2 * 72 + 9
 202   boxWidth 0.5 mul sub                  % x-= 1/2 box width
 203   pageHeight 30 mul 9 sub               % y = pageHeight * 1/2 * 72 - 9
 204   boxWidth                              % w = box width
 205   pageHeight 14 mul                     % h = pageHeight * 1/2 * 72
 206   0.5 setgray rectfill                  % Draw a shadow
 207
 208   pageWidth 36 mul                      % x = pageWidth * 1/2 * 72
 209   boxWidth 0.5 mul sub                  % x-= 1/2 box width
 210   pageHeight 30 mul                     % y = pageHeight * 1/4 * 72
 211   boxWidth                              % w = box width
 212   pageHeight 14 mul                     % h = pageHeight * 1/2 * 72
 213
 214   4 copy 1 setgray rectfill             % Clear the box to white
 215   0 setgray rectstroke                  % Draw a black box around it...
 216
 217   % Job information text...
 218   mediumFont setfont                    % Medium sized font
 219
 220   pageWidth 36 mul                      % x = pageWidth * 1/2 * 72
 221   pageHeight 36 mul                     % y = pageHeight * 1/2 * 72
 222   pageHeight 5 mul add                  % y += 2 lines
 223   2 copy                                % Copy X & Y
 224   moveto
 225   (Job ID: ) RIGHT
 226   moveto
 227   ({printer-name}-{job-id}) show
 228
 229   pageWidth 36 mul                      % x = pageWidth * 1/2 * 72
 230   pageHeight 36 mul                     % y = pageHeight * 1/2 * 72
 231   pageHeight 2 mul add                  % y += 1 line
 232   2 copy                                % Copy X & Y
 233   moveto
 234   (Title: ) RIGHT
 235   moveto
 236   ({job-name}) show
 237
 238   pageWidth 36 mul                      % x = pageWidth * 1/2 * 72
 239   pageHeight 36 mul                     % y = pageHeight * 1/2 * 72
 240   pageHeight -1 mul add                 % y -= 1 line
 241   2 copy                                % Copy X & Y
 242   moveto
 243   (Requesting User: ) RIGHT
 244   moveto
 245   ({job-originating-user-name}) show
 246
 247   pageWidth 36 mul                      % x = pageWidth * 1/2 * 72
 248   pageHeight 36 mul                     % y = pageHeight * 1/2 * 72
 249   pageHeight -4 mul add                 % y -= 2 lines
 250   2 copy                                % Copy X & Y
 251   moveto
 252   (Billing Info: ) RIGHT
 253   moveto
 254   ({job-billing}) show
 255
 256   % Then the CUPS logo....
 257   gsave
 258     pageWidth 4 mul
 259     pageWidth 6 mul
 260     translate
 261     pageWidth 9 mul CUPSLOGO
 262   grestore
 263
 264   % And the ESP logo....
 265   gsave
 266     pageWidth 59 mul
 267     pageWidth 6 mul
 268     translate
 269     pageWidth 6 mul ESPLOGO
 270   grestore
 271 % Show the page...
 272 grestore
 273 showpage
 274 %
 275 % End of "$Id: confidential 4494 2005-02-18 02:18:11Z mike $".
 276 %
 277 %%EOF