一键重置选定外部参照的图层状态

sinommw

之前在论坛中找到一个程序，可以很方便的进行外部参照的重载XFRA、卸载XFXA、拆离XFDA、绑定XFBA等操作，非常方便。
但对于外部参照图层方面的操作，往往不是很方便，需要打开图层状态管理器，找到图层名来操作，工作量较大。
如果能有一个程序作为上述程序的补充，实践起来将会非常快捷。
设想如下：
当一张图中有多个参照文件，如文件A和B时，输入LAYTHW，可以解冻所有图层，LAYON可以打开所有图层。但实际中往往需要分参照文件来操作，CAD自身命令就显得有些不足。

欲求一程序，可实现分文件操作，解冻所选参照文件图层，解锁所选参照文件图层，打开所选参照文件图层。最好能有预选功能。
为方便操作，分别指定命令：XFJD，XFJS，XFDK。
不知道可否实现？

谢谢大家了！

357785513

要求太高了

flowerson

同求此功能。

江南十笑

;开关参照图层
(defun c:WW107()
   (command ".layer" "f" "*|*" "")
   
      (princ)
)

(defun c:WW106()
   (command ".layer" "t" "*|*" "")
   
    (princ)
)