lisp函数大全详解 利用lisp编写cad插件,发现其中ssget函数与cad的当前视口有关?

利用lisp编写cad插件,发现其中ssget函数与cad的当前视口有关?不会的。我怀疑你的抓捕行动正在进行中。使用(setvar“osmode”0)关闭捕获。如果要使用该命令恢复捕获,只需加载以下语

利用lisp编写cad插件,发现其中ssget函数与cad的当前视口有关?

不会的。我怀疑你的抓捕行动正在进行中。使用(setvar“osmode”0)关闭捕获。如果要使用该命令恢复捕获,只需加载以下语句。在主程序的开头使用(cxks),在末尾使用(cxjs)来调用这两个子例程。

子程序1—程序开头的变量设置。

(defun cxks(/)

(setq oldcmd(getvar“cmdecho”)

)(setvar“cmdecho”0)

(setq oldlip(getvar“blipmode”)

(setvar“blipmode”0)

(setq oldsnap(getvar“osmode”)

(setvar“osmode”)0)

!(princ “”n**“)

]子例程2--程序末尾的变量返回

(defun cxjs(/)

(setvar “blipmode”oldblip)

(setvar “cmdecho”oldcmd)

(setvar “osmode”oldsnap)

(princ “n…”)

(princ)