On Tue, 04 Mar 2003 15:16:55 +0100, Jellby <jel### [at] M-yahoocom> wrote:
> Great! Thank you very much, I've been fidling with the macro version too, I 
> had tried that but didn't manage to get it shorter... Well, I hope you 
> don't mind if I take your code and alter the order in a couple of places, 
> hehe. :)

While my version is not short enough to be a sig, I had fun making it as:

#macro S(I,G)#macro a(_ J E L B Y)_,y-J,z-E,L-x,B-y,Y#end,max(x-a(max(I.x
,G.x)max(I.y,G.y)max(I.z,G.z)min(I.x,G.x)min(I.y,G.y)min(I.z,G.z))-z)#end
light_source{y 1}light_source{9+7*x 1}isosurface{function{min(max(y*5+z*4
-x*4S(x-.1.1-z+1))S(-.1+t.1+x)S(z-y-.1.1+z)S(z-.1.1+t))}contained_by{box{
-2 2}}pigment{rgb<.8.2>+z}}camera{orthographic location-z*4+9/4look_at(1-
y)/4angle 30}

ABX

Post a reply to this message