5.8.grs

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

entity/obj1,obj2,obj3

number/mat1(12),mat2(12),mat(12)
obj1=circle/0,10,0,5
$$利用旋转变换和缩放变换生成圆obj2。
mat1(1..12)=matrix/xyrot,-90
mat2(1..12)=matrix/scale,2
mat(1..12)=matrix/mat1,mat2
obj2=transf/mat,obj1
$$利用旋转变换和平移变换生成圆obj3。
mat1(1..12)=matrix/xyrot,90
mat2(1..12)=matrix/transl,0,-10,0
mat(1..12)=matrix/mat1,mat2
obj3=transf/mat,obj1
halt