请教怎么用autocad 画渐开线!

请教怎么用autocad 画渐开线!
请教怎么用autocad 画渐开线!
跪谢!

119610658 · 发表于 2006-5-23 16:02:27

用Autolisp或者用VBA用程式来画。。可以上网搜一下程式。。

fjhgr · 发表于 2006-5-23 18:03:33

(defun C:jkx ()(setq pi1 (/ pi 180))(setq po0 (getpoint " n 请输入中心点:"))(if (= po0 nil)(setq po0 (list 0 0 0)))(SETQ d (GETREAL "n 请输入分度圆直径:"))(if (= d nil)(setq d 100))(setq step (getreal "n 渐开线精细度(0

lilong8384 · 发表于 2006-5-23 18:08:59

又學了一招﹕)

wangfangjian · 发表于 2006-5-23 19:24:42

我已经将使用方法做成录象，你下载后即可观看。
不过该程序好象有问题，最后提示“; 错误: no function definition: GETVER”，我不会修改，你再找找还有没别的了。

autolisp使用方法.rar

1.47 MB, 下载次数: 143, 下载积分: 威望 -10 点

xiabin212 · 发表于 2006-5-25 14:19:26

用PCCAD插件调入不是更简单吗？

ziposhanhu · 发表于 2006-5-25 15:04:08

三楼的程式有点小问题，应是这样的(defun C:jkx () (setq pi1 (/ pi 180)) (setq po0 (getpoint " n 请输入中心点:")) (if (= po0 nil) (setq po0 (list 0 0 0)) ) (SETQ d (GETREAL "n 请输入分度圆直径:")) (if (= d nil) (setq d 100) ) (setq step (getreal "n 渐开线精细度(0

wangfangjian · 发表于 2006-5-25 20:11:44

楼上的程序也不对，运行后命令: jkx 请输入中心点: 请输入分度圆直径:100 渐开线精细度(0

sanfeng119 · 发表于 2006-5-25 21:19:06

我还没用过，不知道你们说的是不时能行。有时间我一定要试试。

请教怎么用autocad 画渐开线!

已有8人评论