#include "colors.inc"
#include "shapes.inc"
#include "textures.inc"

camera {
  location <0 ,4.5, -6>
  up <0 1 0>
  right <1 0 0>
  look_at <0 2 0>
}

default { finish { ambient 0.40}} 

/*object { light_source { < 10, 7, -10>  color White }} */
object { light_source { < 0, 2, 0>  color White }}
/*
object { light_source { < 10, 7, -10> 
	                color White 
	                spotlight
	                point_at <-2, 1, 0>
		      }
       } 

*/
/* A green plane for the table */

object { plane { <0,1,0>, 0 } pigment { DMFLightOak }}

/* And a green wall all about us */

object {difference{
        sphere { <0,0,0> 30 }
        sphere { <0,0,0> 29 }
    }
    pigment  {Blue_Sky2 scale <20 , 20 , 20> } 
}

object { 
    union {
        difference {         /* This part is the cup */
             cone { <0,2,0> 0.1 <0,3,0> 1.3 }
             cone { <0,2.2,0> 0.0 <0,3.01,0> 1.295 }
        }
	/* and this is the stem */
        cone { <0,2,0> 0.1 <0,0.2,0> 0.1 }
	/* and finally add in the base */
	difference {
	    cone { <0,0.2,0> 0.2 <0, 0,0> .8}
	    cone { <0,0.18,0> 0.0 <0, 0,0> 0.77}
	}
    }
    pigment  {White filter 0.9} 
    finish {
	 ior 1.5
	 refraction 1
    }
}

object {
    difference {
       cone { <0,2.2,0> 0.0 <0,3.01,0> 1.295 }
       cone { <0, 2.75, 0> 5 <0,3.5,0> 5}
    }
    pigment  { color Aquamarine filter 0.75} 
    finish {
	 ior 1.33
	 refraction 1
    }
}

#declare die=union {
     difference {
       box { <-1, -1, -1>, <1, 1, 1> }  
       box { <-0.98, -0.98, -0.98>, <0.98, 0.98, 0.98> }  
       /* the 1 spot */
       sphere { <0, 0, -1> 0.15 }
       /* The 2 spots */
       sphere { < -0.5, 1, 0.5> 0.15 }
       sphere { <  0.5, 1,-0.5> 0.15 }
       /* The 3 spots */
       sphere { <1, 0, 0> 0.15 }
       sphere { <1, -0.5, 0.5> 0.15 }
       sphere { <1,  0.5,-0.5 > 0.15 }
       /* the 4 spots */
       sphere { < -1, 0.5, 0.5> 0.15}
       sphere { < -1, -0.5, 0.5> 0.15}
       sphere { < -1, 0.5, -0.5> 0.15}
       sphere { < -1, -0.5, -0.5> 0.15}
       /* The 5 spots */
       sphere { < -0.5, -1, 0.5> 0.15 }
       sphere { <  0.5, -1,-0.5> 0.15 }
       sphere { <  0.5, -1, 0.5> 0.15 }
       sphere { < -0.5, -1,-0.5> 0.15 }
       sphere { <  0 , -1, 0> 0.15 }
       /* The 6 spots */
       sphere { < 0.5 , 0.5, 1> 0.15 }
       sphere { <-0.5 , 0.5, 1> 0.15 }
       sphere { < 0.5 ,-0.5, 1> 0.15 }
       sphere { <-0.5 ,-0.5, 1> 0.15 }
       sphere { < 0.5 , 0.0, 1> 0.15 }
       sphere { <-0.5 , 0.0, 1> 0.15 }
       texture{
           pigment { color  red 0.99 green 0.90 blue 0.92}
           finish { phong 0.5 }
       }
    }
    light_source { < 0, 0, 0>  color White }
  /*  box { <-0.98, -0.98, -0.98>, <0.98, 0.98, 0.98> }  
    pigment { color Red} */
    bounded_by { sphere { <0,0,0> , 2.1}}
}


object {
    die
    rotate < 0, 0, 90>
    rotate < 0, 72, 0>
    scale <0.45,0.45,0.45>
    translate <-1,0.6,2.5>
}

object {
    die
    rotate < 0, -180, 0>
    scale <0.45,0.45,0.45>
    translate <1,0.6,4>
}

object {
    die
    rotate < 0, 30, 0>
    scale <0.45,0.45,0.45>
    translate <-2.5,0.6,2>
}