On Fri, 14 Mar 2003 11:51:32 +0100, Mark Weyer
<wey### [at] informatikuni-freiburgde> wrote:
> #local n=30;#while(n)sphere{<n-16,0,30>#local
> n=n-1;5-n/5scale y*n/4pigment{rgb<1,.5,1/3>*n}}#end

#macro _(n)sphere{<n-15no 30>5-n/5pigment{rgb<n
n/2n/3>}scale y*n/4}#if(n)_(n-1)#end#end#_(30)

ABX

Post a reply to this message