GALERIE    EN COURS    SCENES    MACROS    GUIDE    A PROPOS


“Funny Knot”



Cette courbe est définie par l'équation suivante :
  • x = - 22.cos(t) - 128.sin(t) - 44.cos(3.t) - 78.sin(3.t)
  • y = 11.cos(t) - 43.cos(3.t) + 34.cos(5.t) - 39.sin(5.t)
  • z = 70.cos(3.t) - 40.sin(3.t) + 8.cos(5.t)- 9.sin(5.t)
  • avec t = [0..2π]


SDL POV :
#declare deuxpi = 2*pi;
#declare r = 0.50;

#declare currentPt = <0.00, 0.00, 0.00>;
#declare previousPt = <0.00, 0.00, 0.00>;
#declare theColor = rgb <0.00, 0.00, 0.00>;

#declare i=0;
#declare step=pi/250;
#while (i < deuxpi)
	#set theColor = rgb CH2RGB(degrees(i));
	#set currentPt =0.05*<	- 22*cos(i) - 128*sin(i) - 44*cos(3*i) - 78*sin(3*i),
		11*cos(i) - 43*cos(3*i) + 34*cos(5*i) - 39*sin(5*i),
		70*cos(3*i) - 40*sin(3*i) + 8*cos(5*i)- 9*sin(5*i)>;
	sphere { currentPt, r pigment { theColor } finish { courbeFinish } }
	#if(i!=0)
		cylinder { previousPt, currentPt, r pigment { theColor }  finish { courbeFinish } }
	#end
	#set previousPt = currentPt;
	#set i=i+step;
#end
-- Mêmes remarques que les courbes précédentes.

-- Vous remarquerez le coeficient de mise à l'échelle pour l'ensemble de la courbe lors que calcul :
     #set currentPt =0.05*<...>.

On obtient alors l'image suivante :
Funny Knot





Haut de la page | Sommaire ]