编写CAD程序主要涉及使用AutoLISP或VBA等编程语言。以下是编写CAD程序的基本步骤和要点：
选择编程语言
AutoLISP：由Autodesk公司开发，是AutoCAD的内置编程语言，适合快速开发和自动化任务。
VBA（Visual Basic for Applications）：在AutoCAD中嵌入的编程语言，适用于更复杂的自动化和扩展功能。
C++：适用于需要高性能和更复杂功能的开发，需要掌握MFC框架和CAD二次开发相关的API。
Web技术：如JavaScript、HTML和CSS，用于开发CAD插件，提供网页端的CAD操作界面。
编写程序
AutoLISP：
1. 打开CAD，输入`VLISP`命令，调出AutoLISP的编程界面。
2. 新建一个文本文件，编写LISP代码。例如，定义一个名为`hello`的命令，当在CAD命令行中输入`hello`时，插入一行文字“Hello, CAD!”。
3. 保存文件并以`.lsp`为后缀命名。
4. 在CAD中加载并运行程序，可以通过输入`（load "your_program.lsp"）`来加载程序。
VBA：
1. 打开CAD的VBA编辑器（按`Alt + F11`）。
2. 在项目中添加一个新模块，编写VBA代码。例如，创建一个名为`Module1`的模块，编写一个名为`Command1`的子程序，当在CAD中输入`Command1`时，执行特定的操作。
3. 保存并运行项目，可以通过在CAD中按`F5`来执行子程序。
调试和测试
在编写程序后，进行充分的调试和测试，确保程序在各种情况下都能正常运行。
可以使用CAD的调试工具，如断点、单步执行等，来帮助查找和修复问题。
优化和扩展
根据需要优化程序性能，例如减少不必要的计算和条件判断。
扩展程序功能，例如添加新的命令、工具或界面元素。
文档和注释
为程序编写详细的文档和注释，方便他人理解和维护。
```lisp
（defun c:hello （）
（if （null str）
（setq str "Hello, CAD!"）
（entmake （list '（0. "TEXT"） '（10 5 5 0） '（1. "Standard"） '（40. 2.5） '（1. str））））
```
在这个示例中，`（defun c:hello （）`定义了一个名为`hello`的命令，`（if （null str） （setq str "Hello, CAD!"）`检查变量`str`是否为空，如果是则将其设置为“Hello, CAD!”，`（entmake （list '（0. "TEXT"） '（10 5 5 0） '（1. "Standard"） '（40. 2.5） '（1. str）））`使用`entmake`函数创建一个文本实体，并插入到CAD中。
通过以上步骤和示例，你可以开始编写自己的CAD程序，实现自动化和扩展功能。