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










 
  
  
  


   






  

  




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

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

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

#declare semente = seed(421969);

#declare MIN_RAIO = 0.002;

#macro randomico(a,b)
  rand(semente)*(b-a)+a;
#end






#macro galho(base, vetor, L, raio)
 #if (raio > MIN_RAIO)
 #local topo = base + L*vetor;
 union{
 cylinder {base,topo,raio texture { tinta_Tronco} }
 #local L_linha = randomico(L/2,L)
 #local raio_linha = randomico(0,raio)
  #local x1 = randomico(-0.5,0.5);
  #local y1 = randomico(-0.5,0.5);
  #local z1 = randomico(-0.5,0.5);
  #local vetor1 = vetor + <x1,y1,z1>;
  galho(topo, vnormalize(vetor1), L_linha, raio_linha)
 #local L_duaslinhas = randomico(L/2,L) 
 #local raio_duaslinhas = randomico(0,raio)
  #local x2 = randomico(-0.5,0.5);
  #local y2 = randomico(-0.5,0.5);
  #local z2 = randomico(-0.5,0.5);
  #local vetor2 = vetor + <x2,y2,z2>;
  galho(topo, vnormalize(vetor2), L_duaslinhas, raio_duaslinhas)
 }
 #else
  sphere { base, raio*30 texture {tinta_Folha} }
 #end
 
#end

object {
  galho(<0,0,0>,<0,1,0>,1.5,0.5) translate<0,-1.2,0>
}

// Original camera parameters:
// #local cam_ctr = <0,2,0>
// #local cam_vec = (<1,9,-50>-<0,2,0>)
// #local cam_sky = y

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