File:Spherical red ghost rocket 1.png

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

Original file(3,200 × 2,400 pixels, file size: 548 KB, MIME type: image/png)

Captions

Captions

Spherical red ghost rocket

Summary[edit]

Description
English: Spherical red ghost rocket
Date
Source Own work
Author Merikanto

Povray 3.7 src

Based on modifield galaxy.inc /galaxy.obj utility.

 // red spherical ghost rockt
 
 // povray 3.7 source code
 
 // 26.5.2022 0000.0000 
  
  
  #include "colors.inc"
  #include "metals.inc"
  #include "textures.inc"   
 
  #include "skies.inc"


// global_settings { assumed_gamma 1.0 }


  camera {
  
  location <0, 0, -5> 
  look_at <0, 0, 0> 
  
  angle 22
  }
   
 /*  
 background 
 {
 color Black
 }  
   */  
 
    

//plane{<0,1,0>,1

 sphere {0,1
hollow
      texture{
       pigment{ 
     //    dents
      bozo 
       // granite
       //agate
       
       turbulence 0.92
         color_map {
         /* 
          [0.00 rgb <0.2, 0.3, 1>*0.5]
          [0.50 rgb <0.2, 0.3, 1>*0.8]
          [0.70 rgb <1,1,1>]
          [0.85 rgb <0.25,0.25,0.25>]
          [1.0 rgb <0.5,0.5,0.5>]
           */ 
            
                
             
            [0 rgb <.1,.1,.1>/50 ] 
           [1.0 rgb <0,0,0.05>/50 ]  
               
          }
         scale<1,1,1.5>*0.5
         translate<1.0,0,-2>
         }// end of pigment
       finish {ambient 1 diffuse 0}
       }// end of texture
       scale 10000
    
  //  rotate x*30
    }// end of plane
  
 
  /*
  light_source {
   <1000,1000,-1000>*1000
  color rgb <1,1,1>
  }
     
     
  plane 
  {
  y,-1000
  pigment {
  color Green
  }
  rotate x*30
  } 
  */ 
                   
                   
   /*
 #declare _GX_colour1=Orange*20;
 #declare _GX_colour2=Red*20;
 #declare _GX_colour3=Red*20;    

#declare _GX_starcolour1=Orange*5;
 #declare _GX_starcolour2=Red*1;
  #declare _GX_starcolour3=Red*1/2;
   */   

  #declare koloro1=1-<1,0.05,0>*100;
      
   #declare _GX_colour1=koloro1;
 #declare _GX_colour2=koloro1*1/2;
 #declare _GX_colour3=koloro1*1/20;    

