4.81.grs

UG二次开发很好的东西 需要的朋友可以下载来看看 很好用啊

entity/refpt,pt(4),spln1,ln1,obj

refpt=point/-10,-10,0
pt(1)=point/-10,0,0
pt(2)=point/-5,3,3
pt(3)=point/5,-2,-2
pt(4)=point/10,0,0
spln1=spline/pt
ln1=line/10,-10,0,-10,-10,0
obj=rldsrf/spln1,,ln1,refpt
halt