File:Californian oak and bat silhouette in moonlight 1.png

//

// modified and converted with ivcon to povray format // processed with text processor, saved to include // camera and other stuff removed, color changed ...

// oak made with arbaro utility

1. version 3.0
2. include "colors.inc"
3. include "shapes.inc"

//global_settings { assumed_gamma 2.2 } global_settings { assumed_gamma 1.0 }

camera {   
  
  angle 19 
 
// angle 88
  
location < 100, 10, -1000>

look_at < 0, 250, 0>

right < 4/3, 0, 0>
up < 0, 1, 0 >
sky < 0, 1, 0 >

}

#declare FIIX1 = 270-14 ;  
#declare FIIY1 = 0 ; 
 
 // maybe NOK  

1. declare movey=cos(radians(FIIY1))*1;
2. declare movez=cos(radians(FIIX1))*1;

light_source { <0,sin(radians(14))*1e9,cos(radians(14))*1e9 > 1 }

 sky_sphere {
 pigment {
   gradient y  
  
       poly_wave 0.6
   //    cubic_wave
    

     color_map { 
  
  
  
  #declare mm = 0.0; 
  #declare pp= 1.0;
  #declare rr=1.00;
  

   #while(mm <= 1.0)
       
   //#declare rr=exp(-pp*10)*0.5 ;   
   //#declare rr=exp(-pp/3)*1; 
   
   #declare rr=exp(-pp*0.25)*0.25;  
    
     // #declare rr=1-mm;
    
  #declare cc=<rr,rr,rr+0.05>;   
   
   
       # if (mm<0.003)
     #declare rr=15;
     
       #declare cc=<rr,rr,rr>; 
   #end
    
   
   # if (mm>0.4)
     #declare rr=0.001;
     
       #declare cc=<0.0,0.0,0.03> ;
   #end
    
    
    
    
  
 
          
   [mm rgb cc]

   #declare mm=mm+0.01;  
   
   #declare pp=pp+1;
    
   
   #end
            
     
    
  
      

        }
   
   rotate x*FIIX1
   rotate y*FIIY1
   
 }

}

plane { y,0.1

texture { pigment { color <0,.01,0> }

}

}

 /*

// thin clouds

plane { y,100000

texture {

   pigment {
   // dents  
    granite
   pigment_map  {
       [0 rgbt <0,0,0,1>]
       [1 rgbt <0.1,0.1,0.1,0>]
       }

    scale 10000*10
   

   }

   finish {
   reflection 0.5
   }
   

}

}

 */

// more thick clouds
 

#declare Kloud1=pigment { average
 pigment_map {
   [1 planar]
    [1 granite turbulence 0.05 scale 1 ]
//  [1 bozo turbulence 0.5 scale 30 ] 
  //    [1 granite turbulence 0.25 scale 10 ]

//turbulence 2.0 omega 0.5 scale 50 ]
 //  [1 bumps turbulence 0.1 scale 10 ]
 }

 scale 20000

}

box { <-50000,-20,-50000>,<50000,20,50000> hollow

 texture { 
 pigment { rgbt 1 } 
 
 
 }
 
 interior {
   media {
    

    scattering { 1 0.6 } method 3 samples 30,100 intervals 1
    
     
     density { pigment_pattern { Kloud1 }
    
     density_map { [.8 rgb 0][.999 rgb 1] } 
    //    density_map { [0 rgb 1][.5 rgb 0] } 
       
            
     
     
     }     
     
     
   }
 }  
 
 translate y*5000 
 
 

}

//#include "./povtree/birchen1.inc"

1. include "./arbaro/ca_black_oak_1.inc"

1. declare oak=union {

        object { ca_black_oak_13_stems
               pigment {color rgb 0.01} }
        object { ca_black_oak_13_leaves
               texture { pigment {color rgb 1} 
                         finish { ambient 0 diffuse 0 }}}
        rotate 90*y }
        object { ca_black_oak_13_stems
               scale 0.7 rotate 45*y
           //    translate <WIDTH*0.33,HEIGHT*0.33,WIDTH>
               pigment {color rgb 0.01} 
               
               
      }
          
          
          
          
          

object {

oak
scale 30   
rotate y*100    

 no_shadow

// translate y*20 }

1. include "bat1.inc"

object {

bat1 scale 14

//rotate <70,40,20>

rotate <-60,35,20>

translate y*335 translate x*125

}