CAD中线不在一个高度上,怎样归零?

CAD里面的线有些不是在一个层面上,倒角都倒不起来,有什么方法把它们统一归到一个层面上?
请高手指教....
不在一个层面上的线蛮多的。。。 我的是CAD2006

(defun C:Z0 ( / SS1)
(setvar "cmdecho" 0)
(if (setq SS1 (ssget))
(progn
(command ".undo" "be")
(princ "\n正在处理图形数据,请稍候...")
(terpri)
(command ".ucs" "w")
(command ".move" SS1 "" '(0 0 1e99) "" ".move" "p" "" '(0 0 -1e99) "")
(princ "\nOK,已将所选图元Z坐标值全部归零。")
(command ".undo" "e")
);end progn
);end (if (/= SS1 nil)
(princ)
);end (defun C:Z=0 ( / SS1)

将以上内容复制在记事本中另存为“Z0.lsp”文件,在CAD命令行运行appload命令,加载刚保存的“Z0.lsp”文件后,在命令输入命令Z0即可。
温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2017-09-03
用鼠标点线的一个点,可以知道这个点的三维坐标(X,Y,Z)。其中Z就是这个点所在的高度,根据坐标移动线就,那么线的尾点就在同一平面上。
第2个回答  2009-02-27
右键单击_ACAD——视图
从选出的窗口中选择XZ或者YZ平面,把不一样高度的线的对应标高改成0
第3个回答  2009-02-27
不多的话 选择在属性里面将Z坐标改为0,
如果较多就用快速选择~
第4个回答  2015-06-16
去网上下个归0的LISP或ARX文件,加载运行就OK了~~不知道怎么找的话发信息给我~~我发给你。
相似回答