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
Summary edit
DescriptionDifferent terrestrial planets povray 1 r 1.png |
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
//
- include "functions.inc"
- include "colors.inc"
- 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
}
- declare ra = seed(125);
- macro Rand0 (h);
- local rd = rand (ra);
- decalre rtn = rand (rd);
rtn
- end
- macro Rand();
- local rd = rand (ra);
Rand0 (Rand0 (rd) * Rand0 (rd))
- end
- 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)
}
- 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)
}
- macro planet_macro_1(continents_scale1,turb1,landlimit1,desertlimit1,cloudlimit1,icelimit1,icelimit2, testing1)
- 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>]
}
}
- 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>]
}
}
- 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>]
}
}
- declare sea1=pigment {
color rgb <0.01, 0.02, 0.08>
}
- 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}
}
- declare seatex0 = texture {
pigment {color rgb <0,0,1>}
// finish {ambient 0}
}
- declare seatex1 = texture {
pigment {sea1}
finish {ambient 0}
}
- 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]
}
}
- 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 }]
}
}
- 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}
}
- 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}
- declare rax=SRand(1)*360;
- declare ray=SRand(1)*360;
- declare raz=SRand(1)*360;
rotate <rax, ray, raz>
scale 1.002
}
- 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
}
- declare planet1= union {
object {sphere {0,1}
texture{ptex1}
}
object { sphere {0,1.001} texture
{
icetex1
}
finish {ambient 0}
}
object {clouds1}
object {atm1}
}
- declare testmap1= object {
plane { z,0 }
//texture {ptex1}
texture {testex1}
}
- if (testing1=0)
object { planet1}
- end
- if (testing1=1)
// black sea testmap
object {testmap1}
- end
- end
- declare continents_scale1=1;
- declare turb1=0.1; //## continent shape
- declare landlimit1=0.4057; // for agate, 25 % land
- declare landlimit1=0.6096; // for agate, 80 % land
- declare landlimit1=0.4862; // for agate, 50 % land
- declare landlimit1=0.3564; // for agate, 20 % land
- declare landlimit1=0.2935; // for agate, 10 % land
- declare desertlimit1=0.0;
//#declare desertlimit1=landlimit1+(1-landlimit1)/2;
- declare cloudlimit1=1-0.6;
- declare icelimit1= 0.1;
- declare icelimit2= 0.08;
- 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
}
- declare continents_scale1=1;
- declare turb1=0.1; //## continent shape
- declare landlimit1=0.6096; // for agate, 80 % land
- declare landlimit1=0.4862; // for agate, 50 % land
- declare landlimit1=0.3564; // for agate, 20 % land
- declare landlimit1=0.2935; // for agate, 10 % land
- declare landlimit1=0.4057; // for agate, 25 % land
- declare desertlimit1=0.2;
//#declare desertlimit1=landlimit1+(1-landlimit1)/2;
- declare cloudlimit1=1-0.5;
- declare icelimit1= 0.1;
- declare icelimit2= 0.08;
- 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
}
- declare continents_scale1=1;
- declare turb1=0.1; //## continent shape
- declare landlimit1=0.4862; // for agate, 50 % land
- declare landlimit1=0.3564; // for agate, 20 % land
- declare landlimit1=0.2935; // for agate, 10 % land
- declare landlimit1=0.4057; // for agate, 25 % land
- declare landlimit1=0.6096; // for agate, 80 % land
- declare desertlimit1=0.7;
//#declare desertlimit1=landlimit1+(1-landlimit1)/2;
- declare cloudlimit1=1-0.4;
- declare icelimit1= 0.1;
- declare icelimit2= 0.08;
- 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
}
- declare continents_scale1=1/3;
- declare turb1=0.1; //## continent shape
- declare landlimit1=0.6096; // for agate, 80 % land
- declare landlimit1=0.4862; // for agate, 50 % land
- declare landlimit1=0.3564; // for agate, 20 % land
- declare landlimit1=0.2935; // for agate, 10 % land
- declare landlimit1=0.4057; // for agate, 25 % land
- declare desertlimit1=0.3;
//#declare desertlimit1=landlimit1+(1-landlimit1)/2;
- declare cloudlimit1=1-0.55;
- declare icelimit1= 0.1;
- declare icelimit2= 0.08;
- 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
}
- declare continents_scale1=1.5;
- declare turb1=0.1; //## continent shape
- declare landlimit1=0.6096; // for agate, 80 % land
- declare landlimit1=0.4862; // for agate, 50 % land
- declare landlimit1=0.3564; // for agate, 20 % land
- declare landlimit1=0.2935; // for agate, 10 % land
- declare landlimit1=0.4057; // for agate, 25 % land
- declare desertlimit1=0.4;
//#declare desertlimit1=landlimit1+(1-landlimit1)/2;
- declare cloudlimit1=1-0.45;
- declare icelimit1= 0.1;
- declare icelimit2= 0.08;
- 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
- 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/Time | Thumbnail | Dimensions | User | Comment | |
---|---|---|---|---|---|
current | 06:21, 13 April 2023 | 1,600 × 1,200 (882 KB) | Merikanto (talk | contribs) | Update | |
13:01, 12 April 2023 | 1,600 × 1,200 (909 KB) | Merikanto (talk | contribs) | Update | ||
09:27, 12 April 2023 | 1,600 × 1,200 (919 KB) | Merikanto (talk | contribs) | Uploaded own work with UploadWizard |
You cannot overwrite this file.
File usage on Commons
There are no pages that use this file.
Metadata
This file contains additional information such as Exif metadata which may have been added by the digital camera, scanner, or software program used to create or digitize it. If the file has been modified from its original state, some details such as the timestamp may not fully reflect those of the original file. The timestamp is only as accurate as the clock in the camera, and it may be completely wrong.
PNG file comment |
|
---|---|
File change date and time | 03:17, 13 April 2023 |
Software used |