File:Sirius type double star animation 1.gif

From Wikimedia Commons, the free media repository
Jump to navigation Jump to search

Sirius_type_double_star_animation_1.gif(800 × 600 pixels, file size: 5.06 MB, MIME type: image/gif, looped, 100 frames, 5.0 s)

Captions

Captions

Double star that has A-spectral class star and white dwaf

Summary

[edit]
Description
English: Star pair like Sirius. Artist rendering.
Date
Source Own work
Author Merikanto

POV-Ray and ImageMagick source code

ImageMagick script

magick convert -delay 5 -loop 0 *.png sirius_type_double_star_animation_1.gif

POV-Ray 3.8 .ini file

POV-Ray animation ini file

Antialias=Off Antialias_Threshold=0.1

Antialias_Depth=2 Quality=11

Input_File_Name="sirisu3.pov"

Initial_Frame=1 Final_Frame=100 Initial_Clock=0 Final_Clock=360

Cyclic_Animation=on Pause_when_Done=off

POV-Ray 3.8 source code

///////////////////////////// // // Sirius-type double star // // POV-Ray 3.8 source code // // 30.9.2023 v 0000.0001 // /////////////////////////////

  1. include "functions.inc"
  2. include "rand.inc"
  3. include "shapes3.inc"


  1. declare tau_ofset=90;
  1. declare taunolla=clock+tau_ofset;
  1. declare randi1=rand(1);
  2. declare randi2=rand(2);
  3. declare randi3=rand(3);
  1. declare tau1=radians(taunolla);
  2. declare tau2=radians(taunolla+180.0);
  1. declare ra=3;
  2. declare rb=3;
  3. declare ax = sin(tau1)*ra+0.5;
  4. declare ay = cos(tau1)*ra;
  1. declare bx = sin(tau2)*rb-0.5;
  2. declare by = cos(tau2)*rb;

//## stella atmosphere

  1. declare atm_thickness1=1.5 ;


  1. declare samples1=30; // media samples, greater value slower to render


camera { location <0,25,-150>*1 look_at 0 angle 5 }

  1. macro convection_pigment(c)

crackle pigment_map{ [0.0 rgb c*0.2] [0.2 rgb c] [0.9 rgb c] [1.0 rgb 1.0]

} warp{turbulence 1}

  1. end


  1. declare stella_object_type_1= object {
        sphere {0,1 } 
   // ovus {1,0.7 rotate x*90 rotate y*-90}
   //object { Egg_Shape (1.15,1.55)  rotate x*90 rotate y*-90}
   

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

  1. declare stella_object_type_2= object {
        difference 
       {
        sphere {0,1+atm_thickness1 } 
        sphere {0,1.001 } 
       }

}

//#declare star_pigment_1= pigment { wrinkles turbulence 0.4 scale 0.005 translate taunolla/360 color_map { [0 color rgb starcolor1a] [1 color rgb starcolor1c] } }


  1. macro makestar1(color1, color2, color3, color4)

object { union {


  // main sequence stella

object {

 object { stella_object_type_1  }   
 // texture {pigment {color rgb  color1} finish {ambient 1} }

// texture { pigment { convection_pigment(color1) scale 0.05} finish {ambient 1} }

   texture { 
     wrinkles scale 0.02
 //   granite  scale 0.1
         translate x*tau1*0.2
   warp { turbulence 0.5 }
   texture_map {

     [0 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 1}]    
     [0.85 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 1/2}]  
     [0.9 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 2/5}]   
     [1 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 0.2}]    
 } 
          
 
} // ...tex
        
   scale 1
} // stella object
 


// stella korona try 1

object {
 object {stella_object_type_2}
   pigment{rgbt 1}
       hollow

