怎么用CAD画阿基米德螺线

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/05 19:22:14
怎么用CAD画阿基米德螺线
xT]OQ+7<-icB싉IX`p"&lVmIyºs_쮘i{gΙ3';!MHJc<}:\M݉ Y.irl';T 3h jWY~өݜ@uJepF 2=Qn#E?_)d!Zeil2/D' Xcܜ!6kCA(Iۓ&-l]z]k% ՁRjmㆵ93 v QH5*;)y8;ĉnfI)iC12Ի9K4Sy/p6ST8#kjiJ>$0~- W%dXy~cY`n1‹>b~Q;*?\H>LD8d7΅/cv"V=1}~—dNi8!+44ռS޹7fg_w7OW?aaېi6DNdEf [%O~M$ふ5^\,x$_ ^md* 7qb8dB01V!kR0.H=7i5  Z_k* 0o,{s?e#j64@E 4^\BͰplnjFlA Pl zاF ^Pa|&36ZxqgS+

怎么用CAD画阿基米德螺线
怎么用CAD画阿基米德螺线

怎么用CAD画阿基米德螺线
1.直接画是很难的.你可以先用“电子表格”按阿基米德螺线公式计算出一列成对的X、Y的值.并做成“X,Y”的形式,然后复制这一列值,在CAD里画样条时粘贴上去就成了,“电子表格”中取样越细,画的图越精确,“电子表格”中取样细不会增加人的工作量的. 2.还可以用CAXA画,那更方便.
阿基米德螺旋线
用autolisp编程可以实现.
(command "pline" )(setq n 0)(repeat 1000
(command (polar (list 0 0) (/ n 57.3) n))
(setq n (1+ n)))(command)弹簧和螺纹(三维)
1、打开CAD后,找工具/AUTOLISP/VISUAL LISP编辑器,打开.点新建文件
2、然后输入
(defun c:luoxuan(/)(setq b1 (getpoint "请指定螺旋线基点: "))
(setq r (getreal "请输入螺纹平均半径: "))
(setq disp (getreal "请输入螺纹节距: "))
(setq n (getint "请输入每圈细化段数: "))
(setq delta (/ (* 2.0 pi) n))
(setq j (/ disp n))
(setq bb (caddr b1))
(setq ang 0)
(setq jj 0)
(Command "UCS" "o" b1)
(Command "3dpoly" (list r 0 0))(repeat n(setq jj(+ jj 1)
(setq ang(+ delta ang))