Article View: comp.lang.postscript
Article #956PostScript Toolset: More Comments & CircleSolid.ps
From: Clayton Cramer
Date: Tue, 29 Aug 1989 22:41
Date: Tue, 29 Aug 1989 22:41
20 lines
1162 bytes
1162 bytes
Always passing in starting coordinates. If you really want to put
the object at the current point, use currentpoint to put it on the
stack. This gives a uniformity of calling method.
%!
/CircleSolid
{% draw a circle
% (x center, y center, radius, gray)
gsave
/Gray exch def /Radius exch def /Y exch def /X exch def
newpath X Y Radius 0 360 arc closepath Gray setgray fill
grestore} bind def
%%DEMO
300 400 100 0.9 CircleSolid
showpage
--
Clayton E. Cramer {pyramid,pixar,tekbspa}!optilink!cramer
"No man is an island" is the beginning of the end of personal freedom.
----------------------------------------------------------------------------
Disclaimer? You must be kidding! No company would hold opinions like mine!
Technical Details
Message-ID:
<2255@optilink.UUCP>Path:
arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.csd.uwm.edu!lll-winken!tekbspa!optilink!cramerShow Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.csd.uwm.edu!lll-winken!tekbspa!optilink!cramer From: cramer@optilink.UUCP (Clayton Cramer) Newsgroups: comp.lang.postscript Subject: PostScript Toolset: More Comments & CircleSolid.ps Message-ID: <2255@optilink.UUCP> Date: 29 Aug 89 22:41:05 GMT Organization: Optilink Corporation, Petaluma, CA Lines: 20