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

camera {
   location <-22.5, 8.0, -22.0>
   direction <0.0, 0.0, FoV_30>
   look_at <3.0, 0.0, 0.0>
}

/* planet */
#declare Planet = object 
  {
    sphere { <0.0,0.0,0.0> 3.0 }
    texture {   /* map of the earth */
      pigment { image_map {gif "bigwld.gif" map_type 1 }}
    }
    texture {   /*clouds*/
      pigment {
	bozo
	turbulence 1.0
	colour_map {
	   [0.0 0.6  color red 1.0 green 1.0 blue 1.0 filter 1.0
		     color red 1.0 green 1.0 blue 1.0 filter 1.0]
	   [0.6 0.99 color red 1.0 green 1.0 blue 1.0 filter 1.0
		     color red 1.0 green 1.0 blue 1.0 filter 0.5]
	   [0.99 1.0 color red 1.0 green 1.0 blue 1.0 filter 0.5
		     color red 1.0 green 1.0 blue 1.0 filter 0.4]
	}
	scale <0.9, 0.3, 0.9>
	rotate <10.0, 0.0,  10.0>
      }
    }
    texture {    /* more clouds */
      pigment {
	bozo
	turbulence 1.0
	colour_map {
	   [0.0 0.6 color red 1.0 green 1.0 blue 1.0 filter 1.0
		    color red 1.0 green 1.0 blue 1.0 filter 1.0]
	   [0.6 0.9 color red 1.0 green 1.0 blue 1.0 filter 1.0
		    color red 0.95 green 0.95 blue 0.9]
	   [0.9 1.0 color red 0.95 green 0.95 blue 0.9
		    color red 0.95 green 0.95 blue 0.9]
	}    
	scale <0.65, 0.2, 0.65>
      }
      finish {
	 ambient 0.0
	 diffuse 1.0
      }
      normal {
	bumps 0.3
	scale 0.15
      }
    }
  }

/* space between the pieces */
#declare Gap=0.01;

/* front center piece */

object {
  intersection {
    difference {
      difference {
	union {
	  object {Planet}
	

	  object {
	    sphere { <0.0,0.0,0.0> 3.03}
	    texture { 
	      pigment {
		bozo
		turbulence 1.0
		colour_map {
		    [0.0 0.6  color red 1.0 green 1.0 blue 1.0 filter 1.0
			      color red 1.0 green 1.0 blue 1.0 filter 1.0]
		    [0.8 0.99 color red 1.0 green 1.0 blue 1.0 filter 1.0
			      color red 1.0 green 1.0 blue 1.0 filter 0.5]
		    [0.99 1.0 color red 1.0 green 1.0 blue 1.0 filter 0.5
			      color red 1.0 green 1.0 blue 1.0 filter 0.4]
		}
		scale <1.0, 0.2, 1.0>
		rotate <14.0, 0.0,  14.0>
	      }
	    }
	  }

	}
	box { < -2,-2-Gap,-1-Gap>  <2, Gap-1,Gap+1 > }
      }
      box { < -2,1-Gap,-1-Gap>  <2, Gap+2,Gap+1 > }
    }
    box { < Gap-1,-4,-4> <1-Gap,4,-Gap> } 
  }
  pigment {DMFWood4 scale 3.0 rotate y*30} 
  translate <0.0,0.0,-0.5>
}

/* back center piece */

object {
  intersection {
    difference {
      difference {
	object {Planet}
	box { < -2,-2-Gap,-1-Gap>  <2, Gap-1,Gap+1 > }
      }
      box { < -2,1-Gap,-1-Gap>  <2, Gap+2,Gap+1 > }
    }
    box { < Gap-1,-4, Gap> <1-Gap,4, 4> } 
  }
  pigment {DMFWood4 scale 3.0 rotate y*45} 
}

/* top center piece */

object {
  intersection {
    difference {
      difference {
	difference {
	  object {Planet}
	  box { <-1-Gap, 2-Gap, -2> <Gap+1, 4, 2> }
	}
	box { <-1-Gap, Gap-2, -2> <Gap+1, -4, 2> }
      }
      box { <-2-Gap, -1-Gap, -2> <2+Gap,1+Gap, 2> }
    }
    box { < -4, Gap, Gap-1> <4, 4, 1-Gap> } 
  }
  pigment {DMFWood4 scale 3.0 rotate y*60} 
}

/* bottom center piece */

