#version 3.7;
// final image +w680 +h382

// -- Variables and setup
#declare Debug = no;

global_settings {
	max_trace_level 80
	noise_generator 3
	assumed_gamma 1.0
	}

// -- Some Includes
#include "colors.inc"
#include "grid.inc"

#declare CamPos = <0, 4, -50>;
#declare LookAt = <0,4,0>;
#declare ZF = 1*z;

// -- Camera & Lighting
camera {
	perspective
	location CamPos
	look_at  LookAt
	rotate x*0
	rotate y*60
	right  x*image_width/image_height
	direction ZF
	}

// -- The Main Light
#declare AreaLight = no;
#declare SpotLight = no;
#declare ParaLight = no;
#declare FadePower = 2;

#declare Intensity = function (LD,FD,FP) {pow(1+(LD/FD),FP)/2};

#declare LightPos = <0,0,-499>;
#declare LightDist = vlength(LightPos-<0,0,0>);
#declare FadeDist = 5;

#if (Debug)
	#debug concat ("\nMain:\nFade Distance: ", str(FadeDist,2,4))
	#debug concat ("\nLight Distance: ", str(LightDist,5,4)," \n")
	#debug concat ("Light Intensity: ", str(Intensity (LightDist, FadeDist, FadePower),6,4), "\n\n")
#end

#declare MainLight =
light_source {
 	0, rgb <0.8,0.8,1> *  Intensity (LightDist, FadeDist, FadePower)
	#if (Debug)
		looks_like {sphere {0,1 pigment {rgb <0.8,0.8,1>}} finish {emission 1 diffuse 0}}
	#end
	#if (ParaLight)
		parallel
	#end
	#if (SpotLight)
		spotlight
	#end
	#if (AreaLight)
		area_light x*0.1, y*0.1 10,10 adaptive 1 jitter orient circular
 	#end
	fade_distance FadeDist
 	fade_power FadePower
 	media_interaction off
 	media_attenuation off
 	translate LightPos
 	#if (ParaLight)
		point_at <0,0,0>
	#end
	#if (SpotLight)	
		point_at <0,1,0>
		radius 40
		falloff 50
		tightness 0
	#end
	};

#declare SkyDome =
sphere{0, 1 hollow
	texture {
  	pigment { rgb <0.6,0.6,1> }
		finish {
			ambient 0
			diffuse 0
			emission 1
			}
		}
	};

object { MainLight rotate x*30 rotate y*60 }
object { SkyDome scale 500 }

// the ocean
cylinder {<0,0,0>, <0,-0.1,0>, 500
	texture {
		pigment { Blue }
		}
	}

// the beach
cylinder {<0,0,0>, <0,0.1,0>, 80
	texture {
		pigment { Tan }
		}
	translate <-50,0,50>
	}

cylinder {<0,0,0>, <0,0.1,0>, 80
	texture {
		pigment { Tan }
		}
	translate <50,0,75>
	}

// sea wall
cylinder {<0,0,0>, <0,5,0>, 60
	texture {
		pigment { MediumWood }
		}
	translate <-50,0,50>
	}

cylinder {<0,0,0>, <0,5,0>, 60
	texture {
		pigment { MediumWood }
		}
	translate <50,0,75>
	}

// building's and or cityscape foreground
box {<-15,0,10>, <15,10,10>
	texture {
		pigment { Red }
		}
	rotate y*-30
	translate <-25,5,0>
	}

// building's and or cityscape background
cylinder {<0,0,0>, <0,15,0>, 12.5
	texture {
		pigment { Green }
		}
	translate <50,5,50>
	}

cylinder {<0,0,0>, <0,30,0>, 12.5
	texture {
		pigment { Yellow }
		}
	translate <30,5,75>
	}