global_settings { assumed_gamma 2.2 }

#include "colors.inc"
#include "shapes.inc"
  camera {
    location <-20, 20, -30>
    look_at 0
    angle 36
  }
  background { White }
//  light_source { <1000, 500, -800> White }
  light_source { <-1000, 500, -800> White }
//  plane { y, -1.5
//    pigment { checker Green White }
//  }

    #declare Ycount=-2
    #while (Ycount < 0)

    #declare Zcount=-10;
    #while (Zcount < 10)
    

    #declare Xcount=-10;
    #while (Xcount < 10)
      sphere { <Xcount, Ycount, Zcount>, 0.2
        #if (Ycount = -1)
          pigment { Yellow }
        #else
          pigment { Red }
        #end        
      }
      #declare Xcount=Xcount+1;
    #end
    
      #declare Zcount=Zcount+1;
    #end

      #declare Ycount=Ycount+1;
    #end

//    cone { <0,7,0>, 0.5, <0,2,0>, 0 
//        pigment { Yellow }
//    }
    
    #declare Arrow = union {
      cylinder { <0,0,0>, <5,0,0>, 0.2
      }
      cone { <5,0,0>, 0.5, <6,0,0>, 0 
      }
    }

    object { Arrow translate <-7, 0.5, 0> 
    rotate z*-10
    rotate y*270
    pigment { Blue }
    }    

    object { Arrow translate <0, 0.5, 0> 
    rotate z*10
    rotate y*270
    pigment { Blue }
    }    
    object { Arrow translate <0, 0.5, 0> 
    rotate z*10
    rotate y*260
    pigment { Blue }
    }    
    object { Arrow translate <0, 0.5, 0> 
    rotate z*10
    rotate y*280
    pigment { Blue }
    }    

// vertical plane
box { <-20,0,20> <20,20,20.5>
   pigment {White}
   finish {
//      ambient 0.3
      diffuse 0.7
      specular 0.3  roughness 0.05
   }
}

#declare Count=-5
#while (Count < 0)

light_source {
   <-3, -2, 19.2>
   color Green
   cylinder
   point_at <-5, 20, 19>
   tightness 100
   radius 2
   falloff 60
}

// Green spotlight, goes with center cylinder
light_source {
   <0, -2, 19.2>
   color Green
   cylinder
   point_at <0, 20, 19>
   tightness 100
   radius 2
   falloff 60
}

// Blue spotlight, goes with right cylinder
light_source {
   <3, -2, 19.2> color Green
   cylinder
   point_at <5, 20, 19>
   tightness 100
   radius 2
   falloff 60
}

#declare Count=Count+1;
#end