46c5dabe$1@news.povray.org...
> Shay wrote:
>
>
>
> I am not really sure there is support for an interpolated or function 
> driven reduction of the radius in the sphere_sweep syntax but I have only 
> ever looked at it briefly. In any case I still would not be able to 
> compose such a function.
>
Does that  fit your needs?

#declare P1=.7;
#declare P2=.9;
#declare P3=1.1;
#declare P4=1.15;


#declare Shaft=
sphere_sweep {

  cubic_spline

  5,
  <0, 7.5, 0>, P1
  <0, 5.5, 0>, P2
  <0, 0, 0>,P3
  <0, -5.5, 0>,P4
  <0, -7.5, 0>, P4
  pigment {color rgb 1 }
}

 #declare Flute =
  sphere_sweep {
  cubic_spline
  5,
  <P1, 7.5, 0>, 0.1
  <P2, 5, 0>, .1
  <P3, 0, 0>, .1
  <P4, -5, 0>,.1
  <P4, -7.5, 0>, .1
pigment {color rgb 1  }
}

#declare Flutes= union{
#declare C_Flute =0;

#while (C_Flute<20)
object{Flute rotate y*18*C_Flute}
   #declare C_Flute =C_Flute+1;
#end
}
difference{
object{Shaft}
object{Flutes}
}

Post a reply to this message