1. include "functions.inc"

camera {

location <0,10,0>*1.5
look_at <0,0,0>

}

/* sky_sphere { texture { pigment {wood} } }

• /

light_source { <0,0,0> color rgb 1

looks_like {sphere {0,0.3} pigment { color <1,1,0>} finish {ambient 1}} }

sphere // transparent sphere containing media

{ 0,1 pigment { rgbt 1 } hollow
  interior
  { media
    { //emission 1
      
      scattering {3,1 }
      density
      { spherical density_map
        { [0 rgb 0]
          [0.5 rgb <1,0,0>]
          [1 rgb <1,1,0>]
         // [1 rgb 1]
        }
      }
    }
 }

scale 2

}

1. declare planet1=object {

sphere {0,1} // texture {pigment {color rgb <0,1,1>} finish {ambient 1} } texture {pigment { //color rgb <0,1,1> agate scale 10 color_map { [0 color rgbt <0,1,0,0>] [1 color rgbt <0,0,1,0.0>] } } finish {ambient 1} } }

1. declare puff1=object {

sphere {0,1}

}

1. declare spirals1= merge {

1. declare rax1=5;

1. declare rr1=rax1-0.5;
2. declare rr2=1;

1. declare rk1=0.997;

1. declare rk2=0;

1. declare dn=1;

1. for (n,10,359*5)

#declare fii1=radians(n); #declare fii2=radians(n*6);

#declare px1=cos(fii1)*rr1; #declare pz1=sin(fii1)*rr1; #declare px2=cos(fii2)*rr2; #declare pz2=sin(fii2)*rr2;

//#declare px=px1+px2; //#declare pz=pz1+pz2;

#declare px=px1; #declare pz=pz1;

object {puff1 scale 0.3 translate x*px translate z*pz}

#declare n=n+dn;

#declare rr1=rr1*rk1; #declare rr2=rr2*rk2;

1. end

1. declare rr1=rax1+0.5;
2. declare rr2=1;

//#declare rk1=0.99;

1. declare rk1=1.003;

1. declare rk2=0;

//#declare dn=1;

1. for (n,8,3600)

#declare fii1=radians(-n); #declare fii2=radians(n*6);

#declare px1=cos(fii1)*rr1; #declare pz1=sin(fii1)*rr1; #declare px2=cos(fii2)*rr2; #declare pz2=sin(fii2)*rr2;

//#declare px=px1+px2; //#declare pz=pz1+pz2; #declare px=px1; #declare pz=pz1;

object {puff1 scale 0.3 translate x*px translate z*pz}

#declare n=n+dn;

#declare rr1=rr1*rk1; #declare rr2=rr2*rk2;

1. end

object { puff1

scale 1 scale x/5 rotate y*-45 translate x*rax1

// texture {pigment {color rgb <1,1,0>} finish {ambient 1} }

}

}

1. declare spirals2=object {spirals1

/* texture {

pigment { //color rgbt <1,0,0,0.7>

wrinkles scale 0.5

color_map { [0 color rgbt <1,1,1,1>] [1 color rgbt <1,0,0,0.7>] }

}

finish {ambient 1}

}

• /

pigment { rgbt 1 } hollow

  interior
  { media
    {
   
   
     samples 5,10 
    //emission 1
     
     emission 1
     
     scattering {1, <1,1,1>/3}
     
     
      density
      { 
      //wrinkles scale 0.5 
    //  granite 
           
           function {
           

//f_waves(x*3,y*3,z*3) f_spiral1(x*4,z*4,y*4)

           * f_wrinkles(x/3,y/3,z/3)
            
           *f_granite(x,y,z)
           
           }
           
     
      density_map
        { [0 rgb 0]
          [0.5 rgb <1,0,0>]
          [1 rgb <1,1,0>]
    
        }
      }
    }
 }

}

object {planet1 scale 0.3 translate x*rax1}

object {

sphere {0,1} scale 30 scale y/20

pigment { rgbt 1 } hollow

  interior
  { media
    {
    
     samples 1
    //emission 1
     
     emission 1
     
   //  scattering {3, <1,0.5,0>/5}
     
     
      density
      { 
      
      function {
    //  exp(-sqrt(x*x+y*y+z*z))*f_wood(x*1.2,z*1.2,y*1.2)*f_wrinkles(x*10,y*10,z*10)
   //  exp(-sqrt(x*x+y*y+z*z))*  f_waves(x*10,z*10,y*10)*f_wrinkles(x*10,y*10,z*10)
     
    // f_wrinkles(f_waves(x,z,y),y,z)
    // f_radial(x*10,z*10,y*10)
    // f_wrinkles(atan2(x,z),z,y)
   exp(-sqrt(x*x+y*y+z*z))*    f_wrinkles(f_wood(x,z,y),f_granite(x,y,z),y)
     
     
     
     
     
      
     // f_ripples(x,y,z)
      
      
      
      }
      
      //wrinkles 
      
      scale 3
      
      
      density_map
        { [0 rgb <1,0,0>/10]
        //  [0.4 rgb <1,0,0>]
          [1 rgb <1,1/2,0>]

        }
      }
    }
 }

}

object{spirals2 }