> camera{}#macro G(E)sphere{0,.04translate z+E*y*.0015rotate E*z*-1.8pigment{
 > #end light_source{20*y-10,1}#local n=0;#while(n<536)G(n)red 1}}#local n=n+1
 > ;#end#local n=0;#while (n<536)G(-n)rgbt.7}}#local n=n+1;#end // Greg E

light_source{20*y-10,1#macro G(E)union{#local n=0;#while(E*n<536
)sphere{z+n*y*15e-4.04rotate n*z*-1.8}#local n=n+E;#end pigment{
#end}G(1)red 1}}G(-1)rgbt.7}} // Greg E

-- 
merge{#local i=-11;#while(i<11)#local
i=i+.1;sphere{<i*(i*i*(.05-i*i*(4e-7*i*i+3e-4))-3)10*sin(i)30>.5}#end
pigment{rgbt 1}interior{media{emission x}}hollow}//  Mark Weyer

Post a reply to this message