// Last edited on DATE TIME by USER
// Processed by remove-cam-lights
background{ color rgb < 0.75, 0.80, 0.85 > }
#declare raio = 2.000;
plane { y, -2
texture {
pigment { checker color rgb < 0.40, 0.20, 0.30 >, color rgb < 0.50, 0.20, 0.40 > }
finish { ambient 0.1 diffuse 0.9 }
scale 0.5
}
}
#macro arvore(a,b,c)
union{
sphere{
,0.3
pigment{ color rgb <0.5,0.6,0.3>}
}
#if(b>0)
cylinder{
,
,0.1
pigment{ color rgb <0.8,0.2,0.2>}
}
object{arvore(a+b*b,b-1,c)}
cylinder{
,
,0.1
pigment{ color rgb <0.2,0.2,0.8>}
}
object{arvore(a,b-1,c-b*b)}
cylinder{
,
,0.1
pigment{ color rgb <0.2,0.8,0.2>}
}
object{arvore(a-b*b,b-1,c)}
cylinder{
,
,0.1
pigment{ color rgb <0.7,0.7,0.7>}
}
object{arvore(a,b-1,c+b*b)}
#end
}
#end
object{arvore(0,5,0)}
#include "camlight.inc"
camlight(<0,0,0>,<10.00,20.00,50.00>,1.00,y,1.0)