第一步，用记事本把以下内容保存为z0.lsp文件
第二步，点击工具—AUTOLISP——加载——z0.lsp文件
第三步，命令行输入z0，回车，选ALL，回车，所有不共面的线条全部归零。
以下为记事本内容——
(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)
以上就是如何在CAD中解决两条不相交或不共面的线段连接问题的详细内容，更多请关注php中文网其它相关文章！
每个人都需要一台速度更快、更稳定的 PC。随着时间的推移，垃圾文件、旧注册表数据和不必要的后台进程会占用资源并降低性能。幸运的是，许多工具可以让 Windows 保持平稳运行。
Copyright 2014-2025 https://www.php.cn/ All Rights Reserved | php.cn | 湘ICP备2023035733号
262
收藏
