用法
评论
建议
取 消
确 定
(defun curve:pline-convexity (ent / i lst v) "多段线端点列表,返回三维点坐标" "三维点坐标列表" "(curve:pline-3dpoints (car (entsel)))" (cond ((and (= (quote ename) (type ent)) (= "LINE" (entity:getdxf ent 0))) (list 0)) (t (mapcar (quote cdr) (vl-remove-if-not (quote (lambda (x) (= 42 (car x)))) (entget ent))))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 645 个
函数库类别: 41 种
上传记录
刷新