[求助]：请教一下QUIT命令

xcajcj

前不久我编了一个小程序，想在关闭CAD时让CAD系统自动将加载的自定义菜单卸载了。于是用到了QUIT命令，程序在R14下没什么问题，但在2002中测试就没效果了。查看了一下，感觉好象是R14下点CAD窗口右上角的“×”关闭CAD时，调用了QUIT命令，所以程序能达到预期效果。但2002中点CAD窗口右上角的“×”关闭CAD时，系统不知是调用了什么命令，使程序达不到取其效果了。

附程序：
;;acad.lsp
(defun S::STARTUP ()
(setvar "cmdecho" 0)
(command "undefine" "QUIT");;取消QUIT命令

(defun C:QUIT ()
(if (menugroup "mymenu") (command "menuunload" "mymenu"))
(command "menuunload" "AJCAD")
(alert "\n已经调用QUIT命令")
(command ".QUIT")
(princ)
);end (defun C:QUIT ()

(princ)
);end (defun S::STARTUP ()

说明：2002中在命令行运行QUIT可以卸载自定义菜单，但与退出CAD系统自动卸载的初衷不相符。
望各位大侠解疑答惑，2002下点CAD窗口右上角的“×”关闭CAD时系统是调用的什么命令关闭CAD的？

雨箭风刀

关闭进程吧？或者是“.quit”（原始退出命令）？

xcajcj

2楼你说了等于没说

sanywufour

quit可以啊！