this was a lot harder than I thought :-/

I had to make a polygon-clipping macro to make sure all edges were 
smooth.  My first try on this just used intersections, but the results 
were ugly and way too, well, CSG'ish :)
So now I'm subdividing polygons into smaller polygons, and using a 
roundprism() macro I found (still waiting for permission to use and 
redistribute it, so at the moment I can't give anyone this 
greeble-macro) for the smooth edges.

Things to do: well... add the greebling itself of course :)

cu!
-- 
#macro G(b,e)b+(e-b)*C/50#end#macro _(b,e,k,l)#local C=0;#while(C<50)
sphere{G(b,e)+3*z.1pigment{rgb G(k,l)}finish{ambient 1}}#local C=C+1;
#end#end _(y-x,y,x,x+y)_(y,-x-y,x+y,y)_(-x-y,-y,y,y+z)_(-y,y,y+z,x+y)
_(0x+y.5+y/2x)_(0x-y.5+y/2x)            // ZK http://www.povplace.com

Post a reply to this message

Attachments:
Download 'polygongreebles.jpg' (61 KB)

Preview of image 'polygongreebles.jpg'