求高手帮助改进。

魔卡猪猪 · 发表于 2013-11-28 13:40:58

求高手帮改成可框选，可点选。谢谢
(defun c:tt (/ jl wt tx new)
   (setvar "cmdecho" 0)
(setq jl 0.25)
  (while
(setq wt (entsel "\n选择偏移物体:")
      fx (getpoint (cadr wt) "\n偏移方向:")
)
(command ".offset" jl wt  fx ^c)
(command "_.select" "l" "")
(setq new (ssget "p"))
(COMMAND "._CHANGE" new "" "P" "C" "195" "")
(entdel (car wt)
)
  )
(setvar "cmdecho" 1)

)

魔卡猪猪 · 发表于 2013-11-29 13:35:26

各位大神，帮帮忙啊。

zxhuangchunwei · 发表于 2013-11-29 17:20:50

你应该没必要使用entsel选取对象时所产生的点的坐标吧？

魔卡猪猪 · 发表于 2013-12-4 12:32:42

哪位大神给小的我改改呗。拜谢啦。

魔卡猪猪 · 发表于 2014-1-3 20:48:32

来改高手帮帮忙吧谢谢啦

ZZXXQQ · 发表于 2014-1-4 08:34:57

魔卡猪猪发表于 2014-1-3 20:48
来改高手帮帮忙吧谢谢啦

论坛有这样的源码，找找看。
另外：是要向外偏呢？还是要向内偏呢？还是内外都偏呢？

魔卡猪猪 · 发表于 2014-1-4 19:44:49

本帖最后由魔卡猪猪于 2014-1-4 20:13 编辑

ZZXXQQ 发表于 2014-1-4 08:34
论坛有这样的源码，找找看。
另外：是要向外偏呢？还是要向内偏呢？还是内外都偏呢？

我想要可以内外自由选择的我没搜索到啊请版主大人指点（Gu_xl版主那个帖子发布的不好用操作步骤那么多）

ZZXXQQ · 发表于 2014-1-4 22:27:15

魔卡猪猪发表于 2014-1-4 19:44
我想要可以内外自由选择的我没搜索到啊请版主大人指点（Gu_xl版主那个帖子发布的不好用操作 ...

自由选择，你原来的就行。

魔卡猪猪 · 发表于 2014-1-4 22:29:22

ZZXXQQ 发表于 2014-1-4 22:27
自由选择，你原来的就行。

但是一次只能选择一个目标

ZZXXQQ · 发表于 2014-1-5 20:36:26

魔卡猪猪发表于 2014-1-4 22:29
但是一次只能选择一个目标

不是循环的吗

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

[提问] 求高手帮助改进。