shp = splineShape() select shp spln = addNewSpline shpfor i = 1 to 1000 do (o= random 90 180 addKnot shp spln #corner #line [i,0,(sin(i*o))])
converttosplineshape shp updateShape shp