Fortraneries/GravityField/vision.pov

65 lines
1.4 KiB
POVRay

/*
* Visualisation en 3d d'une tentative de champ gravitationnel
*
* tTh novembre 2022
*/
#version 3.7;
global_settings {
ambient_light rgb <0.07, 0.05, 0.05>
assumed_gamma 1.0
max_trace_level 6
}
#include "colors.inc"
#declare NormClock = clock / 2000.01;
#debug concat("- - - - - - - ", str(NormClock, 7, 5), "\n")
// ----------------------------------------------------------------------
#declare HFDIR = "WS/nanim/";
#declare HFCK = mod(clock, 2000);
#declare HFNAME = concat(HFDIR, str(HFCK , -5, 0), ".pgm");
#debug concat("- - - - - - - ", HFNAME, "\n")
#declare GravityField = object
{
height_field {
pgm HFNAME
smooth // on
translate <-0.5, 0, -0.5>
}
texture {
pigment { color Gray70 }
finish { phong 0.55 }
}
}
object { GravityField scale <4, 0.60, 4> }
// ----------------------------------------------------------------------
/* XXX
merge {
cylinder { <0, -0.5, 0>, <0, 1, 0>, 0.0175 }
sphere { <0, 1, 0>, 0.0175 }
pigment { color Red }
}
XXX */
light_source { < -2, 9.3, -7> color Gray90 }
light_source { < -6, 9.3, -8> color Orange*0.75 }
light_source { < -15, 2.3, 17> color Green*0.25 }
// ----------------------------------------------------------------------
camera {
location <-8, 4-(1.5*NormClock), 1 + (5*NormClock)>
look_at <0, 0, 0>
right x*image_width/image_height
angle 33
}
// ----------------------------------------------------------------------