//
// Survey Rod, with "Leica" device
// 2012-05-22 mja
//
//
// Pure geometry for the com.agtek.graphics.ShapeFactory
//

// Rod itself
cylinder { <0, 0, 0> <0, 0, 1> 0.083 pigment { color red 1 green 1 blue 1 } }
cylinder { <0, 0, 1> <0, 0, 2> 0.083 pigment { color red 1 green 0 blue 0 } }
cylinder { <0, 0, 2> <0, 0, 3> 0.083 pigment { color red 1 green 1 blue 1 } }
cylinder { <0, 0, 3> <0, 0, 4> 0.083 pigment { color red 1 green 0 blue 0 } }
cylinder { <0, 0, 4> <0, 0, 5> 0.083 pigment { color red 1 green 1 blue 1 } }
cylinder { <0, 0, 5> <0, 0, 6> 0.083 pigment { color red 1 green 0 blue 0 } }

// Pseudo GPS receiver   

// "handle 
// negative y side
polygon { 4, <-0.15, -0.15, 6>,
             < 0.15, -0.15, 6>,
             < 0.15, -0.15, 6.5>,
             <-0.15, -0.15, 6.5>
             pigment { color red 0.5625 green 0.6875 blue 0.4375 } }
// positive y side   
polygon { 4, <-0.15,  0.15, 6>,
             < 0.15,  0.15, 6>,
             < 0.15,  0.15, 6.5>,
             <-0.15,  0.15, 6.5>
             pigment { color red 0.5625 green 0.6875 blue 0.4375 } }       
// negative x side
polygon { 4, <-0.15, -0.15, 6>,
             <-0.15,  0.15, 6>,
             <-0.15,  0.15, 6.5>,
             <-0.15, -0.15, 6.5>
             pigment { color red 0.5625 green 0.6875 blue 0.4375 } }
// positive x side
polygon { 4, < 0.15, -0.15, 6>,
             < 0.15,  0.15, 6>,
             < 0.15,  0.15, 6.5>,
             < 0.15, -0.15, 6.5>
             pigment { color red 0.5625 green 0.6875 blue 0.4375 } }  

// body
cylinder { <0, 0, 6.5> <0, 0, 6.566> 0.566 pigment { color red 0.5625 green 0.6875 blue 0.4375 } } 
cylinder { <0, 0, 6.566> <0, 0, 6.688> 0.666 pigment { color red 0.1 green 0.1 blue 0.1 } } 
cylinder { <0, 0, 6.688> <0, 0, 6.79> 0.566 pigment { color red 0.9 green 0.9 blue 0.9 } } 
  
// Shadow
cylinder { <0, 0, 0.1> <0, 0, 0.15> 0.5 pigment { color red 0 green 0 blue 0 filter 0.1 } }