// Last edited on 2009-07-22 14:29:16 by stolfilocal

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

#declare lat_esquerda =
	box {
		< -1.0, 0.0, 0.0 >,
		< -1.3, 3.0, 0.7 >
		pigment {
			color rgb < 1.0, 0.0, 0.0 >
		}
	}

#declare lat_direito =
	box {
		< -3.0, 0.0, 0.0 >,
		< -3.3, 3.0, 0.7 >
		pigment {
			color rgb < 1.0, 0.0, 0.0 >
		}
	}

#declare prateleira =
	box {
		< -3.0, 2.7, 0.0 >,
		< -1.0, 2.65, 0.6 >
		pigment {
			color rgb < 1.0, 0.0, 0.0 >
		}
	}

union {
  object { lat_esquerda }
  object { lat_direito }
  }
object { prateleira }

#declare i = 0;

#while (i < 4)
	object { prateleira translate < 0.0, i * -0.6, 0.0 > }
	#declare i = i + 1;
#end

#declare roleta = seed(23); 

#declare var1 = 0;

#declare bola = 
	sphere {
		< -2.7, 3.0, 0.0 >,
		0.2
		pigment {
			color rgb < 1.0, 0.0, 1.0 >
		}	
	}

#declare quadrado =
	box {
		< -2.2, 2.9, 0.1 >,
		< -1.8, 3.1, -0.4 >
		pigment {
			color rgb < 1.0, 1.0, 0.0 >
		}  
	}

#declare cone1 = 
  cone {
	  < -2.6, 2.3, -0.1 >, 0.25
	  < -2.6, 2.7, -0.1 >, 0.001
	  pigment {
		  color rgb < 0.0, 1.0, 1.0 >
	  }
  }

#declare j = 0;
#while ( j < 9 )
#declare var1 = int(rand(roleta) * 3);
	#if( var1 = 0)
		#if((j = 0) & (j = 2) & (j = 4)) 
			object { bola }
		#else
			object { bola translate < 0.8, 0, 0 > }
			
		#end
	#end
	#if(var1 = 1)
		#if( (j = 0) & (j = 2) & (j = 4)) 
			object { quadrado }
		#else
			object { quadrado translate < -0.8, 0, 0 > }
		#end
	#end
	#if(var1 = 2)
		#if((j = 0) & (j = 2) & (j = 4)) 
			object { cone1 }
		#else
			object { cone1 translate < 0.8, 0, 0 > }
		#end
	#end
	#declare j = j + 1;
#end	

// Original camera parameters:
// #local cam_ctr = < 0.0, 0.0, 0.0 >
// #local cam_vec = < -4.0, 5.0, -5.0 >
// #local cam_sky = z

#include "camlight.inc"
camlight(<-2,1.5,0>,<10,5,10>,8.0,y,1.0)