: #macro c()union{cylinder{x+y/2x.1}difference{torus{.5,.1rotate 90*x}box{x+z/5
: ,-.2-(x+y)/2}translate(1-z)/2}#end merge{c()}c()scale<-1,1,1>}cylinder{y/2,0,
: .1}pigment{crackle scale.5rotate 90turbulence.75color_map{[.05rgb 1][.1rgb<1,
: .25,1>][.25rgbf 1]}}finish{ambient 1}}camera{location-2*z+y/4look_at y/2}

  Well, I think I can beat that:

#macro c(X)torus{.5.1clipped_by{box{<.7.2><-.7,-.2.7>}}rotate-90*x translate
x*X}#end #macro C(A)cylinder{A,A-y*.5.1}#end merge{c(.5)c(-.5)C(x)C(-x)C(0)
translate z*2pigment{crackle scale.5rotate 90turbulence.75color_map{[.05rgb
1][.1rgb<1,.25,1>][.25rgbf 1]}}finish{ambient 1}}

  Ok, the texture is not identical to the original, but I don't think it
matters that much.

-- 
#macro N(D,I)#if(I<6)cylinder{M()#local D[I]=div(D[I],104);M().5,2pigment{
rgb M()}}N(D,(D[I]>99?I:I+1))#end#end#macro M()<mod(D[I],13)-6,mod(div(D[I
],13),8)-3,10>#end blob{N(array[6]{11117333955,
7382340,3358,3900569407,970,4254934330},0)}//                     - Warp -

Post a reply to this message