crazylsp 发表于 2011-1-7 16:23:31

线段z坐标变成零的问题

本帖最后由 crazylsp 于 2011-4-21 09:09 编辑

Z坐标归零, 兰色线段OK了, 怎么有些图黄色的线段不能一次完成?要反复好多次t或tt才能完成,如图,请教下怎么回事?
还想两个程序合在一起方便点, 不知道怎么做




461045462 发表于 2011-1-7 17:32:47

没有细看程序。
对于两个程序合在一起方便点,在第一个程序结束前加一个(c:t)j就可以了

461045462 发表于 2011-1-7 17:39:19

Z坐标归零我是采用CHANGE命令方式

crazylsp 发表于 2011-1-7 17:52:23

本帖最后由 crazylsp 于 2011-1-7 17:53 编辑

哦,学习了, 谢谢

chengx2000 发表于 2011-1-31 13:34:54

repeat 100次有意义吗?

ZZXXQQ 发表于 2011-2-1 09:25:54

论坛有Z坐标归零贴子。直接使用MOVE命令两次就行。
(defun c:tt ()
(setvar "CMDECHO" 0)
(if (setq ss (ssget))
(command ".MOVE" ss "" "0,0,0" "0,0,1000e99" ".MOVE" "P" "" "0,0,1000e99" "0,0,0")
)
(setvar "CMDECHO" 1)
(princ)
)

tiger1973 发表于 2011-2-7 01:22:36

我用天正自带的那个

xcqkenl 发表于 2012-7-6 17:15:51

ZZXXQQ 发表于 2011-2-1 09:25 static/image/common/back.gif
论坛有Z坐标归零贴子。直接使用MOVE命令两次就行。
(defun c:tt ()
(setvar "CMDECHO" 0)


麻烦斑竹给讲下这个lisp的意思可以吗?

xcqkenl 发表于 2012-7-6 21:06:08

xcqkenl 发表于 2012-7-6 17:15 static/image/common/back.gif
麻烦斑竹给讲下这个lisp的意思可以吗?

谢谢你,我主要问题是这个lisp我用来试了下,结果还是不能解决问题,具体在这个哈http://bbs.mjtd.com/forum.php?mod=viewthread&tid=95201&page=1#pid537516

longshentaizi 发表于 2015-9-8 14:27:24

VERY GOOD.
页: [1]
查看完整版本: 线段z坐标变成零的问题