4.70.grs

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

entity/pt1,pt2,pt3,obj

pt1=point/0,2,0
pt2=point/0,1.5,0
pt3=point/0,0,0
obj=cone/pt1,vect,0,1,0,angle,30,pt2,pt3
halt