      interior{ 
   media{ method 3      
        //   absorption (1-color1)*1 // darkening
          emission color3*3/10
       //  scattering{ 4,(1-color1)// Type
         
        //   } // end scattering
          density{ 
          // #declare qq=tau1/(pi*2);
          
 function {   
       pow( 1*sqrt(1*(x*x+y*y+z*z)),-6 )  
//   * pow( f_granite(  atan2(x,y), atan2(x,z),atan2(y,z)),1/1)
//   * pow( f_granite( atan2(x+f_wrinkles(x,y,z),y+f_granite(x,y,z)*0.2), 1,1),z)  
   * pow( f_granite( atan2(x+f_wrinkles(x,y,z),y+f_granite(x,y,z)*0.2), 1,1),2)  
  • 0.5

+ pow( 1*sqrt(1*(x*x+y*y+z*z)),-6 )*0.2 }

  //    translate x*tau1*0.2
   density_map
          { 
           [0 rgb color1*0.000000000] 
       //   [0.1 rgb color3*1]
          //   [0+atm_thickness1 rgb color3*1]
         
           [1 rgb color1*3] 
            }
          } // 
          samples samples1 
    }  // ... density
 } // ... interior
//  scale 1.0+atm_thickness1

// scale 0.9

} // ... obj stella atm


} // union } // object

  1. end // end makestar1 macro


  1. macro makestar2(color1, color2, color3, color4)

object { union {

  // main sequence stella

object {

 object { stella_object_type_1  }   
  texture {pigment {color rgb  color1} finish {ambient 1} }

// texture { pigment { convection_pigment(color1) scale 0.05} finish {ambient 1} }

// texture {

//     wrinkles scale 0.02
 //   granite  scale 0.1
//         translate x*tau1*0.2
//   warp { turbulence 0.5 }
//   texture_map {

//     [0 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 1}]    
//     [0.85 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 0.6}]  
//     [0.9 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 0.4}]   
//     [1 pigment { wrinkles turbulence 0.4 scale 0.005  translate taunolla/360   color_map {   [0 color rgb color1] [1 color rgb color3] }} finish {ambient 0.0}]    

// }

          // } // ...tex
        
   scale 1
} // stella object
 


// stella korona2 try 1

object {
 object {stella_object_type_1}
   pigment{rgbt 1}
       hollow

      interior{ 
   media{ method 3      
        //   absorption (1-color1)*1 // darkening
          emission color3*1/10
       //  scattering{ 4,(1-color1)// Type
         
        //   } // end scattering
          density{ 
      //    #declare qq=tau1/(pi*2);
 function {   

// pow( 1*sqrt(1*(x*x+y*y+z*z)),-6 )


//   * pow( f_granite(  atan2(x,y), atan2(x,z),atan2(y,z)),1/1)

// * pow( f_granite( atan2(x+f_wrinkles(x,y,z),y+f_granite(x,y,z)*0.1), 1,1),1/1) //*0.5 //+ pow( 1*sqrt(1*(x*x+y*y+z*z)),-6 )*0.2 // pow( 1/3*sqrt(4*(x*x+y*y+z*z)),-5 )*1

pow(f_spherical(x,y,z),2)*2
*f_wrinkles(x,y,z) *2
  • pow( f_granite( atan2(x,y)/2, atan2(x,z)/2,atan2(y,z)/2),1/1)

}

  //    translate x*tau1*0.2
   density_map
          { 
           [0 rgb color1*0.000000000] 
       //   [0.1 rgb color3*1]
          //   [0+atm_thickness1 rgb color3*1]
         
           [1 rgb color1*20] 
            }
          } // 
          samples samples1 
    }  // ... density
 } // ... interior
  scale 3

// scale 0.9

} // ... obj stella atm


} // union } // object

  1. end // end makestar1 macro


// star 1

  #declare color1=<1,1,1>*1.2;
#declare color2=<1,1,1,0>*1.2;   
  1. declare color3=<1,1,1.4>*1;
#declare color4=<1,1,1.4,0>*1;  


union {

makestar1(color1, color2, color3, color4 )    
  scale 1.68*1   
   rotate taunolla
// scale 1
    translate <ax,0,ay>*1 
  }

// star 2

  #declare color1=<1,1,2>*2;
#declare color2=<1,1,3,0>;   
  1. declare color3=<1,1,1.5>*2;
#declare color4=<1,1,1.5,0>;  

union {

makestar2(color1, color2, color3, color4 )   
   rotate taunolla 
   scale 1/5
    translate <bx,0,by>*1 
  }

Licensing

[edit]
I, the copyright holder of this work, hereby publish it under the following license:
w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 4.0 International license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
  • share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current17:36, 30 September 2023Thumbnail for version as of 17:36, 30 September 2023800 × 600 (5.06 MB)Merikanto (talk | contribs)Uploaded own work with UploadWizard

There are no pages that use this file.

Metadata