在機械傳動中，螺紋的應(yīng)用十分廣泛，尤其是在數(shù)控設(shè)備上更是大量使用滾珠絲杠。對這些螺紋零件，采用CAD/CAM技術(shù)進行設(shè)計與制造是離不開仿真技術(shù)的，本文主要介紹的是基于AutoCAD平臺，利用VLISP編程，根據(jù)螺紋加工原理、三維實體造型和對象布爾運算等實現(xiàn)螺紋加工三維動態(tài)仿真技術(shù)。
一、基圓柱體造型
根據(jù)國標(biāo)（GB196—81）規(guī)定，三角螺紋的基本尺寸有外徑D、中徑D2、內(nèi)徑D1、螺距P、基本三角形高度H和牙形角60°。按有關(guān)規(guī)定，滾珠絲杠公稱直徑為D，長度為L，滾珠直徑為db。將基圓柱體的直徑取為D，長度取設(shè)計值L，則程序代碼如下：
(setq d (getreal"\n請輸入螺紋外徑:")
l (getreal"\n請輸入螺紋長度:")
)
(command "cylinder" (list 0 0 -1) "d" d (* -1 l ) )；畫圓柱體
二、切削刀具造型
螺紋加工常用車削、銑削等加工方法，下面僅以車削三角螺紋和銑削滾珠絲杠為例來說明。
1. 三角螺紋車刀簡化模型
零前角螺紋車刀的創(chuàng)建，如圖1所示其代碼如下：
圖1 車刀多邊形
(setq p1 (list 0 0 0));設(shè)當(dāng)前坐標(biāo)原點為P1
(setq p2 (polar p1 0 (/ p 4)))
(setq p3 (polar p2 (/ pi 3 -1) (* 5 h)))
(setq p4 (polar p3 (/ pi 2 -1) 10))
(setq p5 (polar p4 pi (+ (/ p 4)(* 5 h))))
(setq p6 (polar p5 (/ pi 2) 10))
;定義車刀多邊形p1 p2 p3 p4 p5 p6點的相對坐標(biāo)
(command "pline" p1 p2 p3 p4 p5 p6 "c" "") ；用多段線形成封閉多邊形
(command "extrude" "l" "" -5 "")；拉伸形成車刀模型
(setq e1 (entlast))；返回圖元名
(command "move" e1 "" "0,0,0" (list (/ p 2 -1) (/ d1 2 -1) 2.5))；移動到起刀點
2. 滾珠絲杠圓盤銑刀簡化模型
圓盤銑刀是根據(jù)絲杠螺紋槽的法剖面廓形而創(chuàng)建的成形銑刀，為簡化計算可用軸向剖面廓形代替，主要代碼如下：
(setq db (getreal"\n請輸入滾珠直徑:"))；定義銑刀截面多邊形各節(jié)點P11、P12、P13、P14，如圖2所示
