#include "colors.inc"
#include "textures.inc"
#include "SPLINE.MCR"
#include "woods.inc"


#declare MySpline = create_spline (
   array [6] {<-2,2,2>, /*<2,-2,2.3>,*/ <0, -1, -0.2>, <-1, -0.3, -1>, <-2,-2, -4>,/* <3,-1,-4>,*/<0, 1, 0.2>, <1, 0.3,1>}
create_default_spline + spline_loop (yes)+ spline_tension (-1)+ spline_bias (1))

camera {right x*4/3 up y
   location <0, 0, 0> look_at z
   animate_by_spline (MySpline, auto_banking (1/2))}

light_source {<0, 1, -1>, rgb 2
   spotlight point_at z*4 radius 30 falloff 33
   animate_by_spline (MySpline, auto_banking (1/4))}

fog {fog_type 2 rgb <0.3, 0.5, 0.7> distance 150 fog_alt 10}

//#declare Cam1 =camera {
//location<4*sin(clock),4*cos(clock),-5>
//look_at <0,0,0>
//}
//camera{Cam1}

   light_source{<150,200,-250> color Yellow*0.7}
   light_source{<-100, 100,200> color Yellow*0.7}
//   light_source{<0,-1,10> color rgb <1,1,1>}
//   light_source{<0,1,-10> color rgb <1,1,1>}
   background {color rgb <0,0,0>}

cylinder{ <-2,-2,-2>, <2,2,2>, 0.009 texture{pigment{color Gold}  finish { reflection .6 phong .7 }}}

#macro Sp(x0,y0,z0,r0)
    sphere {<x0,y0,z0>   , 0.005
               pigment {rgb <64/255,130/255,152/255>}}
//               finish { reflection .5 phong .7 }} 
#end

#macro Spp(x0,y0,z0,r0)
    sphere {<x0,y0,z0>   , 0.008
             pigment{rgb <255/255,174/255,0/255>} }
//             finish { reflection .6 phong .7 }}
#end