#include "colors.inc"
  #include "shapes.inc"
  #include "textures.inc"        
  
   sky_sphere {
     
   pigment {
      gradient y
      color_map {
        [(1-cos(radians( 30)))/2 color <0.9, 0.0, 0.0> ]
        [(1-cos(radians(120)))/2 color <0.0, 0.0, 0.05> ]     // Sky Sphere -- From Red to Black
      }      
      
      scale 2
      translate -1
     
    }      
     
   pigment {
     granite
     color_map {
            [ 0.000  0.270 color rgb < 0, 0, 0> color rgbt < 0, 0, 0,1> ]
            [ 0.270  0.280 color rgb <.5,.5,.4> color rgbt <.8,.8,.4,1> ]
            [ 0.280  0.470 color rgb < 0, 0, 0> color rgbt < 0, 0, 0,1> ]
            [ 0.470  0.480 color rgb <.4,.4,.5> color rgbt <.4,.4,.8,1> ]
            [ 0.480  0.680 color rgb < 0, 0, 0> color rgbt < 0, 0, 0,1> ]
            [ 0.680  0.690 color rgb <.5,.4,.4> color rgbt <.8,.4,.4,1> ]
            [ 0.690  0.880 color rgb < 0, 0, 0> color rgbt < 0, 0, 0,1> ]
            [ 0.880  0.890 color rgb <.5,.5,.5> color rgbt < 1, 1, 1,1> ]
            [ 0.890  1.000 color rgb < 0, 0, 0> color rgbt < 0, 0, 0,1> ]    // Here are the stars
     }
    turbulence 0.1
    sine_wave
    scale .5
    }
    
  pigment {
      bozo
      turbulence 0.4
      octaves 6
      omega 0.7
      lambda 2
      color_map {
          [0.0 0.1 color rgb <0.3, 0.3, 0.3>
                   color rgb <0.44, 0.3, 0.22>]
          [0.1 0.5 color rgb <0.55, 0.3, 0.33>
                   color rgbt <.5, .5, .5, 1>]
          [0.5 1.0 color rgbt <.5, .5, .5, 1>
                   color rgbt <.5, .5, .5, 1>]                          //These are the wispy clouds
      }
      
      scale <1, 0.1, 0.2>
      }
                            
        
                
   }
         
  #declare grain_truck = union {
           box { <3,4,5>, <9,1,0> pigment {color <0.4,0.4,0.4>}        }      //grain truck box
           box { <0,0,5>, <-0.3,1.7,0> pigment {color <0.4,0.4,0.4>}        } //front bumper
           box { <3,0.2,5>, <0,2,0> pigment {color <0.0,0.3,0.0>}   }           //Cab
           box { <3,0.2,5>, <1,3,0> pigment {color <0.0,0.3,0.0>}   }           //Cab top
           
           cylinder {
                <2, 0, -0.3>,     // Center of one end
                <2, 0, 0>,     // Center of other end
                .8         // Radius
                pigment {color <0.1,0.1,0.1>}  //LF wheel
                }                                                               //One of the wheels      
                
           cylinder {
                <7, 0, -0.3>,     // Center of one end
                <7, 0, 0>,     // Center of other end
                .9         // Radius
                pigment {color <0.1,0.1,0.1>}  //LF wheel
                }                                                               //Another wheel
     
           light_source {
                <9.1,1,2>
                color Red
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1
                point_at <11, 0, 2>
                }     
        
           light_source {
                <9.1,1,2>
                color Red
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1
                point_at <11, 0, 4>
                }                                                               //Brake lights
 }
                                                                                                        
    #declare combine = union {
            box { <0,-6,0>, <8,-10,4> pigment {color <0.4,0,0>}  }                 //hopper
            box { <1,-9,-.1>, <8,-9.3,-.1> pigment {color <.6,.6,.6>}   }           //side sticker
            box { <1,-9,4.1>, <8,-9.3,4.1> pigment {color <.6,.6,.6>}      }           //side sticker
            
            box { <-1.5,-7,-0.01>, <-0.5,-5.2,0.01> pigment {color <0,0,0>}      }     //cab window
            box { <-1.5,-7,-4.99>, <-0.5,-6.0,5.01> pigment {color <0,0,0>}        }     //cab window
            box { <-2.1,-8,0>, <-2.1,-6,-2> pigment {color <0,0,0>}}                      //front window
            
            box { <-3,-4.6,0>, <0,-4.95,-2> pigment {color <.6,.6,.6>}        }          //cab top
            
            box { <-4,-12,-5>, <-1,-10,5> pigment {color <.4,0,0>}    }                 //pick-up
            box { <-2,-9,0>, <0,-5,-2> pigment {color <.4,0,0>}     }                    //cab
            box { <-1,-12,1>, <7,-10,3> pigment {color <.2,0,0>}      }                   //chassis 
                  
                      light_source {
                <8.1,1,2>
                color Red
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1
                point_at <10, 0, 2>
                }                                               //Brake Light
             
            cylinder {
                <2, -12, -1>,     // Center of one end
                <2, -12, 0>,     // Center of other end
                2.0         // Radius
                pigment {color <0.1,0.1,0.1>}              //LF wheel
                }
     
            cylinder {
                <6, -12, -1>,     // Center of one end
                <6, -12, 0>,     // Center of other end
                0.8          // Radius
                pigment {color <0.1,0.1,0.1>}               //LR wheel
                }
     
            cylinder {
                <2, -12, 4>,     // Center of one end
                <2, -12, 5>,     // Center of other end
                1.6           // Radius
                pigment {color <0.1,0.1,0.1>}    //RF wheel
                }
            cylinder {
                <6, -12, 4>,     // Center of one end
                <6, -12, 5>,     // Center of other end
                0.8          // Radius
                pigment {color <0.6,0.6,0.6>}      //LR wheel
                }
             
            cylinder {
                <2, -12, -1.1>,     // Center of one end
                <2, -12, -1.0>,     // Center of other end
                .8           // Radius
                pigment {color <0.6,0.6,0.6>}               //LF wheel
                }
     
            cylinder {
                <6, -12, -1.1>,     // Center of one end
                <6, -12, 1.0>,     // Center of other end
                0.4          // Radius
                pigment {color <0.6,0.6,0.6>}          //LR wheel
                }
     
            cylinder {
                <2, -12, 5.1>,     // Center of one end
                <2, -12, 5.0>,     // Center of other end
                .8           // Radius
                pigment {color <0.6,0.6,0.6>}                  //RF wheel
                }
            cylinder {
                <6, -12, 5.1>,     // Center of one end
                <6, -12, 5.0>,     // Center of other end
                0.4          // Radius
                pigment {color <0.6,0.6,0.6>}                //LR wheel
                }
    
            cylinder {
                <1, -6, 0>,     // Center of one end
                <6, -6, -10>,     // Center of other end
                0.4            // Radius
                pigment {color <.65,0,0>}                  //auger
   
                }                                  
  
            cylinder {
                <6, -6, -10>,     // Center of one end
                <6, -7.4, -10>,     // Center of other end
                0.4            // Radius
                pigment {color <.65,0,0>}                 //auger
                }                                  
    
            cylinder {
                <-3.3, -11, -4>,     // Center of one end
                <-3.3, -11, 4>,     // Center of other end
                1.5           // Radius
                pigment {color <0.1,0.1,0.1>}                 // pick-up wheel
                }
  
            light_source {
                <6,-7.4,-9>
                color White
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1       
                
                point_at <6, -12, -9>
                }
            
            light_source {
                <6,-7.4,-9>
                color White
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1
                point_at <7, -12, -8>
                }
  
            //light_source {
             //   <6,-7.4,-9>, rgb <1,1,1>                        //Auger Lights
              //  }
           
           light_source {
                <-4, -9, 3>
                color White
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1
                point_at <-9, -15, 13>
                }    
          light_source {
                <-4, -9, 3>
                color White
                spotlight
                radius 70
                fade_distance 20
                falloff 70
                tightness 1
                point_at <-9, -15, 7>
                }
          light_source {
                <-4, -9, 3>
                color White
                spotlight
                radius 70
                falloff 210
                fade_distance 20
                tightness 1
                point_at <-9, -15, 3>
                }
                
           light_source {
                <-4, -9, 3>
                color White
                spotlight
                radius 180
                falloff 200
                fade_distance 20
                tightness 1
                point_at <-20, -15, 13>
                }    
          
          light_source {
                <-4, -9, 3>
                color White
                spotlight
                radius 180
                falloff 200
                fade_distance 3
                tightness 1
                point_at <-20, -15, 7>
                }
          
          light_source {
                <-4, -9, 3>
                color White
                spotlight
                radius 180
                falloff 200
                fade_distance 20
                tightness 1
                point_at <-20, -15, 3>
                }
           
           light_source {
                <-4, -9, -3>
                color White
                spotlight
                radius 180
                falloff 200
                fade_distance 20                
                tightness 1
                point_at <-10, -15, 13>
                }    
                
           light_source {
                <-4, -9, -3>
                color White
                spotlight
                radius 180
                falloff 200
                tightness 1
                fade_distance 20                
                point_at <-10, -15, 7>
                }
          
          light_source {
                <-4, -9, -3>
                color White
                spotlight
                radius 180
                falloff 200
                tightness 1
                fade_distance 3
                point_at <-10, -15, 0>                                        //A whole bunch of lights
                }
                                                        
                } //combine union               
              
     object {grain_truck rotate <0,14,0> translate <11,-12,-60>}
       
     object {combine translate <0,0,-4> rotate <0,0,0>}
              
   
   plane {y,-12
    texture {
      pigment {
        color <.85, .5, .15>
      }
     finish {
        ambient .2
        diffuse .6
        crand .5
      }
      normal {
        ripples .2
        turbulence .25
        frequency 5
      }               
      scale 20
      translate 50*x                                            //All the wheat
    }
  }       
               
  light_source { <0, 0, -140> color <0.4,0.4,0.3> }
  
    camera {
    location <0, 0, 0>
    look_at  <0, 0,  1.0>
    aperture 0.4     // a nice compromise
    }