POV-Ray : Newsgroups : povray.advanced-users : Blob query (cracks) : Re: Blob query (cracks) Server Time
28 Jul 2024 18:15:33 EDT (-0400)
  Re: Blob query (cracks)  
From: evbarry
Date: 18 Aug 2004 22:15:00
Message: <web.41240c8bc390baa5addfd5580@news.povray.org>
Andrew C on Mozilla <voi### [at] devnull> wrote:
> You're probably going to have to post an image plus source code for
> anyone to work out why it's doing this...

Here is the source... I called it (an include file) like this...

#declare AstObjs1 = 100;
#declare AstObjs2 = 0;
#declare AstSeed1 = 0;
object { #include "astroid3.inc" texture { AstTex } scale 800 rotate 0*z
translate 3000*y-500*x }


Here is astroid3.inc

#ifndef (AstSeed1)
#declare AstSeed1 = 911;
#end

#ifndef (AstSeed2)
#declare AstSeed2 = 912;
#end

#ifndef (AstSeed13)
#declare AstSeed3 = 913;
#end

#ifndef (AstObjs1)
#declare AstObjs1 = 50;
#end

#ifndef (AstObjs2)
#declare AstObjs2 = 50;
#end

#ifndef (AstObjs3)
#declare AstObjs3 = 50;
#end

#ifndef (AR1) #declare AR1 = seed(AstSeed1); #end
#ifndef (AR2) #declare AR2 = seed(AstSeed2); #end
#ifndef (AR3) #declare AR3 = seed(AstSeed3); #end

blob {
 threshold 0.8

 #declare AL = 0;
 #while (AL < AstObjs1)
  sphere { <0.5, 0, 0>, 0.5, 0.25+0.75*rand(AR1)
   rotate 360*rand(AR1)*x+360*rand(AR1)*y+360*rand(AR1)*z
  }
 #declare AL = AL + 1;
 #end

 #declare AL = 0;
 #while (AL < AstObjs2)
  sphere { <0, 0, 0>, 0.25, -0.75-0.25*rand(AR2)
   scale 0.75*x+y+z
   translate 0.75*x
   rotate 360*rand(AR2)*x+360*rand(AR2)*y+360*rand(AR2)*z
                }
 #declare AL = AL + 1;
 #end

 sturm
}


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.