// Persistence of Vision Ray Tracer, POV 3
// Dateiname: GEORGE2.POV :RUBIC's CUBE - fraktalisiert
// (c) Asti, 1997
//Die Definitionen der platonischen K”rper sind aus SHAPESQ.INC

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

global_settings { assumed_gamma 2.0}


light_source {<-20, 40, -20> color Orchid}
light_source {<4,2,-10> color Blue}
light_source {<2,-1,-5> color White}

camera
{
  location  <-3.5 ,4,-7.5>
  direction   <0,0,1>
  up        y
  right     4/3*x
  look_at   <0,0,0>   
/*    focal_point < 0,0,-1>    
    aperture 0.6     // grӇere Zahl ergibt kleineren scharfen Ausschnitt
    blur_samples 8   //bestimmt die Anz. der LS, die auf einen Punkt treffen
*/

}
        box { <-1,-1,-1>,<1,1,1>
           texture {pigment {color SeaGreen }} 
           finish {
              ambient 0.7
              diffuse 0.6
              metallic
              phong 0.5
              phong_size 10
           }   
           no_shadow
           rotate <-10,-15,0>
           scale .7
           translate <-2,2,0>
        }  
   
#declare Tetrahedron =
 intersection 
  {plane {-y,1}
   plane {-z,1 rotate <19.47,    0, 0>}
   plane {-z,1 rotate <19.47, -120, 0>}
   plane {-z,1 rotate <19.47,  120, 0>}
  }

object {
   Tetrahedron
           texture {pigment {color SeaGreen }} 
           finish {
              ambient 0.7
              diffuse 0.6
              metallic
              phong 0.5
              phong_size 10
           }   
rotate <15,-135,-70>
translate <2,2.5,0>
scale 0.6
}//end object



#declare Octahedron = 
 intersection 
  {plane { z, 1 rotate < 35.26438968275, 0, 0>}
   plane { z, 1 rotate <-35.26438968275, 0, 0>}
   plane {-z, 1 rotate < 35.26438968275, 0, 0>}
   plane {-z, 1 rotate <-35.26438968275, 0, 0>}
   
   plane { x, 1 rotate <0, 0, -35.26438968275>}
   plane { x, 1 rotate <0, 0,  35.26438968275>}
   plane {-x, 1 rotate <0, 0, -35.26438968275>}
   plane {-x, 1 rotate <0, 0,  35.26438968275>}
  }

object {
   Octahedron
           texture {pigment {color SeaGreen }} 
           finish {
              ambient 0.7
              diffuse 0.6
              metallic
              phong 0.5
              phong_size 10
           }   
rotate <-35,-135,-90>
translate <3.4,-2.4,0>
scale 0.9
}//end object


#declare Dodecahedron = 
 intersection 
  {plane {-z, 1 rotate <-26.56505117708,    0, 0>}
   plane {-z, 1 rotate <-26.56505117708,  -72, 0>}
   plane {-z, 1 rotate <-26.56505117708, -144, 0>}
   plane {-z, 1 rotate <-26.56505117708, -216, 0>}
   plane {-z, 1 rotate <-26.56505117708, -288, 0>}
   
   plane {-z, 1 rotate <26.56505117708,  -36, 0>}
   plane {-z, 1 rotate <26.56505117708, -108, 0>}
   plane {-z, 1 rotate <26.56505117708, -180, 0>}
   plane {-z, 1 rotate <26.56505117708, -252, 0>}
   plane {-z, 1 rotate <26.56505117708, -324, 0>}
   
   plane { y, 1}
   plane {-y, 1}
  }

object {
   Dodecahedron
           texture {pigment {color SeaGreen }} 
           finish {
              ambient 0.7
              diffuse 0.6
              metallic
              phong 0.5
              phong_size 10
           }   
rotate <-35,-125,-70>
translate <-0.3,-0.3,0>
scale 0.9
}//end object


#declare Icosahedron = 
 intersection 
  {plane {-z, 1 rotate <52.6625,    0, 0>}
   plane {-z, 1 rotate <52.6625,  -72, 0>}
   plane {-z, 1 rotate <52.6625, -144, 0>}
   plane {-z, 1 rotate <52.6625, -216, 0>}
   plane {-z, 1 rotate <52.6625, -288, 0>}
   
   plane {-z, 1 rotate <10.8125,    0, 0>}
   plane {-z, 1 rotate <10.8125,  -72, 0>}
   plane {-z, 1 rotate <10.8125, -144, 0>}
   plane {-z, 1 rotate <10.8125, -216, 0>}
   plane {-z, 1 rotate <10.8125, -288, 0>}
   
   plane {-z, 1 rotate <-52.6625,  -36, 0>}
   plane {-z, 1 rotate <-52.6625, -108, 0>}
   plane {-z, 1 rotate <-52.6625, -180, 0>}
   plane {-z, 1 rotate <-52.6625, -252, 0>}
   plane {-z, 1 rotate <-52.6625, -324, 0>}
   
   plane {-z, 1 rotate <-10.8125,  -36, 0>}
   plane {-z, 1 rotate <-10.8125, -108, 0>}
   plane {-z, 1 rotate <-10.8125, -180, 0>}
   plane {-z, 1 rotate <-10.8125, -252, 0>}
   plane {-z, 1 rotate <-10.8125, -324, 0>}
  }


object {
   Icosahedron
           texture {pigment {color SeaGreen }} 
           finish {
              ambient 0.7
              diffuse 0.6
              metallic
              phong 0.5
              phong_size 10
           }   
rotate <-35,-125,-30>
translate <-2.8,-1.6,0>
scale 0.9
}//end object