南方CASS入门:[10]打造个性CASS屏幕菜单
南方CASS右边的屏幕菜单,美观而且又方便。自己常用的二次开发命令也放进去多方便。我们来把一个二次开发程序命令也放天屏幕菜单中去。
操作方法
- 01
一个xxx.lsp文件,调用命令xxx。第一步,把xxx.lsp文件复制到CASS\BIN\目录下。放在这个目录下是为了方便加载。
- 02
找到CASS\SYSTEM\目录下ScreenMenu.def文件,使用记事本打开。文件如下格式。 [文字注记] '下拉栏名 注记文字,*wzzj '子项名,链接的命令 变换字体,fonts1 '子项名,链接的幻灯片 定义字型,*style '子项名,链接的命令 坐标坪高,zbpg '子项名,链接的幻灯片 常用文字,cywz '子项名,链接的幻灯片 还*号的为命令,不带*号的为幻灯片。 我们在文件后面加上以下两行,注间前面要空一行。 [示例菜单] 测试1,*xxx XXX为二次开发程序的运行命令。完成后保存文件。
- 03
打开CASS,看看我们的屏幕菜单。
- 04
在命令行输入”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) 当中。
- 05
打开CASS,输入XXX命令,或者点击CASS的屏幕菜单,两个效果是一样的。这里的XXX.lsp和XXX命令是随机使用的,你可以更改为你的任意文件和命令名,但不能跟CAD和CASS中的内部命令相同。