cad插件可用AI生成?

cad中制作插件有几种代码，autolisp、vba、.net、objectarx，上手难度从易到难，功能上限也从低到高。

以前搞插件有门槛，毕竟需要编程，而且上手需要时间和耐心。或者，copy别人的插件代码修改，但也要看懂别人写的。

现在时代不同了，可以零帧上手，就靠AI大哥，唯一的困难就是要上贡token。

然而，我常用deepseek的网页版，麻烦点就是自己做agent，实操步骤，从中省钱学习。

最近尝试搞个cad插件，生成柱状图。以前经常手画，每次觉得麻烦，但每次都匆匆忙忙手画。

我用的是中望cad，autocad的插件生成流程差不多。

第一次问：

在中望CAD中，制造一个插件，采用LISP，加载后能够生成柱状图，有以下需求：1、读取csv文件（采用文件选择器），数据格式如下：1）内容类型一：BH01,+3.25m3,mm,10002263,淤泥层，c=8kPa，φ=3°1500,中砂，N=153500,岩层，E=100MPa含义为：第一行为钻孔编号和孔口高程，即钻孔编号为BH01，孔口高程为+3.25m；第二行为土层数量、尺寸单位、矩形宽度，即有3层土，尺寸单位为mm，柱状宽度为1000mm；第三行及其余行分别是每一层土的厚度及文字标注，顺序为从上往下，即从上往下土层厚度分别为2263mm、1500mm、3500mm，并在柱状图的右侧用文字分别书写“淤泥层，c=8kPa，φ=3°”、“中砂，N=15”、“岩层，E=100MPa"；2）内容类型二：BH01,+3.25m3,m,102.263,淤泥层，c=8kPa，φ=3°1.5,中砂，N=153.5,岩层，E=100MPa含义为：第一行为钻孔编号和孔口高程，即钻孔编号为BH01，孔口高程为+3.25m；第二行为土层数量，尺寸单位，矩形宽度，即有3层土，尺寸单位为m，矩形宽度为10m；第三行及其余行分别是每一层土的厚度，顺序为从上往下，即从上往下土层厚度分别为2.263m、1.5m、3.5m，并在柱状图的右侧用文字分别书写“淤泥层，c=8kPa，φ=3°”、“中砂，N=15”、“岩层，E=100MPa"；2、尺寸的单位为mm或者m，在csv的第一行中定义；3、每一层土的采用矩形表示，矩形高度为土层厚度，矩形宽度在csv中定义（具体为柱状宽度）；4、每个矩形需要填充土层，采用内置填充；5、在每个柱状图顶部插入两行文字，第一行文字为钻孔编号，第二行文字为孔口高程；6、文字大小跟柱状图尺寸宽度匹配，不能过小或者过大。

第一次回复

直接给出lisp代码，就是爽。

创建一个txt文件直接把代码粘贴进去，保存，然后修改文件后缀名为lsp。

LISP语言代码

还有，准备csv文件，保存钻孔信息，我准备了两个类型的，应付单位是m和mm的。

csv文件

在中望cad里，键入appload命令，找到定义好的lsp文件，点击加载。

cad里面的加载窗口

显示加载成功后，键入ZZT，选择柱状图（类型一）.csv，瞬间翻车。

第一次绘画图效果结果

有问题，不纠结，直接问AI，把问题和需求说清楚就行。

同样，第二次回答依然给了代码，不要犹豫，先把我们lsp文件里面的旧代码全部删掉，然后将新代码直接复制进去。

第二次回复

重复上面的操作，先appload加载lsp，然后键入ZZT运行插件，弹出的选择框里选择csv文件。

第二次代码的运行结果

继续问，继续改，来来回回，就完事了。

后续的多次问

继续问，越细化，效果越好。

最终，效果还行。

最后一次（第5次）的插件效果

只要需求描述越明晰，生成结果越符合预期。

时代确实变化太快了，上面的流程，如果让agent来操作，比如codex、workbuddy，估计很快就能完成。

甚至，不需要这么长的提示词，只需要告诉AI：做一个柱状图生成的cad插件。

将来，估计都是许愿，许愿式编程、许愿式干活。

想要什么，通通由AI来实现，就看你想要什么。

真是个魔法的时代。

csv文件和lsp文件见百度网盘：https://pan.baidu.com/s/13MRPEBGQp1BvBaZpL9KQrA?pwd=swnn 提取码: swnn

感谢阅读，⭐我们，下次再见。