南方CASS入门：[10]打造个性CASS屏幕菜单

一个xxx.lsp文件，调用命令xxx。第一步，把xxx.lsp文件复制到CASS\BIN\目录下。放在这个目录下是为了方便加载。

找到CASS\SYSTEM\目录下ScreenMenu.def文件，使用记事本打开。文件如下格式。 [文字注记]    '下拉栏名 注记文字,*wzzj     '子项名，链接的命令 变换字体,fonts1    '子项名，链接的幻灯片 定义字型,*style    '子项名，链接的命令 坐标坪高,zbpg      '子项名，链接的幻灯片 常用文字,cywz      '子项名，链接的幻灯片 还*号的为命令，不带*号的为幻灯片。 我们在文件后面加上以下两行，注间前面要空一行。 [示例菜单] 测试1,*xxx XXX为二次开发程序的运行命令。完成后保存文件。

打开CASS，看看我们的屏幕菜单。

在命令行输入”appload",加载XXX.lsp文件。你可以修改CAD安装目录的support目录下acad20xx.lsp（如acad2006.lsp）文件来让xxx.lsp文件自动加载。 把 (LOAD "xxx.lsp") 插入到 (if (not (=  (substr (ver) 1 11) "Visual LISP")) (load "acad20xxdoc.lsp")) 和 ;; Silent load. (princ) 当中。

打开CASS，输入XXX命令，或者点击CASS的屏幕菜单，两个效果是一样的。这里的XXX.lsp和XXX命令是随机使用的，你可以更改为你的任意文件和命令名，但不能跟CAD和CASS中的内部命令相同。