//	balls.pov -- Attempting to reproduce rotating ball
//				 image from years ago

#include "colors.inc"
#include "skies.inc"

camera
{
	location <3, 5, -15>
	look_at <0, -2, 0>
	angle 40
}

light_source { <-5, 20, -30> White }
light_source { <10, 50, -20> Gray50 }

sky_sphere { S_Cloud3 }

box
{
	<-5, -2.5, -5>, <5, -2, 5>
	pigment { checker Red White scale 2.5 }
}

#declare Ball = sphere
{
	0, .8
	pigment { Black }
	finish { reflection 1 phong .8 }
}

#declare Count = 0;
#declare Angle = clock * 45;

#while (Count < 8)
	object
	{
		Ball
		translate <4 * cos(radians(Angle)), 0, 4 * sin(radians(Angle))>
	}
	#declare Count = Count + 1;
	#declare Angle = Angle + 45;
#end