[求助]：如何将z坐标改为0?

zjwmm · 发表于 2003-11-19 16:59:09

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

各位大侠：经常碰到地形图上的点z值不一样，请问如何统一为0?

f5612140 · 发表于 2003-11-19 17:24:17

不用程序
change --> 選取物件 --> P --> E

wb0815 · 发表于 2003-11-25 15:21:36

对任何东西都好用吗？

不是吧好像对3dpoly就不好用

斑竹加几个爱心币好不好

xcajcj · 发表于 2003-11-25 23:59:23

用下面这个小程序可以实现将任意值的Z坐标改为0。

;;标高(Z坐标)归零实用程序
(defun C:Z=0 ()
(setvar "cmdecho" 0);关闭命令回显
(princ "\n正在处理图形数据,请稍候...")
(command "_.UCS" "");恢复为默认坐标系
(command "_.move" "_all" "" '(0 0 1e99) "" "_.move" "_p" "" '(0 0 -1e99) "");使Z坐标为0
(princ "\nOK,已将所有图元的标高值即Z坐标归零.")
(setvar "cmdecho" 1)
(princ)
);end (defun C:Z=0 ()

YAMA · 发表于 2003-11-27 17:11:48

不错，很方便

心梦相随 · 发表于 2003-11-28 19:14:45

将实体列表中的10 、11、12、13、14组吗的Z坐标转为0就可以了。另外LWPOLYLINE的Z坐标是在38组吗上，只要转变它就可以了。

萧山 · 发表于 2003-11-29 17:00:29

看了，还不错

syb106 · 发表于 2003-11-29 17:02:13

天正5里面有这样的命令

myfreemind · 发表于 2003-12-7 00:11:20

你把z值都改成0了，你后面的高程怎么办？如何取？

3xxx · 发表于 2003-12-11 10:48:28

不能选择啊

liyi7905 · 发表于 2006-3-13 20:48:22

我现在很需要这个东西，谢谢楼主了。

li809 · 发表于 2006-3-14 22:03:20

好用的程序，我用得多了

Underway · 发表于 2006-3-22 17:54:11

最初由 3xxx 发布
[B]不能选择啊 [/B]

(command "_.move" "_all" "" '(0 0 1e99) "" "_.move" "_p" "" '(0 0 -1e99) "");
===>
(command "Select")
(while (= (logand (getvar "CmdActive") 1) 1) (command pause))
(command "_.move" "_P" "" '(0 0 1e99) "" "_.move" "_p" "" '(0 0 -1e99) "");

;; end here

bluesky111 · 发表于 2006-3-23 16:24:32

感谢楼主，多多指教

w.xd168 · 发表于 2006-3-24 22:03:46

很方便
如果能有选择地改变对象的Z坐标就更好了

账号		自动登录	找回密码
密码			立即注册

[求助]：如何将z坐标改为0?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

浏览过的版块