Uhhh...  the code didn't come out right...

#while ( theta < 2*pi )
#local phi = 0;   #while ( phi < pi )
#local vary = rand(seed1);
#local Start = <r*sin(phi)*sin(theta), r*cos(phi), r*sin(phi)*cos(theta)>;
#local Inter = trace ( S, Start, <0,0,0> - Start, Norm );
cylinder { Inter, Inter + Norm*vary*.5, .025
texture { T_Chrome_2B } }
#local phi = phi + pi/Number;
#end
#local theta = theta + 2*pi/Number;
#end

Does this work?

Post a reply to this message