object {
  intersection {
    difference {
      difference {
	difference {
	  object {Planet}
	  box { <-1-Gap, 2-Gap, -2> <Gap+1, 4, 2> }
	}
	box { <-1-Gap, Gap-2, -2> <Gap+1, -4, 2> }
      }
      box { <-2-Gap, -1-Gap, -2> <2+Gap,1+Gap, 2> }
    }
    box { < -4, -4, Gap-1> <4, -Gap, 1-Gap> } 
  }
  pigment {DMFWood4 scale 3.0 rotate y*75} 
}

/* NW piece */

object {
  intersection {
    union {
      union {
	difference {
	  difference {
	    object {Planet}
	    box { <-1-Gap, -4, -4> <Gap+1, 4, 4> }
	  }
	  box { <-4, -4, -1-Gap> <4, 4, Gap+1> }
	}
	box { <Gap-2, Gap-1, -2> <-1-Gap, 1-Gap, 2> }
      }
      box { <2-Gap, Gap-1, -2> <1+Gap, 1-Gap, 2> }
    }
    box { <-4,Gap, -4> <0,4, 4> }
  }
  pigment {DMFWood4 scale 3.0 rotate x*15} 
  rotate <-30.0,0.0,0.0>
  translate <6.5,0.0,-2.5>
}

/* NE piece */

object {
  intersection {
    union {
      union {
	difference {
	  difference {
	    object {Planet}
	    box { <-1-Gap, -4, -4> <Gap+1, 4, 4> }
	  }
	  box { <-4, -4, -1-Gap> <4, 4, Gap+1> }
	}
	box { <Gap-2, Gap-1, -2> <-1-Gap, 1-Gap, 2> }
      }
      box { <2-Gap, Gap-1, -2> <1+Gap, 1-Gap, 2> }
    }
    box { <0,Gap, -4> <4,4, 4> }
  }
  pigment {DMFWood4 scale 3.0 rotate x*30} 
}

/* SE piece */

object {
  intersection {
    union {
      union {
	difference {
	  difference {
	    object {Planet}
	    box { <-1-Gap, -4, -4> <Gap+1, 4, 4> }
	  }
	  box { <-4, -4, -1-Gap> <4, 4, Gap+1> }
	}
	box { <Gap-2, Gap-1, -2> <-1-Gap, 1-Gap, 2> }
      }
      box { <2-Gap, Gap-1, -2> <1+Gap, 1-Gap, 2> }
    }
    box { <0,-Gap, -4> <4,-4, 4> }
  }
  pigment {DMFWood4 scale 3.0 rotate x*45} 
}

/* SW piece */

object {
  intersection {
    union {
      union {
	difference {
	  difference {
	    object {Planet}
	    box { <-1-Gap, -4, -4> <Gap+1, 4, 4> }
	  }
	  box { <-4, -4, -1-Gap> <4, 4, Gap+1> }
	}
	box { <Gap-2, Gap-1, -2> <-1-Gap, 1-Gap, 2> }
      }
      box { <2-Gap, Gap-1, -2> <1+Gap, 1-Gap, 2> }
    }
    box { <-4,-Gap, -4> <0,-4, 4> }
  }
  pigment {DMFWood4 scale 3.0 rotate x*60} 
}

/* poor man's stars */

sphere { <0.0, 0.0, 0.0>, 3000
   pigment {
      bozo
      turbulence 1.0
      colour_map {
	 [0.0 0.0005 color red 0.9 green 0.9 blue 0.9
		     color red 0.5 green 0.5 blue 0.0]
	 [0.0005 1.0 color red 0.2 green 0.2 blue 0.2 filter 1.0
		     color red 1.0 green 1.0 blue 1.0 filter 1.0]
      
      }
      scale <0.5,0.5,0.5>
   }
   finish { ambient 1.0 }
}

// wierd clouds

object {
  sphere { <0.0,0.0,0.0> 3.03}
  texture { 
    pigment {
      bozo
      turbulence 1.0
      colour_map {
	  [0.0 0.6  color red 1.0 green 1.0 blue 1.0 filter 1.0
		    color red 1.0 green 1.0 blue 1.0 filter 1.0]
	  [0.8 0.99 color red 1.0 green 1.0 blue 1.0 filter 1.0
		    color red 1.0 green 1.0 blue 1.0 filter 0.5]
	  [0.99 1.0 color red 1.0 green 1.0 blue 1.0 filter 0.5
		    color red 1.0 green 1.0 blue 1.0 filter 0.4]
      }
      scale <1.0, 0.2, 1.0>
      rotate <14.0, 0.0,  14.0>
    }
  }
}

/* sun shine */

light_source { <-100.0, 100.0, -200.0> color White }