#include "rand.inc"
#include "colors.inc"
#include "metals.inc"
#include "rad_def.inc"
#include "functions.inc"

background { 
   color rgb <0,0,0> 
}

global_settings {
   ambient_light rgb <1,1,1>
   assumed_gamma 2
   max_trace_level 8
}

#declare VP = <0,0,0>;
#declare VD = <0,0,1>;
#declare VU = <1,0,0>;
camera {
   fisheye
   location VP
   up y
   right -image_width*x/image_height
   angle 180
   sky VU
   look_at VP + VD
}

#declare thetexture = texture {
   pigment {
      rgb 1.2*<0.5,0.5,0.75>
   }
   finish {
      ambient 0.1
      brilliance 2
      diffuse 0.7
      specular 0.2
      roughness 0.1
      reflection 0.3
   }
}

// Lights
light_source {
  <10,0,1>
  color <1,1,1>
}
light_source {
  <0,10,1>
  color <1,1,1>
}
light_source {
  <0,0,10>
  color <1,1,1>
}
light_source {
  <0,0,0>
  color <0.8,1,0.8>
}

#declare stage1 = object {
	superellipsoid { <0.15,0.15> scale 0.5 }
}

#declare stage2 = union {
   object { stage1 translate <-1.5,-1.5,-1.5> }
   object { stage1 translate <-1.5,-0.5,-1.5> }
   object { stage1 translate <-1.5, 0.5,-1.5> }
   object { stage1 translate <-1.5, 1.5,-1.5> }
   object { stage1 translate < 1.5,-1.5,-1.5> }
   object { stage1 translate < 1.5,-0.5,-1.5> }
   object { stage1 translate < 1.5, 0.5,-1.5> }
   object { stage1 translate < 1.5, 1.5,-1.5> }
   object { stage1 translate <-0.5, 1.5,-1.5> }
   object { stage1 translate < 0.5, 1.5,-1.5> }
   object { stage1 translate <-0.5,-1.5,-1.5> }
   object { stage1 translate < 0.5,-1.5,-1.5> }

   object { stage1 translate <-1.5,-1.5,1.5> }
   object { stage1 translate <-1.5,-0.5,1.5> }
   object { stage1 translate <-1.5, 0.5,1.5> }
   object { stage1 translate <-1.5, 1.5,1.5> }
   object { stage1 translate < 1.5,-1.5,1.5> }
   object { stage1 translate < 1.5,-0.5,1.5> }
   object { stage1 translate < 1.5, 0.5,1.5> }
   object { stage1 translate < 1.5, 1.5,1.5> }
   object { stage1 translate <-0.5, 1.5,1.5> }
   object { stage1 translate < 0.5, 1.5,1.5> }
   object { stage1 translate <-0.5,-1.5,1.5> }
   object { stage1 translate < 0.5,-1.5,1.5> }

   object { stage1 translate <-1.5,-1.5,-0.5> }
   object { stage1 translate <-1.5,-1.5, 0.5> }
   object { stage1 translate < 1.5, 1.5,-0.5> }
   object { stage1 translate < 1.5, 1.5, 0.5> }
   object { stage1 translate <-1.5, 1.5,-0.5> }
   object { stage1 translate <-1.5, 1.5, 0.5> }
   object { stage1 translate < 1.5,-1.5,-0.5> }
   object { stage1 translate < 1.5,-1.5, 0.5> }

   scale 1/4
}

#declare stage3 = union {
   object { stage2 translate <-1.5,-1.5,-1.5> }
   object { stage2 translate <-1.5,-0.5,-1.5> }
   object { stage2 translate <-1.5, 0.5,-1.5> }
   object { stage2 translate <-1.5, 1.5,-1.5> }
   object { stage2 translate < 1.5,-1.5,-1.5> }
   object { stage2 translate < 1.5,-0.5,-1.5> }
   object { stage2 translate < 1.5, 0.5,-1.5> }
   object { stage2 translate < 1.5, 1.5,-1.5> }
   object { stage2 translate <-0.5, 1.5,-1.5> }
   object { stage2 translate < 0.5, 1.5,-1.5> }
   object { stage2 translate <-0.5,-1.5,-1.5> }
   object { stage2 translate < 0.5,-1.5,-1.5> }

   object { stage2 translate <-1.5,-1.5,1.5> }
   object { stage2 translate <-1.5,-0.5,1.5> }
   object { stage2 translate <-1.5, 0.5,1.5> }
   object { stage2 translate <-1.5, 1.5,1.5> }
   object { stage2 translate < 1.5,-1.5,1.5> }
   object { stage2 translate < 1.5,-0.5,1.5> }
   object { stage2 translate < 1.5, 0.5,1.5> }
   object { stage2 translate < 1.5, 1.5,1.5> }
   object { stage2 translate <-0.5, 1.5,1.5> }
   object { stage2 translate < 0.5, 1.5,1.5> }
   object { stage2 translate <-0.5,-1.5,1.5> }
   object { stage2 translate < 0.5,-1.5,1.5> }

   object { stage2 translate <-1.5,-1.5,-0.5> }
   object { stage2 translate <-1.5,-1.5, 0.5> }
   object { stage2 translate < 1.5, 1.5,-0.5> }
   object { stage2 translate < 1.5, 1.5, 0.5> }
   object { stage2 translate <-1.5, 1.5,-0.5> }
   object { stage2 translate <-1.5, 1.5, 0.5> }
   object { stage2 translate < 1.5,-1.5,-0.5> }
   object { stage2 translate < 1.5,-1.5, 0.5> }

   scale 1/4
}

