bb@beach.cis.ufl.edu (Brian Bartholomew) (07/19/90)
What follows is some mediocre Postscript written to print high- contrast, white-on-black labels bearing the notice "MASTER COPY", to be used to denote the master copies of HP-UX documentation which get locked up, and are not to leave the room. It will print on Avery label stock #5160. Directions for installation are in the Postscript. The labels look really sharp on the manuals, and for some graphics art reason that I cannot fathom, they look sharp applied whole to the upper left corners of the booklets, too; the edges of the labels were left white as an attempt to save toner during debugging, and I never changed it. Please send me any substantive changed made by users back by email. I am particularly looking for a barcode label format, perhaps bearing the HP part number and a 1-of-n code, to perhaps be placed under the plastic window on the inside of the spine, in the binder. "Any sufficiently advanced technology is indistinguishable from a rigged demo." ------------------------------------------------------------------------------- Brian Bartholomew UUCP: ...gatech!uflorida!beach.cis.ufl.edu!bb University of Florida Internet: bb@beach.cis.ufl.edu ----- Do the obvious cut thing here. ----- %! % % mastercp.ps % % Created 07/16/90 by Brian Bartholomew - bb@beach.cis.ufl.edu % % Prints "Master Copy" labels onto Avery #5160 labels, useful for % denoting restricted copies of documentation, and specifically % tailored in size to fit on spine card of HP-UX manuals. Take % spine card out of binder, center label horizontally, with top % edge of label lining up and just covering top of white HP logo, % flip card over, and trim off excess. Rub down *softly* with % fingers on face; don't turn over and burnish as toner will % rub off. Stick back into binder, and burnish at will. Note % that font chosen matches, at least to my tin eye, to the font % used to print the titles in on the spine cards. Looks sharp. % % You can uncomment the do_outline line at the bottom, if you % wish to check the alignment of the Postscript with the labels % before you print. Leave it out for the final run, as it will % make a mess on the label edges when it unavoidably doesn't % line up perfectly. % % Don't criticize my Postscript code. I know that it's a hack. % I wrote it as a hack. This is called making the precision of % the solution match the precision of the problem. Let it be. % /do_outline { gsave translate 1.3 0 translate % middle bottom of label 0 0 moveto 1.3 0 1.3 1 0.09 arcto 4 {pop} repeat 1.3 1 -1.3 1 0.09 arcto 4 {pop} repeat -1.3 1 -1.3 0 0.09 arcto 4 {pop} repeat -1.3 0 0 0 0.09 arcto 4 {pop} repeat closepath stroke grestore } bind def /do_fill { gsave translate % lower left corner of label 0 setlinewidth 0.3 -0.05 moveto % +0.05" for a trap 2.3 -0.05 lineto 2.3 1.05 lineto 0.3 1.05 lineto closepath fill 0.05 setlinewidth 1 setgray 0.3 0.125 moveto 2.3 0.125 lineto stroke 0.3 0.875 moveto 2.3 0.875 lineto stroke grestore } bind def /do_text { gsave translate 1.3 0.5 translate % center of label 1 setgray % /Palatino-Bold findfont 0.19 scalefont setfont % /Helvetica-Narrow findfont 0.25 scalefont setfont % Stretch it 32 percent vertically /Palatino-Bold findfont [0.19 0 0 0.25 0 0] makefont setfont (MASTER) dup stringwidth pop 2 div neg 0.045 moveto show (COPY) dup stringwidth pop 2 div neg -0.2 moveto show stroke grestore } bind def 72 72 scale 0.2 0.5 translate 0 setgray 1 300 div setlinewidth 0 2.75 7.25 { /x exch def 0 1 9 { /y exch def % x y do_outline x y do_fill x y do_text } for } for showpage -- "Any sufficiently advanced technology is indistinguishable from a rigged demo." ------------------------------------------------------------------------------- Brian Bartholomew UUCP: ...gatech!uflorida!beach.cis.ufl.edu!bb University of Florida Internet: bb@beach.cis.ufl.edu