Jump to content

File:Sirius type double star animation 1.gif

Page contents not supported in other languages.
This is a file from the Wikimedia Commons
From Wikipedia, the free encyclopedia

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)

Summary

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

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.

Captions

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

Items portrayed in this file

depicts

30 September 2023

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)MerikantoUploaded own work with UploadWizard

The following page uses this file:

Metadata