// Last edited on DATE TIME by USER
// Processed by remove-cam-lights






  






  

  




background{ color rgb < 0.75, 0.80, 0.85 > }

#declare tinta_A = 
  texture {
    pigment { color rgb < 1, 0.5, 0 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1}
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1, 0, 0> }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.2 reflection 0.2 }
  }

#declare tinta_C = 
  texture {
    pigment { color rgb < 1, 0.4, 0.5 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 reflection 0.4}
  }

#declare tinta_D = 
  texture {
    pigment { color rgb < 0.10, 0.10, 1.00 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }
  
#declare haste =
  cylinder {
    <0,0,0>,
    <0,0,-18>,0.2
    texture{tinta_A} 
  }

plane{z,-1
  texture{
  pigment{checker color rgb <0.8,0.3,0>,
                  color rgb <1,1,1>
  }
  }
}

#declare semente = seed(1001);
#declare semente2 = seed(5005);
#declare semente3 = seed(10015);
#declare semente4 = seed(6006);
#declare semente5 = seed(7007);
#declare semente6 = seed(8008);

#macro galho (p,w,L,r)
 
 #if (r > 0.1 & (p+L*w).x < 20 & (p+L*w).x > -20 & (p+L*w).y < 20 & (p+L*w).y >-20 & (p+L*w).z<20 & (p+L*w).z > -20)
 
 union{
    cylinder
            { 
              p,
              p+L*w, 
              r 
       texture {tinta_A}
     }
      galho(p+L*w,vnormalize(<rand(semente),rand(semente2),rand(semente3)>), L/1.2, r/1.3)
      galho(p+L*w,vnormalize(<rand(semente4),-rand(semente5),rand(semente6)>) ,L/1.3, r/1.2)
 }
 #else
 union
        {
    sphere
           {p, 
            0.2
         texture {tinta_B}
    }
 }
 #end
#end

galho(<0,0,0>,<0,0,2>,5,1)



// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <22.00,25.00,35.00>
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,0,0>,<10,10,10>,20.0,z,1.0)