Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!rutgers!apple!mjohnson
From: mjohnson@Apple.COM (Mark B. Johnson)
Newsgroups: comp.sys.mac
Subject: Re: Postscript fragment needed
Message-ID: <31665@apple.Apple.COM>
Date: 25 May 89 22:41:17 GMT
References: <13222@dartvax.Dartmouth.EDU> <17431@usc.edu>
Organization: Apple Computer Inc, Cupertino, CA
Lines: 31

In article <17431@usc.edu> minkus@lesath.usc.edu (Bob Minkus) writes:
>In article <13222@dartvax.Dartmouth.EDU> jonathan@eleazar.dartmouth.edu (Jonathan Altman) writes:
>>various bits of postscript in MSWord documents to do nice things
>>like borders around pages, etc.  One nice tip that was given was how
>>to print the word "draft" in a 5% gray on entire pages.  I saw the
>>tip on how to do this and said "that'd be neat" but didn't save the
>>postscript fragment.  Now I have a need to distribute a draft of a

This works nicely.  Put it as the first thing in a header which appears on
on every page.  Be sure to set the style to PostScript...

% fonts
/t/Times-BoldItalic findfont 96 scalefont def

% 15 0 {exch pop} setscreen

150 500 translate	% position on page

.9 setgray
2 0 moveto
t setfont (Draft) show



Mark B. Johnson                                            AppleLink: mjohnson
Developer Technical Support                         domain: mjohnson@Apple.com
Apple Computer, Inc.         UUCP:  {amdahl,decwrl,sun,unisoft}!apple!mjohnson

"You gave your life to become the person you are right now.  Was it worth it?"
                                                         - Richard Bach, _One_