LISP程序中强制显示Autocad某个功能的对话框

 本日志的起因是回答某位朋友的一个问题：

该朋友反映：定义了如下一个命令：
(defun C:bb()
(princ "创建块")
(command "block")
)
当加载到autocad中，在命令行输入bb后不会弹出“块定义”的对话框，在命令行显示相关信息，而直接输入block则可以弹出。

希望可以找到解决方案。我研究了一下，找到解决方案：诀窍在于：(initdia)

通常而言，在lisp中调用块，阵列，图层 等。通常不会显示对话框，除非通过在调用命令的语句前加上：(initdia) 这样才能强制显示对话框。我对这位朋友的程序作修改后如下，能解决他的问题。


(defun C:bb()
(princ "创建块")
(initdia)
(command "block")
)