POV-Ray : Newsgroups : povray.general : Test : Re: Test Server Time
7 Aug 2024 23:24:35 EDT (-0400)
  Re: Test  
From: Warp
Date: 8 May 2001 11:28:20
Message: <3af81094@news.povray.org>
Nekar Xenos <j-p### [at] citywalkcoza> wrote:
: #local Q=seed(7);#local B=<-2,2,5>;#local E=<2,-2,5>;blob{threshold 1#while((E
: -B).x>.1)#local S=B;#local B=B+<rand(Q),rand(Q),rand(Q)>/20;#local B=(vlength(
: B-E)<vlength(S-E)?B:2*S-B);sphere{<B.y,-B.x,B.z>,.1,1}sphere{B,.1,1}#end
: pigment{rgb<8,16,24>}}// nekar Xenos

  If a bit wider version of the "X" doesn't bother you, you can make it
a three-liner:

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



-- 
#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.