Animate Sphere
Periodic Run
1
//Seconds to Parameter
2
msc = DSCore.DateTime.Components(dtm)["second"];
3
prm = msc>30?(60-msc)/30:msc/30;
4
5
//Curve
6
crv = NurbsCurve.ByPoints(Point.ByCoordinates
7
([0,10,-10,5],[0,10,5,-5],[0,10,5,0]));
8
9
//Sphere
10
sph = Sphere.ByCenterPointRadius(crv.PointAtParameter(prm),2);
Copied!
Copy link