User:Le Forgeron/sphere sweep
< User:Le Forgeron
Jump to navigation
Jump to search
Revision as of 19:51, 12 September 2018 by Le Forgeron (talk | contribs) (→UV-Mapping of sphere_sweep)
- Everything about HgPovray38 in User:Le_Forgeron/HgPovray38
- Code is available on branch hgpovray38 at https://github.com/LeForgeron/povray
UV-Mapping of sphere_sweep
#version 3.8;
global_settings {
assumed_gamma 1.0
max_trace_level 10
}
#include "colors.inc"
#include "metals.inc"
#declare VEC=x;
#declare ScalePat = <2/40,1/40,1>;
#declare F1=function {pigment{cells}}
#declare F2=function(x,y,z){sin(x)*sin(y)}
#declare Yuck=pigment {
function {
F2(x*pi,y*pi,z)*F1(x,y,z).gray
}
}
sphere_sweep {
linear_spline
4,
<-5, -5, 0>, .1
<-5, 5, 0>, 1
< 5, -5, 0>, 1
< 5, 5, 0>, .1
uv_reference VEC
tolerance 0.001
uv_mapping
pigment {
Yuck
colour_map {
[0.1, rgb <0.6,0.5,0>]
[0.15, rgb <0.3,0.7,0>]
[0.25, rgb <0.5,0.7,0>]
[0.5, rgb <0.2,0.6,1>]
[0.8, rgb <.1,0,.1>]
}
scale ScalePat
}
scale 0.3
translate <1.1,1.2,1>
}
sphere_sweep {
cubic_spline
6,
<-5, -5, 0>, .1
<-5, -5, 0>, .1
<-5, 5, 0>, 1
< 5, -5, 0>, 1
< 5, 5, 0>, .1
< 5, 5, 0>, .1
tolerance 0.0001
uv_reference VEC
uv_mapping
pigment {
Yuck
colour_map {
[0.1, rgb <1,1,0>]
[0.15, rgb <0.3,0.7,0>]
[0.25, rgb <0.5,0.7,0>]
[0.5, rgb <0.2,0.6,1>]
[0.8, rgb <1,0,.1>]
}
scale ScalePat
}
scale 0.3
}
sphere_sweep {
b_spline
6,
<-5, -5, 0>, .1
<-5, -5, 0>, .1
<-5, 5, 0>, 1
< 5, -5, 0>, 1
< 5, 5, 0>, .1
< 5, 5, 0>, .1
tolerance 0.001
uv_reference VEC
uv_mapping
pigment {
Yuck
colour_map {
[0.1, rgb <1,0.5,0.5>]
[0.15, rgb <0.3,0.7,0>]
[0.25, rgb <0.2,0.7,0.5>]
[0.5, rgb <0.2,0.6,1>]
[0.8, rgb <0,0,1>]
}
scale ScalePat
}
scale 0.3
translate <-0.8,-1.1,-1>
}
camera {
right x*image_width/image_height
location <0,0,-6>
look_at <0,0,0>
}
light_source {<500,500,-500> rgb 1}
light_source {<500,-100,-500> rgb <0.4,0.3,0.3> shadowless}
light_source {<-500,0,-500> rgb <0.3,0.3,0.4> shadowless}
sky_sphere {
pigment {
planar
color_map { [0.0 color blue 1] [1.0 color rgb <0.8,0.8,1.0>] }
}
}