POV-Ray : Newsgroups : povray.general : Test : Re: Test Server Time
7 Aug 2024 23:17:25 EDT (-0400)
  Re: Test  
From: Warp
Date: 8 May 2001 10:01:54
Message: <3af7fc52@news.povray.org>
Nekar Xenos <j-p### [at] citywalkcoza> wrote:
: #local Q=seed(7);#local B=<-2,2,5>;#local E=<2,-2,5>;#local C=<2,4,6>*4;blob{
: threshold 1#while(vlength(B-E)>.1)#local S=B;#local B=B+<rand(Q),rand(Q),rand(
: Q)>/20;#local B=B-2*(B-S)*(vlength(B-E)>vlength(S-E));sphere{0,1,1 scale.1//NX
: translate<B.y,-B.x,B.z>}sphere{0,1,1 scale.1translate B}#end pigment{rgb C}}

  Why all that extra unnecessary stuff which makes the signature longer?
  Removing unnecessary stuff gives something like:

#local Q=seed(7);#local B=<-2,2,5>;#local E=<2,-2,5>;blob{#while
(vlength(B-E)>.1)#local S=B;#local B=B+<rand(Q),rand(Q),rand(
Q)>/20;#local B=B-2*(B-S)*(vlength(B-E)>vlength(S-E));sphere
{<B.y,-B.x,B.z>,.1,1}sphere{B,.1,1}#end pigment{rgb 9}}//     NX



-- 
#macro N(D,I)#if(I<6)cylinder{M()#local D[I]=div(D[I],104);M().5,2pigment{
rgb M()}}N(D,(D[I]>99?I:I+1))#end#end#macro M()<mod(D[I],13)-6,mod(div(D[I
],13),8)-3,10>#end blob{N(array[6]{11117333955,
7382340,3358,3900569407,970,4254934330},0)}//                     - Warp -


Post a reply to this message

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