Path: utzoo!utgpu!jarvis.csri.toronto.edu!me!eastick
From: eastick@hammer.me.toronto.edu (Doug Eastick)
Date: Tue Jan  3 12:29:38 EST 1989
Message-ID: <21801.1989Jan3.12:29:38@hammer.me.toronto.edu>
Newsgroups: comp.lang.postscript
Subject: I need a finer setgray
Reply-To: eastick@me.toronto.edu (Doug Eastick)
Distribution: na
Organization: University of Toronto Mechanical Engineering


The gray that is closest to white (0.9) is too coarse for what I want
to do. The box that is being filled in is only about 1/4 inch square.
At a distance the gray looks fine, but up close (it's for Dept.
letterhead) the black dots are too big.

Here's the part to draw the "U" (it's scaled down later):
-------------------
/U
 {
 .9 setgray
 newpath
 2 34 moveto 34 34 lineto 34 0 lineto 2 0 lineto 2 34 lineto closepath fill
 newpath
 38 34 moveto 70 34 lineto 70 0 lineto 38 0 lineto 38 34 lineto closepath fill

 0 setgray
 newpath
 2 -2 moveto 2 0 lineto 34 0 lineto
 34 -34 lineto 34 -2 32 270 180 arcn closepath fill
 newpath
 38 -34 moveto 38 0 lineto 70 0 lineto 70 -2 lineto
 38 -2 32 0 270 arcn closepath fill
 } def
-------------------

If anyone has a routine that will fill the box with a fine gray, I
would appreciate it. Any help would be appreciated. 

Thanks.

-- 
Doug Eastick	eastick@me.UTORONTO.BITNET	UUCP: ...!utai!me!eastick
		eastick@me.toronto.edu