File:Different terrestrial planets povray 1 r 1.png

Original file(1,600 × 1,200 pixels, file size: 882 KB, MIME type: image/png)

Captions

Captions

Different terrestrial planets

Summary edit

Description
English: Different terrastrial planet.

Above planets has lend percent lessa and greater than Earth, 10 and 80 %.

Middle has Earth-Like land percent 15 %.

Down has both paln percent 25 %, but different size of continnets than Earth.
Date
Source Own work
Author Merikanto

POV-Ray 3.7 src

//////////////////////////////////// // // different terrestrial planets // // POV-Ray 3.7 source code // // 13.4.2023 0000.0001 //

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


camera {

  // location <0,0,-5>  
   location <0,0,-40>
   look_at 0

angle 7 }


light_source { <0,1,-5>*1000*1000*1000 color 1 }


  1. declare ra = seed(125);
  2. macro Rand0 (h);
  3. local rd = rand (ra);
  4. decalre rtn = rand (rd);

rtn

  1. end
  1. macro Rand();
  2. local rd = rand (ra);

Rand0 (Rand0 (rd) * Rand0 (rd))

  1. end


  1. declare land_function1=function {

// 1- // 1- f_granite(x,y,z) //f_wrinkles(x,y,z)/2*( (1- f_granite(x,y,z))/2 - (f_granite(x*16,y*16,z*16))/16 ) // f_wrinkles(x,y,z)/2- ( f_granite(x,y,z))/2 //f_agate(x,y,z)/2+f_granite(x/3,y/3,z/3)/2

f_wrinkles(x,y,z)

}


  1. declare land_function2=function {

// 1- f_granite(x,y,z) //f_wrinkles(x,y,z)/2*( (1- f_granite(x,y,z))/2 - (f_granite(x*16,y*16,z*16))/16 ) // f_wrinkles(x,y,z)/2- ( f_granite(x,y,z))/2 //f_agate(x,y,z)/2+f_granite(x/3,y/3,z/3)/2 // f_wrinkles(x,y,z)

}


  1. macro planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1)



  1. declare land1=pigment {
 function {land_function1(x,y,z)} 
 turbulence turb1

//agate // granite //wrinkles

pigment_map 
   {
   [0 rgb <0.73, 0.57, 0.43>] 
   [desertlimit1/1.6 rgb <0.73, 0.57, 0.43>] 
    [desertlimit1/1.3 rgb <0.30, 0.25, 0.15>]
  [desertlimit1/1.2 rgb <0.09, 0.14, 0.04>]
   [1 rgb <0.09, 0.14, 0.04>]
   }

}

  1. declare land2=pigment {
     function {land_function2(x,y,z)}
    turbulence turb1

// granite //wrinkles

pigment_map 
   {  
      [0 rgb <0.73, 0.57, 0.43>] 
//   [desertlimit1/1.6 rgb <0.73, 0.57, 0.43>] 
    [desertlimit1/2 rgb <0.30, 0.25, 0.15>]
  [desertlimit1/0.8 rgb (<0.09, 0.14, 0.04>+<0.30, 0.25, 0.15>)/2 ]
   [1 rgb <0.09, 0.14, 0.04>]
   }

}


  1. declare land3=pigment {
     function {land_function1(x,y,z)}
    turbulence turb1

// granite //wrinkles

pigment_map 
   {  
   [0 rgb <0.09, 0.14, 0.04>] 
       [0 rgb <0.09, 0.14, 0.04>] 
       [desertlimit1 rgb <0.30, 0.25, 0.15>]
       [desertlimit1+0.05 rgb <0.73, 0.57, 0.43>] 
       [1 rgb <0.73, 0.57, 0.43>]
   }

}


  1. declare sea1=pigment {

color rgb <0.01, 0.02, 0.08> }

  1. declare landtex1 = texture {
pigment {land1}  
  normal {
       function {land_function1(x,y,z)/2+land_function1(x,y,z)/2}   

, 1

   turbulence turb1

} finish {ambient 0} }

  1. declare seatex0 = texture {
pigment {color rgb <0,0,1>}  
// finish {ambient 0} 

}

  1. declare seatex1 = texture {
pigment {sea1}  
finish {ambient 0}  

}


  1. declare ptex1 = texture {
   function {land_function1(x,y,z)}
      turbulence turb1
   scale continents_scale1

texture_map

   {
   [0 landtex1]
   [landlimit1-0.01 landtex1] 
   [landlimit1+0.01 seatex1]   
   [1 seatex1]
   }
}


  1. declare testex1 = texture {
   function {land_function1(x,y,z)}
      turbulence turb1
   scale continents_scale1

texture_map

   {
       [0 landtex1 ]
   [landlimit1-0.01 landtex1] 
   [landlimit1+0.01 pigment { color 0 }]   
   [1 pigment {color 0 }]
   }

}



  1. declare icetex1= texture {

pigment { gradient y turbulence 0.03 pigment_map { [0 color rgbt <1,1,1,0>] [icelimit1 color rgbt 1] [1-icelimit2 color rgbt 1] [1 color rgb 1] }


scale 2 translate y*1

}

finish {ambient 0}

}


  1. declare clouds1= sphere {
0,1

pigment { //granite

 wrinkles

turbulence 1

 scale 1/4

color_map {

  [0 color rgbt 1] 
[cloudlimit1 color rgbt 1]
[1 color rgb 1]

}

}

finish {ambient 0}

  1. declare rax=SRand(1)*360;
  2. declare ray=SRand(1)*360;
  3. declare raz=SRand(1)*360;

rotate <rax, ray, raz>

scale 1.002


}


  1. declare atm1=sphere {0,1


  pigment { rgbt 1 } hollow
  interior
  { media
    { scattering { 4, 40*<1/3,1/3,1> extinction 0.1 }
      samples 10,20  
     
     density {
  

spherical

  color_map {
       [0, color rgb 0]
       [0.1, color rgb 0.3] 
       [1, color rgb 1]
       }
       }
    }
  }

scale 1.04 }




  1. declare planet1= union {

object {sphere {0,1}

texture{ptex1} }


object { sphere {0,1.001} texture

   {
   icetex1 
   }

finish {ambient 0} }


object {clouds1}

object {atm1} 


}


  1. declare testmap1= object {

plane { z,0 }

//texture {ptex1}

texture {testex1}


}


  1. if (testing1=0)

