cad中怎么使标高统一减少

Question

一个个改很麻烦。
我记得是调用一个小程序。忘记怎么弄了，请大虾教了！！谢谢哦

Answer 1

1、将画面ctrl+a全选。
2、使用移动(m_)命令,输入第一点位置0,0,0 确定,然后输入第二点位置0,0,1e99(是数字一英语字母E和数字九九)确定。
3、将画面ctrl+a全选。
4、使用移动(m_)命令,输入第一点位置0,0,1e99 确定,然后输入第二点位置0,0,-1e99确定。
5、使用移动(m_)命令,输入第一点位置0,0,-1e99 确定,然后输入第二点位置 0,0,0确定，这样Z轴就归零了,原理是将问题的点全部移至正无穷,再移至负无穷,最后再移回到0坐标。即可使标高统一，减少即可。
注：在这样做之前,要将块先打散,不然即使按部就班的做了这些步骤,图形也回不到0坐标。

Answer 2

一、命令栏输入 change
/all
/空格
/pr
/e
0就可以了

二、输入命令：elev-标高和厚度设成0

三、请按步骤操作
1.将画面ctrl+a全选
2.使用移动(m_)命令,输入第一点位置0,0,0 确定,然后输入第二点位置
0,0,1e99(是数字一英语字母E和数字九九)确定
3.将画面ctrl+a全选
4.使用移动(m_)命令,输入第一点位置0,0,1e99 确定,然后输入第二点位置0,0,-1e99确定
5.使用移动(m_)命令,输入第一点位置0,0,-1e99 确定,然后输入第二点位置 0,0,0确定
这样Z轴就归零了,原理是将问题的点全部移至正无穷,再移至负无穷,最后再移回到0坐标
注意:在这样做之前,要将块先打散,不然即使按部就班的做了这些步骤,图形也回不到0坐标

四、高版本解决的问题，
天正右侧的工具栏里，有个 工具--其他工具--统一标高
然后框上要修改标高的图形

五、;begin
(command "move" "all" "" "@" "@0,0,9e99")
(command "move" "p" "" "@" "@0,0,-9e99")
;end

=====================================上面的存为.lsp文件，加载进cad里面就可以了！

六、CAD里可以在网上下载一个插件，我用的是天正，工具里有个统一标高，选用那个命令选中所要归零的对象就行了。

Answer 3

统一减少标高还没想到办法。
全部改为统一标高可以按如下操作：把物体全部选中，鼠标右键》特性》标高。选物体可以用“快速选择”挑自己想要的物体。本回答被提问者采纳

Answer 4

方法1：切换到前、或者后视图，选择全部对象，向下移动一段距离就可以全部减少标高了。
方法2：自定义UCS系统，更改Z坐标值。

Answer 5

可以用lISP语言：
(defun c:xx()
(setq gz(getreal "\n 请输入高程改正数: "))
(setq s (ssget "x" '((0 . "text") (8 . "GCD"))))
(setq len (sslength s))
(progn
(setq n 0)
(repeat len
(setq tb (entget (ssname s n)))
(setq ot (assoc '1 tb))
(setq nt (cons (car ot) (rtos (+ gz (atof (cdr ot))))))
(setq ntb(subst nt ot tb))
(entmod ntb)
(setq n (+ n 1))
);repeat
);progn

);defun