Re: PostScript in PostScript

Article View: comp.lang.postscript

Article #1240

Back to comp.lang.postscript Previous Next

#1240

From: Ben Cranston
Date: Tue, 24 Oct 1989 22:07

39 lines
1661 bytes

In article <1655@atanasoff.cs.iastate.edu> hascall@atanasoff.UUCP (John Hascall) writes:

> %!PS
> gsave
> /Times-Roman findfont 180 scalefont setfont
> newpath 36 550 moveto
> (Groovy) false charpath clip pathbbox
> 2 index sub dup mul exch 3 index sub dup mul add sqrt
> /r exch def pop pop
> -90 1 90 {
>  newpath 36 550 moveto
>  dup cos r mul exch sin r mul rlineto stroke
> } for
> grestore
> showpage
> %
> % John Hascall

%!PS-Adobe
/slashpage {
	newpath
	0 5 1584 { % for
		0 0 2 index moveto lineto
	} for
	stroke
} bind def
/Helvetica-Bold findfont 216 scalefont setfont
612 0 translate 90 rotate % landscape
newpath 0 0 moveto 792 0 lineto 792 612 lineto 0 612 lineto closepath clip
slashpage
(THINK!) dup stringwidth pop -2 div 396 add 220 newpath moveto
true charpath clip
1 setgray fill 0 setgray 792 0 translate -1 1 scale slashpage
showpage

-- 
Sig     DS.L    ('ZBen')       ; Ben Cranston <zben@Trantor.UMD.EDU>
* Computer Science Center Network Infrastructures Group
* University of Maryland at College Park

Technical Details

Message-ID: <5507@umd5.umd.edu>

Path:

arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!tut.cis.ohio-state.edu!gem.mps.ohio-state.edu!uakari.primate.wisc.edu!xanth!ames!haven!umd5!zben

References: <7800@cg-atla.UUCP> <1655@atanasoff.cs.iastate.edu>

Show Full Headers

Complete Article Headers

Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!tut.cis.ohio-state.edu!gem.mps.ohio-state.edu!uakari.primate.wisc.edu!xanth!ames!haven!umd5!zben
From: zben@umd5.umd.edu (Ben Cranston)
Newsgroups: comp.lang.postscript
Subject: Re: PostScript in PostScript
Summary: Well, h*ll, it's only one page...
Keywords: graphical newsgroup
Message-ID: <5507@umd5.umd.edu>
Date: 24 Oct 89 22:07:54 GMT
References: <7800@cg-atla.UUCP> <1655@atanasoff.cs.iastate.edu>
Reply-To: zben@umd5.umd.edu (Ben Cranston)
Distribution: comp
Organization: University of Maryland, College Park
Lines: 39

Reply to Parent Message