object { planet1}

  1. end


  1. if (testing1=1)

// black sea testmap

 object {testmap1} 
  1. end


  1. end


  1. declare continents_scale1=1;
  2. declare turb1=0.1; //## continent shape
  1. declare landlimit1=0.4057; // for agate, 25 % land


  1. declare landlimit1=0.6096; // for agate, 80 % land
  2. declare landlimit1=0.4862; // for agate, 50 % land
  3. declare landlimit1=0.3564; // for agate, 20 % land
  1. declare landlimit1=0.2935; // for agate, 10 % land
  1. declare desertlimit1=0.0;

//#declare desertlimit1=landlimit1+(1-landlimit1)/2;

  1. declare cloudlimit1=1-0.6;
  1. declare icelimit1= 0.1;
  2. declare icelimit2= 0.08;
  1. declare testing1=0; // 1 make test image, 0 draw planet

object {

planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1) scale 0.6 translate x*-1.5 translate y*1 }


  1. declare continents_scale1=1;
  2. declare turb1=0.1; //## continent shape
  1. declare landlimit1=0.6096; // for agate, 80 % land
  2. declare landlimit1=0.4862; // for agate, 50 % land
  3. declare landlimit1=0.3564; // for agate, 20 % land
  1. declare landlimit1=0.2935; // for agate, 10 % land
  1. declare landlimit1=0.4057; // for agate, 25 % land
  2. declare desertlimit1=0.2;

//#declare desertlimit1=landlimit1+(1-landlimit1)/2;

  1. declare cloudlimit1=1-0.5;
  1. declare icelimit1= 0.1;
  2. declare icelimit2= 0.08;
  1. declare testing1=0; // 1 make test image, 0 draw planet

object {

planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1) scale 0.6 translate x*-0 translate y*1*0 }


  1. declare continents_scale1=1;
  2. declare turb1=0.1; //## continent shape
  1. declare landlimit1=0.4862; // for agate, 50 % land
  2. declare landlimit1=0.3564; // for agate, 20 % land
  1. declare landlimit1=0.2935; // for agate, 10 % land
  1. declare landlimit1=0.4057; // for agate, 25 % land
  2. declare landlimit1=0.6096; // for agate, 80 % land
  1. declare desertlimit1=0.7;

//#declare desertlimit1=landlimit1+(1-landlimit1)/2;

  1. declare cloudlimit1=1-0.4;
  1. declare icelimit1= 0.1;
  2. declare icelimit2= 0.08;
  1. declare testing1=0; // 1 make test image, 0 draw planet

object {

planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1) scale 0.6 translate x*1.5 translate y*1 }


  1. declare continents_scale1=1/3;
  2. declare turb1=0.1; //## continent shape
  1. declare landlimit1=0.6096; // for agate, 80 % land
  2. declare landlimit1=0.4862; // for agate, 50 % land
  3. declare landlimit1=0.3564; // for agate, 20 % land
  1. declare landlimit1=0.2935; // for agate, 10 % land
  1. declare landlimit1=0.4057; // for agate, 25 % land
  2. declare desertlimit1=0.3;

//#declare desertlimit1=landlimit1+(1-landlimit1)/2;

  1. declare cloudlimit1=1-0.55;
  1. declare icelimit1= 0.1;
  2. declare icelimit2= 0.08;
  1. declare testing1=0; // 1 make test image, 0 draw planet

object {

planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1) scale 0.6 translate x*-1.5 translate y*-1 }


  1. declare continents_scale1=1.5;
  2. declare turb1=0.1; //## continent shape
  1. declare landlimit1=0.6096; // for agate, 80 % land
  2. declare landlimit1=0.4862; // for agate, 50 % land
  3. declare landlimit1=0.3564; // for agate, 20 % land
  1. declare landlimit1=0.2935; // for agate, 10 % land
  1. declare landlimit1=0.4057; // for agate, 25 % land
  2. declare desertlimit1=0.4;

//#declare desertlimit1=landlimit1+(1-landlimit1)/2;

  1. declare cloudlimit1=1-0.45;
  1. declare icelimit1= 0.1;
  2. declare icelimit2= 0.08;
  1. declare testing1=0; // 1 make test image, 0 draw planet

object {

planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1) scale 0.6 translate x*1.5 translate y*-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
current06:21, 13 April 2023Thumbnail for version as of 06:21, 13 April 20231,600 × 1,200 (882 KB)Merikanto (talk | contribs)Update
13:01, 12 April 2023Thumbnail for version as of 13:01, 12 April 20231,600 × 1,200 (909 KB)Merikanto (talk | contribs)Update
09:27, 12 April 2023Thumbnail for version as of 09:27, 12 April 20231,600 × 1,200 (919 KB)Merikanto (talk | contribs)Uploaded own work with UploadWizard

There are no pages that use this file.

Metadata