how about doing the roots with something like Kevin Wamplers sig:

#version unofficial MegaPov 0.6;camera{location-z*8direction z*2look_at 0}
light_source{<-2,5,-2>*1e3 rgb 1}%K=text{ttf"cyrvetic.ttf""KEVIN".25,0
translate-1.5*x scale 1.5}%G=pigment{rgb<.8,.6,.4>}%R=seed(0);#macro B()<rand(
R)-.5,rand(R)-.5,rand(R)-.5>#end#macro A(C)%T=0;%V=<0,1,0>;#while(T<250)%S=0;%
P=B();%U=trace(K,C,P)-C;#while(S<15)%P1=B();%W=trace(K,C,P1)-C;#if(vlength(W)
<vlength(U))%P=P1;%U=trace(K,C,P)-C;#end%S=S+1;#end%V=V+P;%V=V/vlength(V);%D=(
250-T)/1e4;union{cylinder{C,C+V*.03,D}sphere{C,D}triangle{C,C+B()*D*10,C+B()*D
*4 pigment{rgb<0,.7,0>}}pigment{G}no_shadow}%C=C+V*.03;%T=T+1;#end#end%N=0;
#while(N<35)A(<(rand(R)-.5)*3, 0, rand(R)/4>*1.7)%N=N+1;#end  // Kevin Wampler


Nekar

--
#local N=<-20,40,100>;#local K=<20,-40,100>;#local R=seed(0);blob{#while((K-N).
x>0)#local X=N;#local N=N+<rand(R),rand(R),1>/3;#local N=(vlength(N-K)<vlength(
X-K)?N:2*X-N);sphere{<N.y,-N.x,N.z>,1,1 scale .02}sphere{N,1,1 scale.02}sphere{
<-N.x-40,N.y,N.z>1,1 scale.01}sphere{<N.x+40,-N.y,N.z>1,1 scale.01 }#end
pigment{rgbt 1}interior{media{emission <2,4,5>*5}}hollow}// Nekar Xenos
"Batronyx" <bat### [at] cadronhsacom> wrote in message
news:3b00c79f@news.povray.org...
> After seeing the photo of roots Tor posted, I just had to do this.
> It's still a work in progress though. The tiling is too evident for example
> so I need to massage the base image used in the heightfields some more. Also
> the plants look a little to regular. So with Tor's permission ( copyrighted
> photo: I asked and he granted ) here is what I have so far.
>
> ----------------------------------------
> Batronyx ^"^
> bat### [at] cadronhsacom
> http://www.batronyx.com
> Bhuddist monk to hotdog vendor:
>      "Make me one with everything."
> ----------------------------------------
>
>
>
>
>
>

Post a reply to this message