// Last edited on 2003-04-12 08:04:44 by stolfi
#include "colors.inc"
#include "stones.inc"

background{color Gray80}

#declare ctr = <0,0,0>;
#declare vis = <  0.00, 0.00, -20.00 >;
#declare cam = vis + 10*y;

light_source {
  ctr + 20*<3,15,-8>
  color 0.8*White
} 

light_source {
  ctr + 10*(vrotate(vis, 20*y) + 2*y)
  color 1.2*White
} 

camera {
  location  ctr + 1.5*cam
  right 1.2*x up 0.4*y
  sky y
  look_at  ctr
}

#declare gerador = seed(123456);

plane{y,-3 texture {T_Stone15}}

#declare fileira =
  union {
    #declare i=0;
    #while (i<3)
      box {<-2-4*i,-3,-6>,<-4*i,7,30> pigment {color Brown}}
      box {<2+4*i,-3,-6>,<4+4*i,7,30> pigment {color Brown}}
    #declare i=i+1;
    #end
  }

#declare prateleira =
  union {
    #declare i=0;
    #while (i<3)
      #declare j=0;
      #while (j<3)
        box {<-2-4*i+1.2,-2+3*j,-7>,<-4*i+1,0+3*j,31> pigment {color Yellow}}
        box {<-2-4*i-1,-2+3*j,-7>,<-4*i-1,0+3*j,31> pigment {color Yellow}}
        box {< 2+4*i-1,-2+3*j,-7>,<4+4*i-1.2,0+3*j,31> pigment {color Yellow}}
        box {< 2+4*i+1.2,-2+3*j,-7>,<4+4*i+1,0+3*j,31> pigment {color Yellow}}
      #declare j=j+1;
      #end
    #declare i=i+1;
    #end
}

#declare produtos =
  union {
    #declare i=0;
    #while (i<10)
      #declare j=0;
      #while (j<3)
        #declare k=0;
        #while (k<3)
          box {<-0.5-4*k,-2.0+3*j,-5+2*i>,<0-4*k,-1.0+3*j,-4+2*i> pigment {color Black}}
          box {<-2-4*k,-2.0+3*j,-5+2*i>,<-1.5-4*k,-1.0+3*j,-4+2*i> pigment {color Black}}
          box {<2+4*k,-2.0+3*j,-5+2*i>,<2.5+4*k,-1.0+3*j,-4+2*i> pigment {color Black}}
          box {<3.5+4*k,-2.0+3*j,-5+2*i>,<4+4*k,-1.0+3*j,-4+2*i> pigment {color Black}}
 	#declare k=k+1;
 	#end
      #declare j=j+1;
      #end
    #declare i=i+1;
  #end
}

union {
  object {produtos}
  difference {
    object {fileira}
    object {prateleira}
  }
}