|
 |
Hi all,
For some reason I can't this scene to work.
using win95
thanks Brian
#version unofficial MegaPOV 0.4;
#macro center(obj)
translate -(min_extent(obj)+max_extent(obj))/2
#end
#macro over(obj)
translate -y*min_extent(obj).y
#end
#include "colors.inc"
#include "skies.inc"
#include "checkers.inc"
sky_sphere {S_Cloud4}
$phd = 1;
$Cam = vnormalize(<2,1.75,-2.75>);
$R = 5;
$T = 9.125;
$I = 0;
$S = function {sqrt(x^2+y^2+z^2)-1}
$Trunk = function {S(x,noise3d(x,y,z),z)}
$Bush = function
{noise3d(x*10,y*10,z*10)+noise3d(x/2.5,y/2.5,z/2.5)+(sqrt((x/1.125)^2+(y)^2+(z/1.125)^2)-3.9)}
global_settings {ambient_light 2/9 max_trace_level 10 photons {gather
20,100 radius phd*20,3,phd*5 jitter 1/3}}
camera {location Cam*35 look_at <0,0,0>}
light_source {Cam*7 .5 shadowless groups "Tree"}
light_source {y*10 1 area_light x*4,z*4 3,3 adaptive 0 circular
fade_distance 50 fade_power 3 groups "Tree"}
light_source {y*5 .8 area_light x*4,z*4 7,7 jitter adaptive 0 circular
fade_distance 50 fade_power 3 groups "Tree,Plane,Blob" photons
{area_light}}
//light_source {<1,3,-1>*30 1 area_light x*10,z*10 8,8 adaptive 0
spotlight point_at 0 radius 10 falloff 20 tightness 50}
plane {y,0 pigment {spherical scale 18 pigment_map {[0 rgb 1][1 snC22
scale 1/3]}} finish {ambient 1/8 diffuse 2/8} light_group "Plane"}
blob
{
threshold .5
#while (I<8)
$_ZY_ = vrotate(z*T,y*360*I/8);
$_YX_ = vrotate(y*T,x*360*I/8);
$_YZ_ = vrotate(y*T,z*360*I/8);
sphere {0,R,1 translate _ZY_}
#if (!(_YX_.y=0))
sphere {0,R,1 translate _YX_}
#if (!(_YZ_.x=0))
sphere {0,R,1 translate _YZ_}
#end
#end
$I = I + 1;
#end
sturm
pigment {rgb <1,2,3>/3 filter .75}
finish {ambient 0 diffuse 0 reflection 2/3 specular 1 roughness 1/256
blinn 1 facets 1/3}
interior {ior 10/9}
photons {separation phd refraction on reflection on ignore_photons}
light_group "Blob"
}
$Tree = union {
isosurface
{
function Bush(x,y,z)%noise3d(x,y,z)
accuracy 0.01 //method 2 eval
threshold 0 sign 1
bounded_by {sphere {0,4.5}}
pigment
{
function Bush(x,y,z)
color_map
{
[0.10 rgb <3,2,1>/7]
[0.10 rgb <1,0,0>]
[0.25 rgb <0.94118,.55686,0>]
[0.50 rgb <0.94118,.55686,0>]
[1.00 rgb <0,.55686,0>]
}
turbulence 1
}
finish {ambient 1/5 diffuse 2/5}
translate y*2
}
isosurface
{
function Trunk(x,y,z)
accuracy 0.01 //method 2 eval
threshold .1 sign 1
bounded_by {sphere {0,5}}
pigment {wood turbulence <.1,.5,1> octaves 5 lambda 3.25 scale
<.15,.5,1> rotate <1,2,1>*2 translate -x*2 color_map {[0 rgb
<4,3,2>/7][1 rgb <3,2,1>/7]}}
finish {ambient 1/4 diffuse 2/4}
scale <5,9,5>/9
translate -y*2
} scale .4}
object {Tree over(Tree) rotate y*45 light_group "Tree"}
Post a reply to this message
|
|
co