//a waterfall scene 
//using media statements for the waterfall 
//and the clouds
//by Kurt Bangert
//http://www.travelnotes/de/rays/

global_settings { max_trace_level 100 } //necessary for the bushes
#include "colors.inc"
#include "textures.inc"
#include "media1.inc"
#include "heli.inc"

#declare xscale=100
#declare yscale=100
#declare zscale=100 

light_source { <70, 60, 8.6> color rgb<1.2,1.2,1.2> }
 
camera {location <xscale/2,28,-20.5>
look_at <xscale/2+.8,24.8,0>}

#declare r1 = seed(5); 

//sky sphere
sphere {<0,0,0>1000 hollow pigment {CornflowerBlue}
interior{media{fog1 scale <10,30,10> translate y*17}}
}

object{sphere {<0,0,0> 30 scale <3,1,3> hollow pigment {color rgbt<1,1,1,1>}
interior{media{fog2 scale <15,9,9>} }}  translate <20,20,20>}

object{sphere {<0,0,0> 30 scale <3,1,3> hollow pigment {color rgbt<1,1,1,1>}
interior{media{fog2 scale <15,9,9>} }}  translate <80,20,20>}

#declare delta1=0.5
//#include "bush0.inc"

//mountains
object {height_field { tga "fall.tga" scale <xscale,yscale,zscale> } texture {landtex1 scale 5}}

//helicopter
object{heli scale 0.7 rotate z*0 rotate -y*30 translate <52,8,18>}

//helipad
object{union{
object{ cone {<0,0,0> 7 <0,4,0> 4 }  texture {T1 scale 0.1}}
object{ box  {<-3,0,0> <3,3.98,-10> } texture {T1 scale 0.1}}//street access
object{ box  {<-.9,4,-1.2> <-.7,4.01,1.2> } pigment{White}}
object{ box  {< .9,4,-1.2> < .7,4.01,1.2> } pigment{White}}
object{ box  {<-.8,4,0> <.8,4.01,0.2> } pigment{White}}
object{ torus {3.6,.15} scale <1,0.01,1> translate y*4 pigment {White}}
} rotate -y*20 translate <49,-1,20>}

#declare wf1=  
object{sphere { <0,0,0> 1  scale <.5,10,1>
  pigment {rgbt<0, 1, 1, .9>}
  interior {
    media {wfmedia1 scale <.1,3,.3>}   
    media {wfmedia1 scale <.07,2.7,.3> translate x*.15 }  
    media {wfmedia1 scale <.07,2.7,.3> translate x*.25 }  
    media {wfmedia1 scale <.1,3,.3> translate -x*.18 }
      }} hollow} //end upper part                                 

object {wf1 scale 3.65 translate <43.7,-2,48.2> no_shadow}

#declare wf2= 
object{sphere { <0,.1,0> 1  scale <4,.5,4>
  pigment {rgbt<0, 1, 1, .95>}
  interior {
    media {wfmedia2 scale <5.5,.8,4> translate x*2 }   
      }} hollow} //end upper part                                 

object {wf2 scale 1 translate <43.7,1,47.2> no_shadow}

//pond
object{box{<0,0,0><xscale,1,zscale>} texture {pondtex} texture {pondtex translate x*10}texture {pondtex translate -x*10}}