#version 3.7;

#include "colors.inc"
#include "functions.inc" 
#include "rad_def.inc"

#include "textures.inc"
#include "stars.inc"
#include "skies.inc"

#declare myMode = 0; // 0: Animation, 1...n  Shots

#declare myClock = frame_number/final_frame;

#declare smoothClock = (sin(myClock*pi-pi/2)+1)/2;       

#warning concat("Frame: ",str(frame_number,3,3))

#declare myRadius = 19;
   

// global_settings { radiosity { Rad_Settings(Radiosity_OutdoorHQ, on, off) } }
global_settings { ambient_light rgb<0,0,0> max_trace_level 100}
       

#declare BoxCount=0;   
#declare BoxNumber=20;
#while (BoxCount < BoxNumber)
        
        #declare BoxSize = 2.2;
        box
        {                            
                <-BoxSize,0,-1+0.1>,
                <BoxSize,BoxSize*4,1>        

        
                rotate 360/BoxNumber*BoxCount * y
                
                translate <sin(BoxCount*2*pi/BoxNumber)*myRadius, -0 ,cos(BoxCount*2*pi/BoxNumber)*myRadius>                                  
        
                texture {Chrome_Texture}
                //pigment { White }
                pigment { White }
                finish { ambient White diffuse 0.8 reflection {0.01 metallic}}            
        }
        
        box
        {                            
                <-BoxSize+0.3,0.3,-1+0.5>,
                <BoxSize-0.3,BoxSize*4-0.3,-1>        
                
                rotate 360/BoxNumber*BoxCount * y
                
                translate <sin(BoxCount*2*pi/BoxNumber)*myRadius, -0 ,cos(BoxCount*2*pi/BoxNumber)*myRadius>                  
                
        
                pigment {Red} finish { ambient 0 diffuse 0 reflection 1.0 }                
        } 
        
  
        #declare BoxCount=BoxCount+1;
#end

plane 
{
        y, -0
        pigment 
        { 
                checker pigment{White}, pigment{Black} 
                translate<0,0,0.5>
        }        
        
        finish { reflection {0.6} }        
        
}
              
              
sky_sphere 
{
    pigment 
    {
        image_map
        {
                jpeg "sky.jpg"                   
        }                        
        scale<1,0.5,1>
        rotate<0,0,0>
    }
}     

light_source
{
        <0,50,0>
        color rgb <1,1,1>*2
        spotlight
        radius 80
        falloff 50
        tightness 20
        point_at <0, 0, 0>
}

#declare distanceCam = 4 + smoothClock*6;
#declare cameraRotationClock = smoothClock + 1/24;

camera 
{           
#if(myMode=0)                           
                
        #declare myZ = -myRadius+1+myClock*2*myRadius;
        
        #if(myClock<0.5)
                #declare myValue = pow((sin(myClock*pi*4-pi/2)+1)/2,5);
        #else                                                          
                #declare myValue = -pow((sin(myClock*pi*4-pi/2)+1)/2,5);
        #end                                                           
        #declare myValue2 = pow((sin(myClock/2*pi*4-pi/2)+1)/2,5);
        
        
        location<myValue*5,2.5+myValue2*3,myZ>
        look_at<0,2.5,myRadius>
        
        rotate<0,0,-myValue*5>
        
#end
#if(myMode=1)                      
        location<0,100,0>
        look_at <0, 0.0, 0.0>
#end

        right x*1920/1080
        //focal_point 0 blur_samples 50 aperture .75
}