数学图形(2.9) Capareda曲线

还是绕在球上的线圈

#http://www.mathcurve.com/courbes3d/capareda/capareda.shtml

vertices = 12000

t = from 0 to (20*PI)

q = rand_int2(1, 5)
a = rand2(1, 10)
k = rand2(1, 10)

b = 2*a*sqrt(k*q + k)

x = a*((q+1)*cos(t) - k*cos((q+1)*t))
y = a*((q+1)*sin(t) - k*sin((q+1)*t))
z = b*cos(q*t/2)