很多学员对AutoCAD插件又爱又恨,爱的是cad插件能够大大方便我们的绘图,恨的是我们又不会写代码。
有了deepseek推理AI之后,我们可以通过简单的生成代码实现我们所需要的功能,具体操作如下。
下面我们举个例子,例如,制作一个cad插件,自动生成一个五角星。
第一步:进入deepseek官网,输入https://www.deepseek.com/
在打开的对话框里面写入“使用Autolisp编写一段代码,执行绘制五角星,五角星的外圆半径以弹出提示框,由用户输入,内部自动用直线连接”
如下图所示


第二步:复制以上生成的代码到记事本里面,代码如下:
(defun c:DrawPentagram (/ radius deg2rad points i ang pt)
; 获取用户输入的半径
(setq radius (getreal "\n请输入五角星的外圆半径: "))
; 角度转弧度系数
(setq deg2rad (/ pi 180))
; 生成五角星的五个顶点坐标
(setq points '())
(setq i 0)
(repeat 5
(setq ang (- 90 (* i 144))) ; 计算当前角度(每次减少144度)
(setq pt (list
(* radius (cos (* ang deg2rad))) ; 计算X坐标
(* radius (sin (* ang deg2rad))) ; 计算Y坐标
))
(setq points (append points (list pt))) ; 将点添加到列表
(setq i (1+ i))
)
; 使用LINE命令连接顶点(顺序:0 -> 2 -> 4 -> 1 -> 3 -> 0)
(command "line"
(nth 0 points) ; 第1个点(顶部)
(nth 2 points) ; 第3个点(左上方)
(nth 4 points) ; 第5个点(左下方)
(nth 1 points) ; 第2个点(右下方)
(nth 3 points) ; 第4个点(右上方)
"c" ; 闭合图形
)
(princ) ; 静默退出
)
第三步:修改下代码第一行的,这个是执行命令的快捷键,然后另存为lsp后缀的文件,如下图所示


第四步:在AutoCAD软件中,选择“管理”-“加载应用程序”,弹出以下提示,按确认

第五步:执行drap命令(之前设置的快捷键),然后按提示输入外圆半径,得到以下图形。

总结:通过以上举例,我们简单描述了结合deepseek二次开发AutoCAD插件,大家可以发挥自己的奇妙想法,做出更多的cad插件。





承担因您的行为而导致的法律责任,
本站有权保留或删除有争议评论。
参与本评论即表明您已经阅读并接受
上述条款。