[下载]：修改dwg 高度为0的工具

bluenokia · 发表于 2003-11-10 21:15:47

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

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

×

扫描后的图很多线条不在一个z坐标上,ch 等命令都不能用。
下载下面的lsp文件加载执行。可以把所有坐标改为0

jxsqq · 发表于 2003-11-10 21:26:12

能否制作一个演示

xcajcj · 发表于 2003-11-11 12:10:32

谢谢1楼的朋友，该程序很不错，实用性强，值得下载一用。

tw7777 · 发表于 2003-11-11 15:22:10

不错值得。感谢你的奉献

talkershadows · 发表于 2003-11-12 21:57:47

是个高手！自己编lsp

名动江湖 · 发表于 2003-11-26 18:59:57

加载后打什么命令呢？

xcajcj · 发表于 2003-11-26 19:16:15

最初由名动江湖发布
[B]加载后打什么命令呢？ [/B]

加载后键入“zo”即可。

下面是程序源代码
;;改变平面图中许多线两端的Z轴坐标不为零
(defun C:zo ()
(command "_.UCS" "")
(command "_.move" "_all" "" '(0 0 1e99) "" "_.move" "_p" "" '(0 0 -1e99) "")
(princ)
)

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

[下载]：修改dwg 高度为0的工具

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

相关帖子