// Alex Kluchikov, 2003
// mailto: klkspa[at]ukr.net, aklk[at]mail.ru
// Feel free to modify/use in any form

sphere{0,1000
 texture{
  pigment{
   gradient y color_map{ 
    [0,color rgb <0.8,0.83,1>]
    [1,color rgb <0.4,0.7,1>]
    }scale 2 translate -y}finish{ambient 1}scale 1000}

texture{
 pigment{average pigment_map{
 #declare gr=.8;
 #declare ge=3.5/(1+gr+gr);
 #declare t1=.1;
 #declare t2=.9;
 #declare tr1=.0;
 #declare tr2=.0;
  [1,bozo translate 1*y color_map{
   [t1,color rgbt < 1,gr,gr,tr1>*ge]
   [t2,color rgbt < 0, 0, 0,tr2>*ge]
  }]
  [1,bozo translate 1*z color_map{
   [t1,color rgbt < gr, 1,gr,tr1>*ge/.85]
   [t2,color rgbt <  0, 0, 0,tr2>*ge]
  }]
  [1,bozo translate 1*x color_map{
   [t1,color rgbt < gr,gr, 1,tr1>*ge/.7]
   [t2,color rgbt <  0, 0, 0,tr2>*ge]
  }]
   
 }}scale 0.25 finish{ambient 1 diffuse 0}scale 2500}

 no_shadow
 no_image 
 hollow double_illuminate scale 100}

#declare glass=texture{pigment{color rgbt 1//<0.83,0.82,0.87>//.8 transmit 1.0
 }
  finish{diffuse 0.5 ambient 0 specular 0.8 roughness 0.03 phong 1.0 brilliance 8 phong_size 80  metallic 0.5 reflection{.2,.4 fresnel}
   conserve_energy
   }
  }

#declare st=texture{pigment{color rgb<0.83,0.82,0.84>*1.2}
  finish{diffuse 0.85 ambient 0 specular 0.8 roughness 0.03 phong 1.0 brilliance 7.3 phong_size 80  metallic .5 
   reflection{0.6,1.0 metallic}}
  }

#declare pla=texture{
   pigment{color rgb 1}
   finish{diffuse 1.1 phong 1.2 phong_size 80 
   reflection{.1,.3}
   }
//   normal{bozo .3 scale .01}
  }

 
#declare area=0; 
#declare areacount=2;
#declare areasize=.125;

light_source{        
 -5*z, color rgb <1.0,0.8,0.6>*0.55
#if(area)           
 area_light x*areasize,y*areasize,areacount,areacount jitter adaptive 1 circular orient 
#else
// parallel
#end
 rotate x*25 rotate -y*15
 }

light_source{
 -5*z, color rgb <0.6,0.8,1>*0.55
#if(area) 
 area_light x*areasize,y*areasize,areacount,areacount jitter adaptive 1 circular orient 
#else
// parallel
#end
 rotate x*35 rotate -y*195
 
 }

global_settings{
 noise_generator 3
 max_trace_level 12
 max_intersections 12
 }


camera{
// orthographic
// spherical
 location -5*z
 look_at 0
 up image_height*y
 right image_width*x
 angle 150
 rotate x*15
 rotate -y*50
 translate -y*0
 }          

#declare st=texture{pigment{color rgb<0.83,0.82,0.84>*1.2}
  finish{diffuse 0.85 ambient 0 specular 0.1 roughness 0.03 phong 1.0 brilliance 7.3 phong_size 80  metallic .5 
   reflection{0.6,1.0 metallic}}
//   normal{bozo noise_generator 3}
  }


sphere{y,1 texture{st} scale 4 no_shadow}

//plane{y,0 texture{st}}

box{#declare br=8; -br,br translate y*br scale y/2
//sphere{7*y,7
 hollow
 no_shadow
 texture{st}
// translate y*78
 }