|
|
Wow that's amazing, makes me think of paper doves, maybe you
should post them in p.o-t:-)
How'd ya do it?
--
Cheers
Steve email mailto:ste### [at] zeroppsuklinuxnet
%HAV-A-NICEDAY Error not enough coffee 0 pps.
web http://www.zeropps.uklinux.net/
or http://start.at/zero-pps
3:40pm up 8 days, 3:01, 3 users, load average: 1.20, 1.11, 1.08
Post a reply to this message
|
|
|
|
Steve wrote:
>How'd ya do it?
>
Like this and some variations on the theme:
#declare Bez_arr=array[16]{
<0, 0, 6>, <2, 0, 6>, < 4, 0, 6>, < 6, 0, 6,>
<0, 0, 4>, <2, 0, 4>, < 4, 0, 4>, < 6, 0, 4,>
<0,-3, 2>, <2, 0, 2>, < 4, 0, 2>, < 6, 0, 2,>
<0,-3, 0>, <2,-3, 0>, < 4, 0, 0>, < 6, 0, 0,>
}
#declare Nr=0;
#declare St=0.3;
#declare P1= union{
#while (Nr<5)
#declare I=0;
#declare N=dimension_size(Bez_arr,1);
bicubic_patch{
type 1
flatness 0
u_steps 5
v_steps 5
#while (I<N)
#if (I=8|I=12|I=13)
Bez_arr[I]+<Nr/3,Nr,Nr/3>
#else
Bez_arr[I]+<0,Nr/10,0>
#end
#declare I=I+1;
#end
double_illuminate
pigment {rgb 1}
}
#declare Nr=Nr+St;
#end
}
Ingo
--
Photography: http://members.home.nl/ingoogni/
Pov-Ray : http://members.home.nl/seed7/
Post a reply to this message
|
|