Path: utzoo!attcan!uunet!decwrl!dogie.macc.wisc.edu!vms.macc.wisc.edu
From: yahnke@vms.macc.wisc.edu (Ross Yahnke, MACC)
Newsgroups: comp.lang.postscript
Subject: ps commands to print "DRAFT"
Message-ID: <3937@dogie.macc.wisc.edu>
Date: 3 Jul 90 16:35:52 GMT
Sender: news@dogie.macc.wisc.edu
Organization: University of Wisconsin Academic Computing Center
Lines: 25

August 1990 MacUser had a tip on how to print the large word "DRAFT"
over a document, using a PS escape font. I've sort of gotten it to
work in Nisus, only problem is the word "DRAFT" obscures the
underlying text - unlike the example in the magazine. Can anybody
suggest what must be done to make the word "DRAFT" transparent?
Here's the code, thanks!:

gsave

initgraphics

/font /Helvetica-Bold def
/pointsize 100 def
/text (DRAFT) def

/center {dup stringwidth pop
2 div neg 0 rmoveto} def
306 396 moveto
90 setgray
font findfont pointsize scalefont setfont
45 rotate
24 0 text center ashow
grestore

>>> yahnke@macc.wisc.edu <<<