// Last edited on 2009-07-22 12:56:28 by stolfilocal
// Processed by remove-cam-lights

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

#declare raio = 2.000;

#declare tinta_A = 
  texture {
    pigment { color rgb < 0.10, 0.80, 1.00 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

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

#declare box1 = 
box{ 
    <0,0,0>
    <0.5,2,3.1>
texture { tinta_B }
}

#declare box2 = 
box{ 
    <0,0,0>
    <0.6,2.1,0.5>
    texture { tinta_A }
}

#declare armario =
difference{
 object{box1}
 object{box2 translate<0.1,0,0> translate<0,-0.01,0> translate<0,0,2.5> }
 object{box2 translate<0.1,0,0> translate<0,-0.01,0> translate<0,0,1.9> }
 object{box2 translate<0.1,0,0> translate<0,-0.01,0> translate<0,0,1.3> }
 object{box2 translate<0.1,0,0> translate<0,-0.01,0> translate<0,0,0.7> }
 object{box2 translate<0.1,0,0> translate<0,-0.01,0> translate<0,0,0.1> }
}

union{
#declare i=5; 
#declare roleta=seed(415);
#declare largura=1.9;
#declare altura=0.4;
#declare profundidade=0.3;

#declare lar=0;
#declare alt=0;
#declare prof=0;

#declare totL =0;

#while(i>0)
 #declare n=int(rand(roleta)*20);
 #if(n<10) 
  #declare prof=rand(roleta)*profundidade; 
  #declare alt=rand(roleta)*altura; 
  #if(totL < largura)
   
   #declare obj=
    cylinder {
         < 0, 0, 0> , 
         < 0, 0 ,alt> ,
          prof/2
         texture { tinta_C }
      }

      object{obj translate< 0.3,0,0> translate< 0,totL+0.01+prof/2, 0> translate <0,0,3.1 - ((6 - i)*0.6) > }

      object{obj translate< 0.3,0,0> translate< 0,totL+0.01+prof/2, 0> translate <0,0,3.0 - ((6 - i)*0.6) > }

   #declare totL= totL+0.01+prof/2;
   #else
  #end
 
 #else 

 #end
#declare i=i-1;
#declare totL=0;
#end

object{armario}
object{armario translate<0,-3,0> }
object{armario translate<1,0,-3.2> }
}

// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <8.00,4.00,2.00>
// #local cam_sky = z

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