#include "colors.inc"
#include "shapes.inc"
#include "glass.inc"
#include "textures.inc"
#include "skies.inc"
background { Gray }

camera {
    location <5,10,-23>
    look_at <6,6,6>
  }
  
light_source { <130, 140,-150> White}
light_source { <130, 140,150> White}
light_source { <130, -140,150> White}

#declare i = 0.5;
#declare g = seed(pi);
#declare altura = seed(pi);
#declare n = 8;
#declare r = 3;
#declare s = 2;


sky_sphere{S_Cloud2}
plane {y,-0.3
     pigment{color Gray}

                }

 #declare corpo =
 blob {
     threshold .10
     sphere {
        < 0.00, 0.00, 1.00 >, 2.00 1
        texture { pigment { color rgb < 0.00, 1.00, 0.00 > }
        normal { bumps 1.3 scale 0.05 }
        finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
        }
     }
     sphere {
     < 0.00, 0.00, 2.75 >, 1.50 1
        texture { pigment { color rgb < 0.00, 1.00, 0.00 > }
        normal { bumps 1.3 scale 0.05 }
        finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
        }
     }
     normal { bumps 0.8 scale 0.7 }
 }

#declare asa =
difference{
   sphere {
      < 0.00, 0.00, 1.00>, 2.80
      texture { pigment { color rgb < 0.00, 1.00, 0.00 > }
      normal { bumps 1.3 scale 0.05 }
      finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
      }
   }
   box {
   < -1.50, 5.00, -5.00 >,
   < 1.50, -5.00, 3.80 >
   }
}

  #declare simbolo =
  union {
    object { asa }
    object { corpo }

  }





union {
   box { <0,0,0>, <15,6,10>
   texture {pigment {color Red }} }

   #while (i < n)
   #if (rand(g)<0.5)
	union {

	#declare r = 4
	#while (r < 12)
	   box{ <r,i,-0.1>,<r + 2,i+0.5,10.2>
	   texture {pigment {color rgb<1,1,0>}} }
	#declare r = r + 3
	#end
  	    } 
      #end
      #declare i=i+2;
   #end
      }

	
object{simbolo translate < 6.00, 8.50, 4.00>}