對于在CAD中經常會用到繪螺紋,彈簧等.而在CAD中沒有給出專用的命令,因此共享一下此命令的源程序,供大家使用.

使用方法:選擇"工具"-->autoLISP-->加載應用程序,會打開"加載應用程序"對話框,選擇在此下載后保存的helix.lsp文件,單擊"加載"按鈕,將方針加載到應用程序中,然后單擊"關閉"按鈕,關閉對話框.執行helix命令,

系統提示: 指定螺旋線基點: ( 輸入螺旋線中心坐標)

請輸入螺紋平均半徑: ( 輸入螺旋線平均半徑)

請輸入螺紋節距:( 輸入螺旋線節距,一般設為2)
請輸入每圈細化段數:( 輸入螺旋線每圈細化段數,一般設為72)

注意:在繪制時,有時會受到圖形中其他圖元的影響而使繪制的螺旋線發生變形,這時應當暫時關閉"對象捕捉"功能或者凍結其他圖層,然后再進行繪制.繪制后要注意坐標系的變化,要是繪制前坐標原點不在這個基點處,繪制后坐標原點移到了螺旋線的基點處.

繪制完之后,系統會提示: "錯誤: 函數被取消. " 這時不會影響到繪制.此時,螺旋線最后一點還與CAD十字架相聯,按Esc或空格鍵即可.

例如繪制基點為坐標原點,平均半徑為25,高為16的螺紋,操作如下:

(1)執行helix命令,指定基點(0,0,0),平均半徑25,節距2,每圈細化段數為72,繪制了一段螺旋線.

(2)選擇"繪圖"-->"三維操作"-->"三維陣列",選擇矩形陣列,設置行數為1,列數為1,層數為8,指定層間距為2.得到了8層螺旋圖形.

(3)用"并集"命令將上一步8層螺紋相并.然后刪除開始繪制的螺旋線.就得到了所大小的彈簧.