.直接画是很难的.你可以先用“电子表格”按阿基米德螺线公式计算出一列成对的X、Y的值.并做成“X,Y”的形式,然后复制这一列值,在CAD里画样条时粘贴上去就成了,“电子表格”中取样越细,画的图越精确,“电子表格”中取样细不会增加人的工作量的.2. 阿基米德螺旋线 用autolisp编程可以实现. (command"pline") (setqn0) (repeat1000 (command(polar(list00)(/n57.3)n)) (setqn(1 n)) ) (command) 弹簧和螺纹（三维） 1、打开CAD后,找工具／AUTOLISP／VISUALLISP编辑器,打开．点新建文件 2、然后输入 (defunc:luoxuan (/) (setqb1(getpoint"请指定螺旋线基点:")) (setqr(getreal"请输入螺纹平均半径:")) (setqdisp(getreal"请输入螺纹节距:")) (setqn(getint"请输入每圈细化段数:")) (setqdelta(/(*2.0pi)n)) (setqj(/dispn)) (setqbb(caddrb1)) (setqang0) (setqjj0) (Command"UCS""o"b1) (Command"3dpoly"(listr00)) (repeatn (setqjj( jj1) (setqang( deltaang)) (setqpt2(list(*r(cosang))(*r(sinang))( 0(*jjj)))) (Commandpt2) ) (Command"") ) 存盘为luoxuan.lsp,关闭编辑器 3、要用时,点工具／AUTOLISP／加载,找到luoxuan.lsp文件将其加载,关闭对话框．在命令行输入luoxuan回车,就开始了螺旋线的绘制
