miei script 
obelisco
xx=5*Sin(i)*Cos(j)
yy=5*Sin(i)*Sin(j)
z=5*Cos(i)
zz=zz*Sin(i)*Cos(i)
xx=xx*Cos(i)
zz=5*zz*Sin(i)*Cos(i+j*i-j)
If i=2 Then zz=3*Cos(j)
xx=xx+yy*Cos(j+i*j)
yy=yy+xx*Sin(i+j*j)
torre
serpentina
arrPoints(nCount) = Array(i*40*Sin(j*3),20*j*Sin(j/2)*3, 40*Rnd) 'serpentina'
nastro
arrPoints(nCount) = Array(i*2, Sin(j)*20*j, Tan(j/2)*5)
pilastro
arrPoints(nCount) = Array (j*Sin(j),i*Sin(i),i*j*2)
stalagmiti
