我也来凑个热闹，视窗切换，捅了视窗切换的耗子窝了论坛

664571221

输入0后输入视窗编号0-9，建立视窗，然后输入0-9命令就可以切换到对应的视窗
(defun c:0 (/ p)
        (setvar "CMDECHO" 0)
                (setq #BT-VIEW (getint"\#BT-VIEW视图编号:"))
        (command "-view"  "w" (itoa #BT-VIEW) (setq p (getpoint)) (getcorner p))
        (princ)
)



(defun C:1()   (command "-view" "r" "1" ""))
(defun C:2()   (command "-view" "r" "2" ""))
(defun C:3()   (command "-view" "r" "3" ""))
(defun C:4()   (command "-view" "r" "4" ""))
(defun C:5()   (command "-view" "r" "5" ""))
(defun C:6()   (command "-view" "r" "6" ""))
(defun C:7()   (command "-view" "r" "7" ""))
(defun C:8()   (command "-view" "r" "8" ""))
(defun C:9()   (command "-view" "r" "9" ""))

不一样地设计

感谢分享。  

qifeifei

打卡 真厉害

咏郡

还是你会玩

664571221

咏郡 发表于 2025-9-11 10:07
还是你会玩

兄弟你也逛论坛呀，今天不忙吗

咏郡

664571221 发表于 2025-9-11 10:30
兄弟你也逛论坛呀，今天不忙吗

还行，有空就来逛一逛

bai2000

不错，就是不能支持透明命令