#declare stage4 = union {
   object { stage3 translate <-1.5,-1.5,-1.5> }
   object { stage3 translate <-1.5,-0.5,-1.5> }
   object { stage3 translate <-1.5, 0.5,-1.5> }
   object { stage3 translate <-1.5, 1.5,-1.5> }
   object { stage3 translate < 1.5,-1.5,-1.5> }
   object { stage3 translate < 1.5,-0.5,-1.5> }
   object { stage3 translate < 1.5, 0.5,-1.5> }
   object { stage3 translate < 1.5, 1.5,-1.5> }
   object { stage3 translate <-0.5, 1.5,-1.5> }
   object { stage3 translate < 0.5, 1.5,-1.5> }
   object { stage3 translate <-0.5,-1.5,-1.5> }
   object { stage3 translate < 0.5,-1.5,-1.5> }

   object { stage3 translate <-1.5,-1.5,1.5> }
   object { stage3 translate <-1.5,-0.5,1.5> }
   object { stage3 translate <-1.5, 0.5,1.5> }
   object { stage3 translate <-1.5, 1.5,1.5> }
   object { stage3 translate < 1.5,-1.5,1.5> }
   object { stage3 translate < 1.5,-0.5,1.5> }
   object { stage3 translate < 1.5, 0.5,1.5> }
   object { stage3 translate < 1.5, 1.5,1.5> }
   object { stage3 translate <-0.5, 1.5,1.5> }
   object { stage3 translate < 0.5, 1.5,1.5> }
   object { stage3 translate <-0.5,-1.5,1.5> }
   object { stage3 translate < 0.5,-1.5,1.5> }

   object { stage3 translate <-1.5,-1.5,-0.5> }
   object { stage3 translate <-1.5,-1.5, 0.5> }
   object { stage3 translate < 1.5, 1.5,-0.5> }
   object { stage3 translate < 1.5, 1.5, 0.5> }
   object { stage3 translate <-1.5, 1.5,-0.5> }
   object { stage3 translate <-1.5, 1.5, 0.5> }
   object { stage3 translate < 1.5,-1.5,-0.5> }
   object { stage3 translate < 1.5,-1.5, 0.5> }

   scale 1/4
}

/*
#declare stage5 = union {
   object { stage4 translate <-1.5,-1.5,-1.5> }
   object { stage4 translate <-1.5,-0.5,-1.5> }
   object { stage4 translate <-1.5, 0.5,-1.5> }
   object { stage4 translate <-1.5, 1.5,-1.5> }
   object { stage4 translate < 1.5,-1.5,-1.5> }
   object { stage4 translate < 1.5,-0.5,-1.5> }
   object { stage4 translate < 1.5, 0.5,-1.5> }
   object { stage4 translate < 1.5, 1.5,-1.5> }
   object { stage4 translate <-0.5, 1.5,-1.5> }
   object { stage4 translate < 0.5, 1.5,-1.5> }
   object { stage4 translate <-0.5,-1.5,-1.5> }
   object { stage4 translate < 0.5,-1.5,-1.5> }

   object { stage4 translate <-1.5,-1.5,1.5> }
   object { stage4 translate <-1.5,-0.5,1.5> }
   object { stage4 translate <-1.5, 0.5,1.5> }
   object { stage4 translate <-1.5, 1.5,1.5> }
   object { stage4 translate < 1.5,-1.5,1.5> }
   object { stage4 translate < 1.5,-0.5,1.5> }
   object { stage4 translate < 1.5, 0.5,1.5> }
   object { stage4 translate < 1.5, 1.5,1.5> }
   object { stage4 translate <-0.5, 1.5,1.5> }
   object { stage4 translate < 0.5, 1.5,1.5> }
   object { stage4 translate <-0.5,-1.5,1.5> }
   object { stage4 translate < 0.5,-1.5,1.5> }

   object { stage4 translate <-1.5,-1.5,-0.5> }
   object { stage4 translate <-1.5,-1.5, 0.5> }
   object { stage4 translate < 1.5, 1.5,-0.5> }
   object { stage4 translate < 1.5, 1.5, 0.5> }
   object { stage4 translate <-1.5, 1.5,-0.5> }
   object { stage4 translate <-1.5, 1.5, 0.5> }
   object { stage4 translate < 1.5,-1.5,-0.5> }
   object { stage4 translate < 1.5,-1.5, 0.5> }

   scale 1/4
}

#declare stage6 = union {
   object { stage5 translate <-1.5,-1.5,-1.5> }
   object { stage5 translate <-1.5,-0.5,-1.5> }
   object { stage5 translate <-1.5, 0.5,-1.5> }
   object { stage5 translate <-1.5, 1.5,-1.5> }
   object { stage5 translate < 1.5,-1.5,-1.5> }
   object { stage5 translate < 1.5,-0.5,-1.5> }
   object { stage5 translate < 1.5, 0.5,-1.5> }
   object { stage5 translate < 1.5, 1.5,-1.5> }
   object { stage5 translate <-0.5, 1.5,-1.5> }
   object { stage5 translate < 0.5, 1.5,-1.5> }
   object { stage5 translate <-0.5,-1.5,-1.5> }
   object { stage5 translate < 0.5,-1.5,-1.5> }

   object { stage5 translate <-1.5,-1.5,1.5> }
   object { stage5 translate <-1.5,-0.5,1.5> }
   object { stage5 translate <-1.5, 0.5,1.5> }
   object { stage5 translate <-1.5, 1.5,1.5> }
   object { stage5 translate < 1.5,-1.5,1.5> }
   object { stage5 translate < 1.5,-0.5,1.5> }
   object { stage5 translate < 1.5, 0.5,1.5> }
   object { stage5 translate < 1.5, 1.5,1.5> }
   object { stage5 translate <-0.5, 1.5,1.5> }
   object { stage5 translate < 0.5, 1.5,1.5> }
   object { stage5 translate <-0.5,-1.5,1.5> }
   object { stage5 translate < 0.5,-1.5,1.5> }

   object { stage5 translate <-1.5,-1.5,-0.5> }
   object { stage5 translate <-1.5,-1.5, 0.5> }
   object { stage5 translate < 1.5, 1.5,-0.5> }
   object { stage5 translate < 1.5, 1.5, 0.5> }
   object { stage5 translate <-1.5, 1.5,-0.5> }
   object { stage5 translate <-1.5, 1.5, 0.5> }
   object { stage5 translate < 1.5,-1.5,-0.5> }
   object { stage5 translate < 1.5,-1.5, 0.5> }

   scale 1/4
}
*/

