[求助]请高手帮忙修改一个lisp【已解决】

smartstar · 发表于 2008-9-24 13:17:00

本帖最后由作者于 2008-12-17 17:21:01 编辑

这个是“在本视口冻结图层”的一个lisp

(defun C:VQ ( / Ent Entlist Lay)
(setq Ent (car (entsel "\选择视口内要冻结的图层上的对象: "))
Entlist (entget Ent)
Lay (cdr (assoc 8 Entlist)))
(command "vplayer" "f" Lay "" "")
)

这个程序程序在执行过程只能“单选”，不能“框选”，请高手帮忙修改，谢谢！

ZZXXQQ · 发表于 2008-9-26 13:10:00

本帖最后由作者于 2009-5-8 18:41:23 编辑

游客，本帖隐藏的内容需要发帖数高于 2 才可浏览，你当前发帖数只有 0

smartstar · 发表于 2008-9-28 12:29:00

十分感谢！！！！终于不用一个一个的点了！

smartstar · 发表于 2008-9-28 16:56:00

能不能再帮我把下面这个程序在改一下，也改成“框选”的！

谢谢！

(defun C:VT ( / Ent Entlist Lay)
(setq Ent (car (entsel "\选择要在视口中隔离的图层上的对象或 [设置(S)/放弃(U)]: "))
Entlist (entget Ent)
Lay (cdr (assoc 8 Entlist)))
(command "LAYVPI" Lay "" "")
)

guican · 发表于 2009-4-26 21:15:00

好，我正在找

zhaoxingying · 发表于 2009-5-4 16:52:00

我也需要啊

zhaoxingying · 发表于 2009-5-4 16:53:00

怎么看不到啊

zhaoxingying · 发表于 2009-5-4 16:56:00

怎么看不到啊

zhaoxingying · 发表于 2009-5-4 16:57:00

怎么样行啊

gangxiadexue · 发表于 2009-5-8 15:35:00

我也学习一下,呵呵,谢谢楼主啊

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