Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!apple!netcom!wasilko From: wasilko@netcom.UUCP (Jeff Wasilko) Newsgroups: comp.lang.postscript Subject: Re: putting 'watermark' on each page? Message-ID: <1856@netcom.UUCP> Date: 22 Jul 89 07:00:19 GMT References: <25965@agate.BERKELEY.EDU> <3829@phri.UUCP> Reply-To: wasilko@netcom.UUCP (Jeff Wasilko) Distribution: na Organization: NetCom Services - Public Access Unix System (408) 997-9175 guest Lines: 81 I'm not really sure about the best way to do the implementation for this, but here is some PostScript that will print something similar to what you need. I use this from within MS Word (formatted as PostScript style and placed in the header) to print messages such as DRAFT, CONFIDENTIAL etc. Good luck with this. Jeff Wasilko ------------ Article 18124 (61 more) in comp.sys.mac: From: mjohnson@Apple.COM (Mark B. Johnson) 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 (Jonath an 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_ I use this fragment of code (I didnt write it.... but it works...) gsave initmatrix 72 dup scale /Helvetica-Bold findfont 1 scalefont setfont (DRAFT) dup stringwidth pop 4.5 5.5 translate 60 rotate 2 div neg 0 moveto .95 setgray show grestore You can put any characther string in the place of the word draft...(i find that "confidential" is another good word to use...), and then put this into the header of the document. Make sure that you format the text as hidden and of style Postscript (from the PS glossary). Hope that helps.... -Keith =============================================================================== Keith O. Elliston | Usenet: uunet!rob!elliston Senior Information Scientist | Arpanet: rob!elliston@uunet.uu.net Merck Sharp & Dohme Res. Lab. | Bitnet: elliston%rob.uucp@psuvax1 Rahway, NJ 07065 U.S.A. | -or- elliston@biovax =============================================================================== Disclaimer: I can have no OFFICIAL comments about anything........ ===============================================================================