以下代码仅供参考
(defun c:createcylinder ()
(setq center (getpoint "\n请指定圆柱体底面圆心位置: "))
(setq radius (getdist center "\n请指定圆柱体底面半径: "))
(setq height (getdist "\n请指定圆柱体高度: "))
(command "cylinder" center radius height)
(princ)
)
分类
问答社区
软件专区
软件升级
软件激活
暂无评论