写了个想心电图一样的曲线

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

converttosplineshape shp 
updateShape shp