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

camera {
   location <0,0,-5>
   direction <0,0,1>
   up <0,1,0>
   right <4/3,0,0>
}

union {

difference {
   sphere {
      <0,0,0>,1
      texture {
         pigment {color Red}
         finish {Metal reflection 0 ambient .4}
      }
   }

union {   
   
      cone {
         <0,0,0>,0 <0,2,0>,1
         texture {
            pigment {color Clear}
         }
      }

      cylinder {
         <-.1,.1,0>,<.1,.1,0>,1.2
         scale <1,.8,1>
         texture {
            pigment {color Clear}
         }
      }

      cylinder {
         <-.1,.1,0>,<.1,.1,0>,1.2
         rotate <0,60,0>
         scale <1,.8,1>
         texture {
            pigment {color Clear}
         }
      }

      cylinder {
         <-.1,.1,0>,<.1,.1,0>,1.2
         rotate <0,-60,0>
         scale <1,.8,1>
         texture {
            pigment {color Clear}
         }
      }
   }
}

sphere {
   <0,0,0>,1
   texture {
      pigment {color Red}
      finish {Metal reflection 0 ambient .4}
   }
   clipped_by {
      plane {
         <0,1,0>,.5
      }
   }
}

sphere {      
   <0,0,0>,.9
   texture {
      pigment {
         hexagon color Cyan filter .3 color Aquamarine filter .3 color 
LightSteelBlue filter .3
         scale .02
      }
      finish { ambient .3 refraction 0 ior 2.54}
         
   }
}

cone {
   <0,.9,0>,1/4,<0,1.075,0>,1/10
   rotate <-60,0,0>
   rotate <0,30,0>
   texture {
      pigment {color Gray15}
   }
}

cylinder {
   <0,.9,0>,<0,1.075,0>,1/10
   rotate <-60,0,0>
   rotate <0,90,0>
   texture {
      pigment {color Red}
   }
}


difference {
   cylinder {
      <0,-1,0>,<0,-.5,0>,1.25
      texture {
         Grnt11
         scale 5
         finish {ambient .4}
      }
      clipped_by {
         plane {
            <0,0,-1>,0
         }
      }
   }

   cylinder {
      <0,-2,0>,<0,0,0>,.75
      texture {
         Grnt11
      }
   }
   scale <2.5,1,1>
   translate <0,.75,.25>
}

difference {
   cylinder {
      <0,-1,0>,<0,-.5,0>,1.25
      texture {
         Grnt11
         finish {ambient .4}
      }
      clipped_by {
         plane {
            <0,0,1>,0
         }
      }
   }

   cylinder {
      <0,-2,0>,<0,0,0>,.75
      texture {
         Grnt11
      }
   }
   scale <2.5,1,1>
   translate <0,.75,-.25>
}

box {
   <-3,-1,-.5>,<-2,-.5,.5>
   texture {
      Grnt11
      finish {ambient .4}
   }
   translate <0,.75,0>
}

box {
   <3,-1,-.5>,<2,-.5,.5>
   texture {
      Grnt11
      finish {ambient .4}
   }
   translate <0,.75,0>
}

  
  
      rotate <-80,0,0>
}

sphere {
   <0,0,0>,1
   texture {
      Starfield
   }
   scale 100000
}


light_source {<0,0,-50> color White}
light_source {<0,0,0> color Green}