如何判断LISP程序已经执行？

lyb_dsa

如何判断LISP程序装载还是没有装载？

meflying

判断函数符号，如果是空，则为加载，否则就未加载
如：
(defun c:test()
  (princ "hello")
  (princ)
)
这样判断：
(if c:test
  (princ "已加载")
  (princ "未加载")
)

BDYCAD

在你的LISP程序的后面加上一個輸出函數就可以了.
如:
在程序后面加上
(PRINC "\n **程序加載成功,")
如果你的程序在啟動CAD時在COMMAND行看到"**程序加載成功"就說明你的程序裝載了.
不知你要的是不是這個?



-------------------------------------------------
我愛CAD, 共同學習, 共同交流. 為CHINA的CAD工程更上一層樓.....

lyb_dsa

谢谢meflying