3个回答
展开全部
lisp切换图层语言,0为你所设图层名称,操作为:为选中对象0/1回车。记得将txt文件后序名改为.lisp
(defun c:0()
(SETVAR "CMDECHO" 0)
(PRINC "YFworkroom 将图层改成 0图层: ")
(setq ss (ssget))
(command "change" ss "" "p" "la" "0" ""))
(defun c:1()
(SETVAR "CMDECHO" 0)
(PRINC "YFworkroom 将图层改成 1图层: ")
(setq ss (ssget))
(command "change" ss "" "p" "la" "1" ""))
(defun c:0()
(SETVAR "CMDECHO" 0)
(PRINC "YFworkroom 将图层改成 0图层: ")
(setq ss (ssget))
(command "change" ss "" "p" "la" "0" ""))
(defun c:1()
(SETVAR "CMDECHO" 0)
(PRINC "YFworkroom 将图层改成 1图层: ")
(setq ss (ssget))
(command "change" ss "" "p" "la" "1" ""))
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |