#include "colors.inc"  
#include "golds.inc" 
#include "metals.inc" 
#include "woods.inc"  
#include "transforms.inc"  
#include "shapes.inc" 
#include "math.inc"
#include "glass.inc"
#include "stones.inc" 
#include "textures.inc" 
#include "stars.inc"
#include "shapes2.inc" 
#include "shapesq.inc"


camera {
  location  <0, 10, 100>
  look_at   <0, 10,  0>
  right     x*image_width/image_height   
} 

light_source {
  <50, 20, 70>      
  color rgb 1.0
  //media_interaction off   
} 

light_source {
  <-15, 30, 50>      
  color rgb 1.0
  //media_interaction off      
} 

light_source {
  <0, 50, 50>      
  color rgb 1.0
  //media_interaction off      
}  



#declare marble1= 
union{
superellipsoid {
  <3,  
  3>   
  material{M_Water}
}  
sphere {
  <0, 1, 0> 
  2 
  translate<0,-1,0>
  material{M_Glass3}      
} 
}

#declare marble2=  
sphere {
  <0, 1, 0> 
  2 
  translate<0,-1,0>
  material{M_Vicks_Bottle_Glass}      
} 

#declare marble3=
union{
superellipsoid {
  <2.5,  
  2.5>   
  texture{Brushed_Aluminum}
}  
sphere {
  <0, 1, 0> 
  2 
  translate<0,-1,0>
  material{M_Dark_Green_Glass}      
} 
} 

#declare marble4=
union{
superellipsoid {
  <1,  
  1>   
  texture{T_Stone26}
}
sphere {
  <0, 1, 0> 
  2 
  translate<0,-1,0>
  material{M_NB_Old_Glass}      
}   
}
  




#declare marblebox=
difference{
box {
  <-10, -5, -5>  
  < 10,  5,  5>  
} 
box {
  <-8.7, -4, -4>  
  < 8.7,  4,  6>  
}
scale 2
} 

plane {
  y, 
  -1.0 
  texture{T_Stone24}
} 

plane {
  z, 
  -10.0 
  texture{Brass_Valley}
}  

#declare lid=
difference{
box {
  <-12, -6, 4>  
  < 12,  6,  6>  
}
box {
  <-10, -5, -5>  
  < 10,  5,  5> 
}  
scale 2
}

object{lid texture{T_Wood14} rotate<-20,140,0> translate<10,7.5,28>}
object{marblebox texture{T_Wood20} rotate<0,45,0> translate<-15,9,30>} 

object{marble1 translate<-25,3,35> }
object{marble2 translate<-15,3,30>  }
object{marble3 translate<-10,3,25> }                               
  
object{marble4 translate<-5,3,21>  }
object{marble1 translate<-10,3,35>  }
object{marble3 translate<-17,3,40>  } 
object{marble4 translate<-1,3,28> }

object{marble2 translate<5,1,40> }
object{marble3 translate<0,1,50>}
object{marble4 translate<-15,1,55>} 
object{marble1 translate<-11,1,48>} 
object{marble3 translate<15,1,30>}  
object{marble2 translate<18,1,50>}
object{marble1 translate<10,1,40>} 
object{marble2 translate<-3,1,60> } 
object{marble4 translate<15,1,61>} 
object{marble3 translate<10,1,58>}