union {
   stage4
	//rotate <30,0,0>
	//rotate <0,45,0>
	//translate <0,0,0.8>
   texture { thetexture }
}

fog {
   distance 200
   color rgb 0.8*<0.9,0.3,0.1>
   turbulence 0.6
   turb_depth 0.5
   fog_type 2
   fog_offset 20
   fog_alt 4
   rotate <90,0,0>
}

#local SCALESKY = 0.75;

sky_sphere { 
   pigment { 
      function { max(min(y,1),0) }
      color_map {
                        [  0/269 color rgb <120/255, 79/255, 51/255>*SCALESKY]
                        [  1/269 color rgb <141/255, 83/255, 46/255>*SCALESKY]
                        [  2/269 color rgb <177/255, 86/255, 41/255>*SCALESKY]
                        [  3/269 color rgb <235/255,128/255, 72/255>*SCALESKY]
                        [  5/269 color rgb <255/255,159/255, 72/255>*SCALESKY]
                        [  8/269 color rgb <255/255,203/255, 94/255>*SCALESKY]
                        [ 10/269 color rgb <255/255,218/255,112/255>*SCALESKY]
                        [ 13/269 color rgb <255/255,233/255,148/255>*SCALESKY]
                        [ 15/269 color rgb <251/255,241/255,172/255>*SCALESKY]
                        [ 20/269 color rgb <255/255,246/255,203/255>*SCALESKY]
                        [ 30/269 color rgb <255/255,240/255,219/255>*SCALESKY]
                        [ 40/269 color rgb <236/255,223/255,214/255>*SCALESKY]
                        [ 50/269 color rgb <205/255,204/255,212/255>*SCALESKY]
                        [ 55/269 color rgb <185/255,190/255,209/255>*SCALESKY]
                        [ 60/269 color rgb <166/255,176/255,201/255>*SCALESKY]
                        [ 65/269 color rgb <149/255,163/255,190/255>*SCALESKY]
                        [ 70/269 color rgb <129/255,149/255,182/255>*SCALESKY]
                        [ 80/269 color rgb <103/255,127/255,171/255>*SCALESKY]
                        [ 90/269 color rgb < 79/255,110/255,154/255>*SCALESKY]
                        [100/269 color rgb < 66/255, 97/255,143/255>*SCALESKY]
                        [110/269 color rgb < 52/255, 84/255,131/255>*SCALESKY]
                        [120/269 color rgb < 47/255, 75/255,122/255>*SCALESKY]
                        [140/269 color rgb < 37/255, 60/255,102/255>*SCALESKY]
                        [160/269 color rgb < 32/255, 51/255, 84/255>*SCALESKY]
                        [180/269 color rgb < 27/255, 42/255, 71/255>*SCALESKY]
                        [200/269 color rgb < 25/255, 36/255, 58/255>*SCALESKY]
                        [220/269 color rgb < 22/255, 31/255, 48/255>*SCALESKY]
                        [240/269 color rgb < 18/255, 27/255, 42/255>*SCALESKY]
                        [260/269 color rgb < 15/255, 21/255, 33/255>*SCALESKY]
                        [269/269 color rgb < 15/255, 21/255, 33/255>*SCALESKY]
        }
   }
   rotate <90,0,0>
}