1. include "colors.inc"
2. include "functions.inc"

camera { location <0,15,0>*1.0 look_at <0,0,0> }

1. declare media2= object {

sphere { 0,1 }

pigment { rgbt 1 } hollow

  interior
  { media
    { 
    
    //emission 1/5
    samples 20,30
    scattering {3, 1/1000}
    
      density
      { 
      
      //spherical 
       function {
       exp(-1*sqrt(x*x+y*y+z*z) * f_wood(x,y,z))
       
       }
       scale 3
      poly_wave 3
      density_map
        { [0 rgbt <1.0,0,0,1>]
          [0.5 rgb <1,0.5,0,0.9>]
          [1 rgbt <1,1,0,0>]
        }
      }
    }
 }

}

1. declare media1=object {

sphere { 0,1 }

pigment { rgbt 1 } hollow
  interior
  { media
    { emission 1/30
      density
      { spherical density_map
        { [0 rgbt <1.0.0,0,1>]
          [1 rgbt <1,1,0,0>]
        }
      }
    }
 }

}

1. declare sun1= object {

sphere {0,1} texture { pigment { granite scale 0.5 color_map { [0 ,color rgbt <1,1/2,1/2,0>] [1, color rgbt <1,1,0.5,0>] } }

finish {ambient 1.5}

}

}

light_source {

<0,0,0>
color rgb <1,1,1>*1.5

looks_like { object {sun1 scale 1/2 } } }

1. declare planet2= object {

sphere {0,1} texture { pigment { //agate wrinkles scale y/5

scale 2 color_map { [0 ,color rgbt <1,1,1,0.0>] [1, color rgbt <0,0.5,0.5,0.0>] } }

// finish {ambient 0.5}

finish {

   //    irid { 
    //       0.25 
     //      thickness 0.6
     //  }
     //  brilliance 1
      // metallic
     //  specular 3
     diffuse 0.6
     phong 0.1
     specular 0.2
     }

}

}

1. declare symbol1= object {

cone { <-1, 2, 0>, 1/2, <1, 2, 0>, 0 }

scale y/20

texture {

pigment { color rgb <0,0,1> }

finish {ambient 2}

}

}

1. declare symbol2= object {

union { cone { <0, 6, 0>, 1, <1, 6, 0>, 0 } cylinder { <-1, 6, 0>,<0, 6, 0>, 1/2 }

no_shadow }

scale 1/2 scale y/20

texture {

pigment { color rgb <0,1,0> }

finish {ambient 2}

}

}

1. macro orbit1 (r1,r2, fred)

object {

torus {r1,r2 //rotate x*90

}

texture { //pigment {color rgb <1,1,1>} pigment { radial frequency fred color_map { [0 color rgbt <1,1,1,1>] [0.5 color rgbt <1,1,1,1>] [0.5 color rgbt <1,1,1,0>] [1 color rgbt <1,1,1,0>] }

}

finish { ambient 1} } }

1. end

1. declare r1=6.0;
2. declare r2=3.0;
3. declare rsk1=(r2/r1)*0.95;
4. declare rk1=0.968;

1. declare rr=r1;

1. for (n,0,360+30)

1. declare fi1=n+90;

object {

symbol2

scale 0.4 scale x*2

#declare rx=sin(radians(fi1))*rr; #declare rz=cos(radians(fi1))*rr;

rotate y*fi1

translate <rx,0,rz>

#declare n=n+15;

#declare rr=rr*rk1;

}

1. end

object { planet2 scale 0.6 translate x*rx translate z*rz }

object { planet2 scale 0.6 translate x*r1 }

//object {orbit1} //object {orbit1 scale rsk1} orbit1(6, 0.02, 72) orbit1(6*rsk1, 0.04, 36)

object { symbol2 pigment {color rgbt <0,0,1,0.5> } translate z*0 translate x*4.5 }

object { symbol2 pigment {color rgbt <1,0,0,0.25> } scale 1.5 rotate y*180 translate z*0 translate x*7.5 }

object {media1 scale 10}

object {media2 scale 20}