移动Z坐标

荒野孤行 · 发表于 2015-5-21 23:31

本帖最后由荒野孤行于 2015-6-2 19:44 编辑

这样更改了Z坐标后，再结合变换的视图，用来做叠层侧视图是很方便的。示例请见图片。
;;;***移动Z坐标程序开始*****
(defun c:z1 ()
  (setvar "cmdecho" 0)
  (setvar "OSMODE" 15359)
  (command "undo" "be")
  (princ "\n★功能:快速移动图元Z轴距离.")
(setq ss (ssget))
  (initget 2)
  (if (not (setq zgd (getreal "\n设置沿Z轴移动距离<5>:"))) (setq zgd 5.0))
  (setvar "cmdecho" 0)
  (setq pt0 (list 0 0 0))
  (setq pt1 (list 0 0 zgd))
  (command "MOVE" ss "" pt0 pt1)
  (command "undo" "e")
  (setvar "OSMODE" 15359)
  (princ)
)
;;;***移动Z坐标程序结束*****

图片中使用到的插件（WDY工具箱）的地址：http://bbs.mjtd.com/thread-108389-1-1.html

孙玉坤 · 发表于 2022-11-26 10:37

大师您好这个原码能修改成向z轴移动可以输入数值吗加记忆

ynhh · 发表于 2022-9-24 00:06

请教大师
可以将二维多段线中指定任意一点，仅修改这个指定点的Z值吗
谢谢

999999 · 发表于 2020-8-16 20:21

谢谢楼主的分享呦

荒野孤行 · 发表于 2015-5-24 21:58

本帖最后由荒野孤行于 2015-6-2 19:53 编辑

这个在我的工作（触摸屏结构设计）中用得到。

zzyong00 · 发表于 2015-5-24 22:37

不懂，帮顶。。。

200853006 · 发表于 2015-5-25 00:17

学习好东西！

baoxiaozhong · 发表于 2015-5-25 06:03

謝謝你的分享。

侧影中有你 · 发表于 2015-5-25 08:44

学习好东西。

长风（尚品） · 发表于 2015-5-25 08:51

路过。看看是什么。

819534890 · 发表于 2015-5-25 09:06

回复看看，顺便学习一下，谢谢

ynhh · 发表于 2015-5-25 09:28

虽然不知道这个行业

但很是感觉你的大度与分享

linheyuanpcb · 发表于 2015-5-25 13:45

FPC实用

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

[源码] 移动Z坐标

本帖子中包含更多资源

相关帖子