🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.postscript
Article #2425

ps commands to print "DRAFT"

#2425
From: Ross Yahnke, MACC
Date: Tue, 03 Jul 1990 16:35
25 lines
1035 bytes
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 <<<
Technical Details
Message-ID: <3937@dogie.macc.wisc.edu>
Path: arc1-ca.pugleaf.net!utzoo!attcan!uunet!decwrl!dogie.macc.wisc.edu!vms.macc.wisc.edu

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!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