把此贴删除了

500w008 · 发表于 2009-10-4 10:50

提示: 作者被禁止或删除内容自动屏蔽

狂刀无痕 · 发表于 2009-10-4 22:06

entg 哪儿来？

ZZXXQQ · 发表于 2009-10-4 22:06

(defun c:tt ()
(setvar "CMDECHO" 0)
(if (setq ss (ssget '((8 . "12000"))))
(command ".chprop" ss "" "LA" "0" "")
)
(setvar "CMDECHO" 1)
(princ)
)

啵浪鼓 · 发表于 2009-10-4 23:26

楼主要求不用选择,3楼斑主的程序稍改一下:

(defun c:tt ()
(setvar "CMDECHO" 0)
(if (setq ss (ssget "X"'((8 . "12000"))))
(command ".chprop" ss "" "LA" "0" "")
)
(setvar "CMDECHO" 1)
(princ)
)

明经网友 *发表于 2009-10-5 00:26* · 发表于 2009-10-5 00:26

ZZXXQQ

啵浪鼓

谢谢两位大哥请允许我称呼你们大哥

明经网友 *发表于 2009-10-5 00:27* · 发表于 2009-10-5 00:27

谢谢两位大哥请允许我称呼你们两位为大哥

500w008 · 发表于 2009-10-5 00:30

提示: 作者被禁止或删除内容自动屏蔽

明经网友 *发表于 2009-10-9 08:24* · 发表于 2009-10-9 08:24

命令rename 能直接改

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

500w008 500w008 当前离线积分 6427 明经币个注册时间 2009-9-28 在线时间小时威望金钱个贡献激情	发表于 2009-10-4 10:50 \| 显示全部楼层 \|阅读模式提示: 作者被禁止或删除内容自动屏蔽

	回复使用道具举报置顶卡变色卡显身卡

500w008 500w008 当前离线积分 6427 明经币个注册时间 2009-9-28 在线时间小时威望金钱个贡献激情	楼主\| 发表于 2009-10-5 00:30 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡

[资源] 把此贴删除了