// Persistence of Vision Ray Tracer Scene Description File
// File: .pov
// Vers: 3
// Desc: 
// Date: May 16, 1997 
// Auth: Beth Randall
// A Castle.

#include "colors.inc"	// Standard Color definitions
#include "textures.inc"	// Standard Texture definitions

#declare EndCren = polygon {
	4, 
	<0.5, 0>, <0.5, 1>, <0.75, 1>, <0.75, 0>
}

#declare Crenellate = union {
	polygon {
  	6, // number of points
  		<0, 0.6>, <0, 1>, <0.25, 1>, <0.25, 0.75>, <0.5, 0.75>, <0.5, 0.6>
	}
	polygon
	{
		8,
		<0, 0>, <0, 0.6>, <0.2, 0.6>, <0.2, 0.3>,
		<0.3, 0.3>, <0.3, 0.6>, <0.5, 0.6>, <0.5, 0>
	}
}

#declare Wall = union {
	object { Crenellate translate <0.5, 0, 2> }
	object { Crenellate translate <1, 0, 2> }
	object { Crenellate translate <1.5, 0, 2>}
	object { Crenellate translate <2, 0, 2>}
	object { EndCren translate <2, 0, 2> }
	pigment{ rgb <1, 0.4, 0.4> }
}

#declare Door = polygon {
	5,
	<-0.25, 0>, <-0.25, 1>, 
	<0, 1.25>, <0.25, 1>, <0.25, 0>
	pigment {Black}
}

#declare Windows = union {
	polygon {
		4, 
		<-0.85, 0>, <-0.85, 0.65>, <-0.55, 0.65>, <-0.55, 0>
	}
	polygon {
 		4,
		<0.55, 0>, <0.55, 0.65>, <0.85, 0.65>, <0.85, 0>
	}
	pigment {Black}
}

#declare Tower = union {
	lathe {
  		linear_spline 
  		10, 
  		<1.5,0>, <1.5, 0.5>, <1.25, 0.5>, <1.25, 1>, <1, 1>,
  		<1, 3>, <1.25, 3>, <1.25, 3.5>, <1.5, 3.5>, <1.5, 4>
		pigment{ Red }
  		finish { 
    		ambient .3      
    		phong .75 
  		}
	}
	object {Door translate <0, 0.5, -1>}
	object {Windows	translate <0, 2, -0.75>}
}	

object {Tower translate <0, 0, 3>}
object {Wall  scale <2.0, 3.0, 2.0>}
object {Tower translate <-4, 0, 8>}
object {Wall translate <-3.65, 0, 0> rotate <0, 35, 0> 
	scale <2.0, 3.0, 2.0>}
object {Wall translate <-2, 0, 5> scale <2.0, 3.0, 2.0> pigment {Black}}
object {Wall translate <0, 0, 5> scale <2.0, 3.0, 2.0> pigment {Black}}

plane {z, 15
	texture {
		pigment {SkyBlue}
		finish {ambient 1 diffuse 0}
 	}
	texture {
		pigment {
			bozo
			turbulence .5
			color_map {
				[0 White]
				[1 White filter 1]
		}
	}
	finish { ambient 1 diffuse 0}
	scale <1000, 250, 250>
	rotate <1, 45, 0>
	}
}

camera {  
  angle 10
  location <1, 9, -50>
  look_at <0, 2, 0>        
}


plane { <0, 1, 0>, 0
	pigment {
		checker rgb <0, 0.8, 0.8>, color Grey
	}
}

light_source { <2, 4, -3> color White }