資源描述:
《auto_cad_中如何畫螺旋線》由會員上傳分享,免費在線閱讀,更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。
1、AUTOCAD中如何畫螺旋線?(請教思路)10分回答:1?瀏覽:472?提問時間:2005-05-1101:32AUTOCAD中如何畫螺旋線?(請教思路)最好有幾個步驟,請用中文!共0條評論...最佳答案此答案由提問者自己選擇,并不代表愛問知識人的觀點揪錯┆評論┆舉報wang[先知]1、打開CAD后,找工具/AUTOLISP/VISUAL?。蹋桑樱芯庉嬈鳎蜷_.點新建文件2、然后輸入(defunc:luoxuan(/)(setqb1(getpoint"請指定螺旋線基點:"))(setqr(getreal"請輸入螺紋平均半徑:"))(setqdisp(getr
2、eal"請輸入螺紋節(jié)距:"))(setqn(getint"請輸入每圈細化段數(shù):"))(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""))存盤為luo
3、xuan.lsp,關(guān)閉編輯器3、要用時,點工具/AUTOLISP/加載,找到luoxuan.lsp文件將其加載,關(guān)閉對話框.在命令行輸入luoxuan回車,就開始了螺旋線的繪制(摘自:http://www.laohu.net/bbs/dispbbs.asp?boardID=8&RootID=31787&ID=31960)如何繪制三維螺旋線(3dspiral)和平面螺旋線即阿基米德螺旋線(spiral):①將Autodesk公司網(wǎng)站http://www.icad.com.cn/icad/share/autocadtool.htm??打開上述網(wǎng)頁,點擊其中的:3
4、dspiral.zip用于螺旋線的繪制上的可下載軟件:“3dspiral.Lsp”復制到自己計算機硬盤下的“某”文件夾中;②打開AutoCADR14或R2000繪圖界面,利用tool下拉式菜單(Autolisp)loadApplication命令加載(Load)“3dspiral.Lsp”應用軟件程序;③人工鍵入命令(Command):3dspiral(按回車鍵)---繪制三維螺旋線;????????????????spiral??(按回車鍵)---繪制二維螺旋線(即阿基米德螺旋線)④按照自己的設(shè)計意圖可連續(xù)回答該軟件設(shè)置的6項提問后,就能畫出較理想的各種螺
5、旋線:即繪制彈簧的路徑(Path)。運行3dspiral命令后,會陸續(xù)出現(xiàn)以下6個提問:??6項提問分別是:1.螺旋線起始的中心坐標;2.起始的半徑值;3.螺旋線的圈數(shù);4.螺旋線水平(HOR)方向變化的螺距(柱狀螺旋線為0;寶塔形螺旋線有±之分);5.螺旋線垂直(VER)方向變化的螺距(若輸入0,就是平面螺旋線);6.每條螺旋線的近似線數(shù)(默認為30;數(shù)值愈大,近似程度愈高)。??小議:1.該軟件最大的特點是操作簡便,通俗易懂;2.能畫材料為圓形截面的各類尺寸形狀的彈簧本體(無論是柱狀還是寶塔狀);3.設(shè)計完整彈簧還需繼續(xù)畫出彈簧的尾扣部分(無論是壓簧還是
6、拉簧);4.非圓截面(矩形、棱形、梯形)的彈簧用此方法繪制是不可行的;5.普通螺紋和梯形螺紋的螺旋面用此方法繪制也是不可行的;6.用此方法繪制的普通彈簧形狀十分逼真、“準確”,尤其是賦予著色、渲染后,在三維立體裝配圖中幾乎可以達到“以假亂真”的地步。但是從該立體彈簧上不能“提取”任何有用的平面元素(包括各種剖切面),原因就是我們熟悉的各種彈簧的二維平面視圖是機械制圖國家標準規(guī)定的“簡易畫法”;更何況參數(shù)化繪制的彈簧也是一種近似的方法。畫螺旋線的好方法將下列程序復制到工具/Autolisp/visuallisp編輯器,然后粘貼保存為lisp源文件類型,要用時只
7、需加載該程序(工具/加載應用程序)用是只需用命令:SPL(defunC:SPL(/SDEDTHSTASNVSSTEPXYZRAH)(setqSD(/(getreal"螺旋起始直徑:")2))(setqED(/(getreal"螺旋終點直徑:")2))(setqTHS??(getreal"螺旋總高(每圈高度X圈數(shù)):"))(setqTAS??(getreal"總角度數(shù)(360X圈數(shù)):"))(setqNVS??(getint??"節(jié)點數(shù)([總角度數(shù)/間隔角度]+1):"))(setqSTEP(-NVS1))(setqX(/(-EDSD)STEP))(setqY
8、(/THSSTEP))(setqZ(/TASSTEP