用法
评论
建议
取 消
确 定
(defun entity:make-arc (cen rad startpt endpt) "创建圆弧" (entmakex (list (quote (0 . "ARC")) (quote (100 . "AcDbEntity")) (quote (100 . "AcDbCircle")) (quote (100 . "AcDbArc")) (cons 10 cen) (cons 40 rad) (cons 50 (if (listp startpt) (angle cen startpt) startpt)) (cons 51 (if (p:listp endpt) (angle cen endpt) endpt)))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 725 个
函数库类别: 50 种
上传记录
刷新
冀公网安备 13050302000400号