#declare _GX_starcolour1=koloro1;
 #declare _GX_starcolour2=koloro1*1/2;
  #declare _GX_starcolour3=koloro1*1/20;     
      
 #declare galaxy_intensity=-0.1; 
 #declare galaxy_pattern_scale=1/2;
  #declare galaxy_pattern_origin=0;
 
 #declare _GX_finaltranslate=1.0;       
 #declare galaxy_turb_origin=1.0; 
 #declare _GX_objscale=1.0; 
 #declare _GX_flatten=0.01; 
 #declare _GX_objcreated=false;
  
     
     
     #declare meteor1 = disc {<.5, 0, 0>, z, .499 pigment {gradient x pigment_map {
        [.1 onion color_map {[.03 rgb _GX_colour1 transmit pow(.1, galaxy_intensity)] [.05 rgb _GX_colour3 transmit 1]} translate <.1, 0, 0>]
        [.12 onion color_map {[.02 rgb _GX_colour1 transmit pow(.2, galaxy_intensity)] [.05 rgb _GX_colour3 transmit 1]}
           scale <18, 1, 1> translate <.1, 0, 0>]
        [.5 onion pigment_map {
           [0 granite color_map {[0 rgb _GX_colour3 transmit pow(.3, galaxy_intensity)] [1 rgb _GX_colour2 transmit 1]} scale .2 * galaxy_pattern_scale translate _GX_finaltranslate]
           [.05 rgb _GX_colour2 transmit 1]}
           scale <18, 1, 1> translate <.1, 0, 0> translate -galaxy_turb_origin warp {turbulence .02 octaves 3 lambda 4} translate galaxy_turb_origin]}
        scale <1, 5, 1>}
     scale <1.1, .1, 1> translate <-.1, 0, 0>}
     #declare _GX_objscale = <.5, .5, 1> * _GX_objscale * _GX_flatten; #declare _GX_objcreated = true; 
     
     //#end
     
  
  
   //  #if (strcmp(_GX_name, "METEOR2") = 0 | strcmp(_GX_name, "M2") = 0)
     #declare meteor2 = disc {<.5, 0, 0>, z, .499 pigment {gradient x pigment_map {
        [.1 onion pigment_map {
           [.03 granite color_map {[0 rgb _GX_colour1 transmit pow(.05, galaxy_intensity)] [1 rgb _GX_colour3 transmit pow(.4, galaxy_intensity)]} scale <.3, .15, .1> * galaxy_pattern_scale translate _GX_finaltranslate]
           [.05 rgb _GX_colour2 transmit 1]}
           translate <.1, 0, 0>]
        [.12 onion pigment_map {
           [.02 granite color_map {[0 rgb _GX_colour1 transmit pow(.1, galaxy_intensity)] [1 rgb _GX_colour3 transmit pow(.4, galaxy_intensity)]} scale <.02, .15, .1> * galaxy_pattern_scale translate _GX_finaltranslate]
           [.04 granite color_map {[0 rgb _GX_colour3 transmit pow(.2, galaxy_intensity)] [.7 rgb _GX_colour2 transmit 1]} scale <.015, .1, .1> * galaxy_pattern_scale translate _GX_finaltranslate]
           [.05 rgb _GX_colour2 transmit 1]}
           scale <18, 1, 1> translate <.1, 0, 0>
           translate -galaxy_turb_origin warp {turbulence .02 octaves 4 omega .6 lambda 4} translate galaxy_turb_origin]
        [.5 onion pigment_map {
           [0 granite color_map {[0 rgb _GX_colour3 transmit pow(.4, galaxy_intensity)] [.7 rgb _GX_colour2 transmit pow(.9, galaxy_intensity)]} scale <.015, .1, .1> * galaxy_pattern_scale translate _GX_finaltranslate]
           [.05 rgb _GX_colour2 transmit 1]}
           scale <18, 1, 1> translate <.1, 0, 0> translate -galaxy_turb_origin warp {turbulence .04 octaves 4 omega .4 lambda 4} translate galaxy_turb_origin]}
        scale <1, 5, 1>}
     scale <1.1, .2, 1> translate <-.1, 0, 0>}
     #declare _GX_objscale = <.5, .5, 1> * _GX_objscale * _GX_flatten; #declare _GX_objcreated = true; 
     
    // #end
 // #//end
  
  
  
  
     
     #declare komet1 = disc {<.5, 0, 0>, z, .499 pigment {onion pigment_map {
        [.03 onion color_map {[.03 rgb _GX_colour1 transmit pow(.05, galaxy_intensity)] [.05 rgb _GX_colour3 transmit 1]} translate <.05, 0, 0>]
        [.06 radial color_map {[.1 rgb _GX_colour1 transmit pow(.05, galaxy_intensity)] [.25 rgb _GX_colour2 transmit 1]} triangle_wave]
        [.4 radial pigment_map {
           [.05 wrinkles color_map {[0 rgb _GX_colour2 transmit 1] [1 rgb _GX_colour3 transmit pow(.1, galaxy_intensity)]}
              scale galaxy_pattern_scale translate -galaxy_turb_origin warp {turbulence 2 octaves 3 lambda 2} translate _GX_finaltranslate]
           [.25 rgb _GX_colour2 transmit 1]} triangle_wave]
        [.8 rgb _GX_colour2 transmit 1]} rotate x * 90}
     scale <1.05, .35, 1> translate <-.05, 0, 0>}
     #declare _GX_objscale = <.5, .5, 1> * _GX_objscale * _GX_flatten; #declare _GX_objcreated = true;
    //  #end



     #declare komet2 = disc {<.5, 0, 0>, z, .499 pigment {onion pigment_map {
        [.03 onion color_map {[.03 rgb _GX_colour1 transmit pow(.05, galaxy_intensity)] [.05 rgb _GX_colour3 transmit 1]} translate <.05, 0, 0>]
        [.06 radial color_map {[.1 rgb _GX_colour1 transmit pow(.05, galaxy_intensity)] [.25 rgb _GX_colour2 transmit 1]} triangle_wave]
        [.2 radial pigment_map {
           [.1 granite color_map {[0 rgb _GX_colour3 transmit pow(.2, galaxy_intensity)] [1 rgb _GX_colour2 transmit 1]} scale galaxy_pattern_scale translate _GX_finaltranslate]
           [.2 rgb _GX_colour2 transmit 1]} translate -galaxy_turb_origin warp {turbulence .03 lambda 3 octaves 3 omega .9} translate galaxy_turb_origin
           triangle_wave]
        [.6 radial pigment_map {
           [.1 granite color_map {[0 rgb _GX_colour3 transmit pow(.8, galaxy_intensity)] [.6 rgb _GX_colour2 transmit 1]} scale .4 * galaxy_pattern_scale translate _GX_finaltranslate]
           [.2 rgb _GX_colour2 transmit 1]} translate -galaxy_turb_origin warp {turbulence .1 lambda 3 octaves 3 omega .9} translate galaxy_turb_origin
           triangle_wave]
        [.8 rgb _GX_colour2 transmit 1]} rotate x * 90}
     scale <1.05, .4, 1> translate <-.05, 0, 0>}
     #declare _GX_objscale = <.5, .5, 1> * _GX_objscale * _GX_flatten; #declare _GX_objcreated = true; 
     
    // #end
  
 
     #declare komet3 = disc {<.5, 0, 0>, z, .499 pigment {average pigment_map {
        [1 onion color_map {[.006 rgb _GX_colour1 * 3 transmit pow(.05, galaxy_intensity)] [.02 rgb _GX_colour3 transmit 1]}
           scale <1.5, 1, 1> rotate z * 30 translate <.05, 0, 0>]
        [1 onion pigment_map {
           [.05 rgb _GX_colour3 transmit 1]
           [.1 spiral1 1 color_map {[.03 rgb _GX_colour1 * 3 transmit pow(.05, galaxy_intensity)] [.07 rgb _GX_colour3 transmit 1]} scale 4]
           [.3 spiral1 1 color_map {[.03 rgb _GX_colour3 * 2 transmit pow(.1, galaxy_intensity)] [.07 rgb _GX_colour2 transmit 1]} scale 4]
           [.6 spiral1 1 pigment_map {
              [0 granite color_map {[0 rgb _GX_colour3 * 2 transmit pow(.1, galaxy_intensity)] [1 rgb _GX_colour2 transmit pow(.4, galaxy_intensity)]}
                 scale <.2, .03, .03> * galaxy_pattern_scale rotate z * 50 translate _GX_finaltranslate]
              [.08 rgb _GX_colour2 transmit 1]} scale 4]
           [.85 spiral1 1 pigment_map {
              [0 granite color_map {[0 rgb _GX_colour2 transmit pow(.4, galaxy_intensity)] [1 rgb _GX_colour2 transmit pow(.7, galaxy_intensity)]}
                 scale <.2, .03, .03> * galaxy_pattern_scale rotate z * 35 translate _GX_finaltranslate]
              [.1 rgb _GX_colour2 transmit 1]} scale 4]
           [.98 rgb _GX_colour2 transmit 1]}
           scallop_wave scale 2 rotate z * 125 translate <.02, -.02, 0>]}
        scale <1, 2, 1>}
     scale <1.05, .6, 1> translate <-.05, 0, 0>}
     #declare _GX_objscale = <.5, .5, 1> * _GX_objscale * _GX_flatten; #declare _GX_objcreated = true; 
 //    #end
 // #end
  
     
 
       #declare star1= disc {0, z, .999 pigment {average pigment_map {
        [1 onion color_map {
           [.1 rgb _GX_starcolour1 * 8 transmit pow(.05, galaxy_intensity)] [.3 rgb _GX_starcolour3 * 2 transmit pow(.2, galaxy_intensity)]
           [.35 rgb _GX_starcolour1 * 3 transmit pow(.1, galaxy_intensity)] [.4 rgb _GX_starcolour3 * 1.5 transmit pow(.2, galaxy_intensity)]
           [.7 rgb _GX_starcolour2 transmit pow(.5, galaxy_intensity)] [.71 rgb _GX_starcolour3 * 1.5 transmit pow(.4, galaxy_intensity)]
           [.72 rgb _GX_starcolour2 transmit pow(.5, galaxy_intensity)] [1 rgb _GX_starcolour2 transmit 1]}
           scallop_wave scale 2]
        [1 onion color_map {
           [0 rgb _GX_starcolour1 * 2 transmit pow(.05, galaxy_intensity)] [.02 rgb _GX_starcolour2 transmit 1]}
           scale <45, 1, 1>]
        [1 onion color_map {
           [0 rgb _GX_starcolour1 * 2 transmit pow(.05, galaxy_intensity)] [.02 rgb _GX_starcolour2 transmit 1]}
           scale <1, 50, 1>]}}}
     #declare _GX_objscale = <.2, .2, 1> * _GX_objscale; #declare _GX_objcreated = true; 
     
     //#end
 
   
  
     #declare star2 = disc {0, z, .999 pigment {average pigment_map {
        [1 onion color_map {
           [.05 rgb _GX_starcolour1 * 8 transmit pow(.05, galaxy_intensity)] [.2 rgb _GX_starcolour3 * 3 transmit pow(.3, galaxy_intensity)]
           [1 rgb _GX_starcolour2 transmit 1]} scallop_wave scale 2]
        [1 onion color_map {[0 rgb _GX_starcolour1 * 4 transmit pow(.05, galaxy_intensity)] [.02 rgb _GX_starcolour2 transmit 1]}
           scale <45, 1, 1>]
        [1 onion color_map {[0 rgb _GX_starcolour1 * 4 transmit pow(.05, galaxy_intensity)] [.02 rgb _GX_starcolour2 transmit 1]}
           scale <1, 50, 1>]}}}
     #declare _GX_objscale = <.2, .2, 1> * _GX_objscale; #declare _GX_objcreated = true;
   
   
     
     #declare star3 = disc {0, z, .999 pigment {average pigment_map {
        [1 onion color_map {
           [.15 rgb _GX_starcolour1 * 8 transmit pow(.05, galaxy_intensity)] [.4 rgb _GX_starcolour3 * 3 transmit pow(.1, galaxy_intensity)]
           [.49 rgb _GX_starcolour3 * 1.5 transmit pow(.3, galaxy_intensity)] [.5 rgb _GX_starcolour1 * 2 transmit pow(.1, galaxy_intensity)]
           [.51 rgb _GX_starcolour3 transmit pow(.3, galaxy_intensity)] [1 rgb _GX_starcolour2 transmit 1]}
           scallop_wave scale 2]
        [1 onion color_map {[0 rgb _GX_starcolour1 * 2 transmit pow(.05, galaxy_intensity)] [.01 rgb _GX_starcolour2 transmit 1]}
           scale <90, 1, 1>]
        [1 onion color_map {[0 rgb _GX_starcolour1 * 2 transmit pow(.05, galaxy_intensity)] [.01 rgb _GX_starcolour2 transmit 1]}
           scale <1, 100, 1>]}}}
     #declare _GX_objscale = <.2, .2, 1> * _GX_objscale; #declare _GX_objcreated = true; 
     
     #declare star4 = disc {0, z, .999 pigment {average pigment_map {
        [1 onion color_map {
           [.05 rgb _GX_starcolour1 * 10 transmit pow(.05, galaxy_intensity)] [.2 rgb _GX_starcolour3 * 3 transmit pow(.3, galaxy_intensity)]
           [1 rgb _GX_starcolour2 transmit 1]} scallop_wave scale 2]
        [1 onion color_map {[0 rgb _GX_starcolour1 transmit pow(.8, galaxy_intensity)] [.06 rgb _GX_starcolour2 transmit 1]}
           scale <16, 1, 1>]
        [1 onion color_map {[0 rgb _GX_starcolour1 transmit pow(.8, galaxy_intensity)] [.06 rgb _GX_starcolour2 transmit 1]}
           scale <16, 1, 1> rotate z * 120]
        [1 onion color_map {[0 rgb _GX_starcolour1 transmit pow(.8, galaxy_intensity)] [.06 rgb _GX_starcolour2 transmit 1]}
           scale <16, 1, 1> rotate z * 240]}}}
     #declare _GX_objscale = <.2, .2, 1> * _GX_objscale; #declare _GX_objcreated = true; 
     
 
 
     #declare galaxy5 = disc {0, z, .999 pigment {onion pigment_map {
        [0 rgb _GX_colour1 transmit pow(.1, galaxy_intensity)]
        [.35 granite color_map {
           [0 rgb _GX_colour3 transmit pow(.4, galaxy_intensity)] [.8 rgb _GX_colour1 transmit pow(.1, galaxy_intensity)]}
           scale .06 * galaxy_pattern_scale translate _GX_finaltranslate]
        [.6 granite color_map {
           [.3 rgb _GX_colour2 transmit pow(.7, galaxy_intensity)] [1 rgb _GX_colour3 transmit pow(.2, galaxy_intensity)]}
           scale .05 * galaxy_pattern_scale translate _GX_finaltranslate]
        [.75 granite color_map {
           [.5 rgb _GX_colour2 transmit pow(.9, galaxy_intensity)] [1 rgb _GX_colour2 transmit pow(.3, galaxy_intensity)]}
           scale .04 * galaxy_pattern_scale translate _GX_finaltranslate]
        [1 rgb _GX_colour2 transmit 1]}
        scallop_wave scale 2}}
     #declare _GX_objscale = <.25, .25, 1> * _GX_objscale * _GX_flatten; #declare _GX_objcreated = true; 
  
     #declare nebula4 = disc {0, z, .999 pigment {onion pigment_map {
        [.2 wrinkles color_map {[0 rgb _GX_colour1 transmit pow(.1, galaxy_intensity)] [1 rgb _GX_colour3 transmit pow(.9, galaxy_intensity)]} scale .1 * galaxy_pattern_scale translate -galaxy_pattern_origin]
        [.5 granite color_map {[0 rgb _GX_colour1 transmit pow(.3, galaxy_intensity)] [.6 rgb _GX_colour3 transmit pow(.95, galaxy_intensity)]} scale .4 * galaxy_pattern_scale translate -galaxy_pattern_origin]
        [.8 granite color_map {[0 rgb _GX_colour3 transmit pow(.6, galaxy_intensity)] [.3 rgb _GX_colour2 transmit 1]} scale .3 * galaxy_pattern_scale translate -galaxy_pattern_origin]
        [.9 rgb _GX_colour2 transmit 1]}
        scallop_wave scale 2.2
        translate -galaxy_turb_origin warp {turbulence .25 octaves 4 omega .4 lambda 3} translate galaxy_turb_origin}}
     #declare _GX_objscale = <.3, .3, 1> * _GX_objscale; #declare _GX_objcreated = true; 
     
     
 
 
 
 
 
 
    
 object {
  
  union {


  object {
  galaxy5 
  scale 0.09 
  
  translate z*-0.00
  }
 
 
 /*   
     object { meteor1  
    // scale y*1.5  
    scale y*1
     translate z*-0.0001
     
     translate <0.025,-0.001,0>
      }
   */
   
       
        object { komet2  
    // scale y*1.5  
    scale y*1/3
     translate z*-0.0002
     
    // translate <0.025,-0.001,0>  
       translate <0.04,-0.001,0>
       
      }     
       
      object {
      nebula4
       translate z*0.003
       scale 0.08
       
      } 
       
       
      object {
      star4
      translate z*0.04
      scale 0.15
      rotate z*-60
      }
         
       /*
       object { komet1
       translate z*-0.0002
        }
        */
  //    merge
  }
  
 
 


// komet1

 finish {
 ambient 1
 }

 scale 1.5
 rotate z*180
 rotate z*-30 
 
 translate y*-0.2 
 translate x*0.5
 }   
       
       
/*       
 light_source {
 <0,0,-0.1>
 color Red
 }      
  */   
/*

media{

 scattering{
   1,  // media type
   1/1000000 //
   extinction 0.0000001
           }
 
 intervals 10
  
     //  absorption 1
   density {granite scale 0.01
     color_map {
       [0.0 rgb <1,1,1>*0.1]
       [0.5 rgb <1,1,1>*0.3]
       [1.0 rgb <1,1,1>*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
current08:12, 26 May 2022Thumbnail for version as of 08:12, 26 May 20223,200 × 2,400 (548 KB)Merikanto (talk | contribs)Uploaded own work with UploadWizard

There are no pages that use this file.

Metadata