我对LISPs很陌生,通常会尝试制作基本的LISPs。我几乎没有理解,但似乎通过了反复试验。
目前,我有这个Lisp程序
- (defun C:` ()
- (command "-LAYER" "FILTER" "E" "All Used Layers" "C" "S" "All Used Layers" "X" "")
- (command "classiclayer")
- princ)
我想要实现的是:按`执行classiclayer命令,但我希望我的图层过滤器设置为'所有使用的图层'。我所拥有的非常好,它确实将我的图层过滤器设置为“所有使用的图层”,但仅在classiclayer中,而不是在图层属性管理器中。因此,当我在classiclayer中搜索时,它只在图层属性管理器中的过滤器中搜索图层。
在打开classiclayer之前,我想在Layer Properties Manager中将我的过滤器设置为“All Used Layers”,因为过滤器将从LPM复制到classicmanager。
这可能吗?
提前谢谢。
编辑:
- (defun C:` ()
- (command "layerclose"
- (command "-LAYER" "FILTER" "E" "All Used Layers" "C" "S" "All Used Layers" "X" "")
- (command "layerpalette"
- (command "classiclayer")
- princ)
现在,在图层属性管理器和classiclayer中,我的过滤器都设置为当前,但速度非常慢。
如果有人有更好的安排或想法,请告诉我 |