|
|
On Sat, 27 Oct 2001 04:38:10 +0200, Tor Olav Kristensen
<tor### [at] hotmailcom> wrote:
> "W?odzimierz ABX Skiba" wrote:
> >
> > On Fri, 26 Oct 2001 15:21:31 +0200, W?odzimierz ABX Skiba
> > <abx### [at] babilonorg> wrote:
> > > #macro B() array#local C=1;#while(C<=5)[C]#local C=C+1;#end #end
> > > #local A=B()
> > >
> > > it still not work with beta 6
> >
> > but this works fine
> >
> > #local A=array[#local C=1;#while(C<=4)C][#local C=C+1;#end 5]
>
> Are you REALLY sure that it is necessary
> to EVER write such ugly lines of code ???
working line is ugly but not working line is pretty usefull
I found it not by playing but working on useful macro
ABX
--
#declare _=function(a,b,x){((a^2)+(b^2))^.5-x}#default {pigment{color rgb 1}}
union{plane{y,-3}plane{-x,-3}finish{reflection 1 ambient 0}}isosurface{ //ABX
function{_(x-2,y,1)|_((x+y)*.7,z,.1)|_((x+y+2)*.7,z,.1)|_(x/2+y*.8+1.5,z,.1)}
contained_by{box{<0,-3,-.1>,<3,0,.1>}}translate z*15finish{ambient 1}}//POV35
Post a reply to this message
|
|