File:Some kind of ufo 3 r 1.png

1. include "colors.inc"
2. include "glass.inc"
3. include "golds.inc"
4. include "metals.inc"
5. include "stones.inc"
6. include "woods.inc"
7. include "skies.inc"
8. include "shapes.inc"

camera {

  location <10,1,-20>*0.6  
 look_at   <0,0,0>    
 angle 20    

}

global_settings { ambient_light <1,1,1>*0 }

light_source {

 <100,100,100>*1000*1000*1000    
 color White*1/4        

}

light_source {
 <-0.4,-0.2+0.5,0>    
 color (1*Blue)/4        

}

light_source {
 <0.5,-0.1+0.5,0>    
 color (1*Green)/4        

}

light_source {
 <0.25,-0.3+0.5,0.2>    
 color (1*Red)/4        

}

//Set a background color background { color <1,1,1.2>*0.9 }

sky_sphere {

S_Cloud1

rotate x*30

//pigment {P_Cloud1}

}

1. declare ufop1=union{

/* cone { <0, 0, 0>, 2, <0, -1.5, 0>, 0.6 }

cone { <0, 0, 0>, 2, <0, 1/4, 0>, 1 }  
 cone { <0, 1/4, 0>, 1, <0, 1, 0>, 0.6 } 

• /

object { Round_Cone(<0, 0, 0>, 2, <0, -1.5, 0>, 0.6, 0.01, 1) }

object {Round_Cone(<0, 0, 0>, 2, <0, 1/4, 0>, 1,   0.01, 1)  }
object { Round_Cone( <0, 1/4-0.03, 0>, 1, <0, 1, 0>, 0.6 ,  0.02, 1) }

}

1. declare ufo1= object {

difference {

object { ufop1 } object {ufop1 scale 0.97 }

object { //sphere { 0,1 } box {-1,1} scale y*2 scale 0.3 translate y*-1.5/2 translate z*-1 }

}

 texture { 

pigment { P_Silver3 // P_Chrome1

// Orange+NeonPink+Silver

//color rgb <1,0,0> }

//pigment {color rgb Maroon}

finish { //F_MetalD

//F_Glass01

  reflection { .01, .95 fresnel } conserve_energy
     phong 30 phong_size 20 metallic 1
    specular 50 roughness .0004   //layer a sharp highlight on top.

//ambient (Orange+NeonPink+Silver)*100 }

normal { ripples sine_wave bump_size 0.05 scale 1/1000 }

}
 

 interior {
   ior 1.5
   fade_colour <1,.25,.0>
   fade_distance 0.1
   fade_power 2
  }

   scale y/2 
 

}

1. declare glowdensity1=density{

 spherical   
 poly_wave 6
 scale 10

warp {

 turbulence .3
    }

scale 0.1

lambda 3

/*

 density_map {
   [.00 rgbt <0,0,0,1>]
   [1/2 rgbt <1,0,0,0.95>]
   [4/4 rgbt <1,0.0,0.0,0.8>]
 }

• /

}

1. declare glow1=object {sphere { 0,2 hollow no_shadow

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

samples 50,100 //emission 1*(Red+Orange)/2 absorption 1

     density { glowdensity1 }

    scattering {3,3 }
   }

/*

media {
 emission 1*Red absorption 1  
  density {
  wrinkles

}

}

 */

 }

scale 3 }

}

plane {y,-1

pigment {

wrinkles //agate

scale -10

color_map { [ 0 color (Brown+Green)/2 ] // [ 1 color (Yellow+Green)/2 ]

[ 1 color (Blue)/2 ]

}

}

normal {

granite }

}

1. declare isoground1=

isosurface { function { y - f_granite(x, 0, z)

}

accuracy 0.001

  max_gradient 40
   contained_by { box { -2, 2 } }

scale <100,2.9,100>

}

box { -1,1

translate z*1000 scale <1000,100,1>

pigment {

//granite // agate // marble

function {

f_marble(x,y,z)+f_granite(x*10,y*10,z*10)*0.2 // f_agate(x,y,z)

}

//once

turbulence 0.1 rotate z*90 translate y*-0

// wrinkles

 scale 200
            

scale y*1.4

color_map {

[ 0 color rgbt <0,1,0> ] [ 0.6 color rgbt <0,1,0> ] [ 0.6 color rgbt 1 ] [ 1 color rgbt 1 ]

} }

}

object { isoground1 translate y*-2.9 translate z*3 texture {

// agate

wrinkles

scale 3

texture_map { [0 pigment { granite scale 0.1 } normal {agate scale 0.1} ]

[1 pigment { granite scale 0.1 color_map { [0 color Green/2][0.3 color (Green+Yellow)/2]  [0.6 color (Green+Tan)/2]  [0.6 color Tan/2]   } } normal {granite scale 0.1}  ]

}

}

}

object {ufo1 translate y*0.5 rotate x*10 rotate z*0 }

object {glow1 translate y*-0.5}