4.62.grs

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

entity/cr,pt(3),pl,obj,p

cr=circle/0,0,0,1
pt(1)=point/-1,1,-1
pt(2)=point/-1,-1,-1
pt(3)=point/1,0,1
pl=plane/pt
obj=cylndr/cr,pl,pt(3)
halt