sunqv 发表于 2016-3-5 07:55:22

这段代码怎么做优化？

(defun c:zh ()   
        (setvar "cmdecho" 0)
        (command "layon")
        (setvar "cmdecho" 1)
        (prin1)
) ;;打开所有图层




(defun c:yd ()   
        (setvar "cmdecho" 0)
        (command "layon")   
        (command "layer" "off" "lt*,ds*,dx*,jy*,jk*,cs*,gd*,dt*,xh*,ys*,ws*,js*,zs*,zh*,tr*,rl*" "")       
        (setvar "cmdecho" 1)
        (prin1)
)


(defun c:lt ()   
        (setvar "cmdecho" 0)
        (command "layon")   
        (command "layer" "off" "yd*,ds*,dx*,jy*,jk*,cs*,gd*,dt*,xh*,ys*,ws*,js*,zs*,zh*,tr*,rl*" "")       
        (setvar "cmdecho" 1)
        (prin1)
)




(defun c:ds ()   
        (setvar "cmdecho" 0)
        (command "layon")   
        (command "layer" "off" "lt*,yd*,dx*,jy*,jk*,cs*,gd*,dt*,xh*,ys*,ws*,js*,zs*,zh*,tr*,rl*" "")       
        (setvar "cmdecho" 1)
        (prin1)
)

菜卷鱼 发表于 2016-3-5 11:26:05

问题是你想要怎样优化，你对现在哪里不满意？

sunqv 发表于 2020-11-2 22:50:24

四年前的问题了………
页: [1]
查看完整版本: 这段代码怎么做优化？