Embed Notice
HTML Code
Corresponding Notice
- Embed this notice@Maira_Nekomori Please show fedi some /raytrace
@@begin
#include "colors.inc"
#include "textures.inc"
#include "stones.inc"
camera {
location <-1.5,-1.5,-31>
look_at <-1.5,-1.5,0>
}
light_source {
<-5,5,-20>
color rgb <1,1,1>
}
sphere{<0,0,0>,1 hollow
texture{
pigment{gradient <0,1,0>
color_map{[0 color <0.0,0.0,0.0>]
[1 color <0.15,0.22,0.3>]}
}
finish {ambient 1 diffuse 0}
}
translate <0,0.5,0>
scale 10000
}
union{
#declare num_steps = 15000;
#declare alp = 0;
#declare alp_inc = 12*360/num_steps;
#declare bet = 0;
#declare bet_inc = 12*263/num_steps;
#declare gam = 0;
#declare gam_inc = 2*3.14/num_steps;
#declare dy = 40/num_steps;
#declare ypos = -20;
#while (ypos < 20)
sphere {
<0,0,0>, sin(gam)*sin(gam)
scale <0.2,1,1>
rotate <0,0,bet>
translate <7*sin(gam),ypos,0>
rotate <0,alp,0>
}
#declare alp = alp + alp_inc;
#declare bet = bet + bet_inc;
#declare gam = gam + gam_inc;
#declare ypos = ypos + dy;
#end
rotate <30,40,-30>
texture {Gold_Nugget}
}
@@end