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

vertices = 12000

t = from 0 to (80*PI)

a = 10
q = rand2(0.5, 10)
w = rand2(PI*0.1, PI*0.9)

s = sin(w)
c = cos(w)
 
x = a*[(q - c)*cos(t) + c*cos(t)*cos(q*t) + sin(t)*sin(q*t)]
z = a*[(q - c)*sin(t) + c*sin(t)*cos(q*t) - cos(t)*sin(q*t)]
y = a*s*(1 - cos(q*t))
