#include "colors.inc"
#include "textures.inc"
#declare Cam1 =camera {
location<100*cos(clock*2*3.14159),15,50+100*sin(clock*2*3.14159)>
look_at <0,0,50>
}
camera{Cam1}
   light_source{<0,0,0> color White*1}
   light_source{<15,20,10> color White*0.7}
  light_source{<-50, 50,10> color Red*0.7}
  light_source{<50, -50,-50> color White*0.7}
   light_source{<0,-1,-50> color rgb <1,1,1>}
   light_source{<70*cos(clock*2*3.14159),10,50+70*sin(clock*2*3.14159)> color White*0.4}
   
//light_source{<(sqrt(8*49/3),sqrt(8*49/3),49,0.7) col
//Sppp(-sqrt(8*49/3),-sqrt(8*49/3),49,0.7)

   background {color rgb <0.9,0.9,0.9>}



#macro Sp(x0,y0,z0,r0)
    sphere {<x0,y0,z0>   , 0.2
            pigment {rgb <159/255,14/255,14/255>}}
//               pigment {White}}
//               finish { reflection .5 phong .7 }} 
#end

#macro Spp(x0,y0,z0,r0)
    sphere {<x0,y0,z0>   , 0.4
//             pigment{Yellow} }
 pigment{rgb <84/255,124/255,154/255>} }
//             finish { reflection .6 phong .7 }}
#end

#macro Sppp(x0,y0,z0,r0)
    sphere {<x0,y0,z0>   , r0
             pigment{Red} }
   //          finish { reflection .6 phong .7 }}
#end



// fog at the horizon     
fog{distance 300000 color rgb<0.9,0.9,0.9>}




//fog {
	//	distance 500
//		color rgb 0
//		fog_offset 100
//		fog_alt 5
//		fog_type 2
//	}

Sppp(0,0,0,0.7)
Sppp(sqrt(8*49/3),sqrt(8*49/3),49,0.7)
Sppp(-sqrt(8*49/3),-sqrt(8*49/3),49,0.7)