ANSYS中快速建立螺纹模型一法

ANSYS中建立螺纹模型一直是个比较麻烦的事情，直观的方法就是建一个圆柱体和一条多圈的螺纹线，用螺沟切面沿螺纹线拖拉形成螺沟体，再从圆柱体上将螺沟体减掉形成螺纹。这种方法和Pro/E等CAD软件中的建模思路相同。这里分享一个简单的方法。

先建好一个二维的螺纹竖直切面，再将此竖直切面拖拉一周且上升一个螺距即可，如下面命令流所示（包括锥螺纹）：

/PREP7
NL=10   !螺纹圈数
LJ=1   !螺距
R0=10   !螺纹外径
LG=1   !螺纹高
DR=0.1   !螺距间的外半径差，用于建锥螺纹，等半径螺纹设DR=0即可
*GET,K1,KP,,NUM,MAX
NUMSTR,KP,K1
K,,R0/2
*DO,I,1,NL
K,,R0-(I-1)*DR,(I-1)*LJ
K,,R0-LG-(I-1)*DR,(I-1)*LJ+LJ/2
*ENDDO
K,,R0/2,(I-1)*LJ+LJ/2
*GET,K2,KP,,NUM,MAX
FLST,2,K2-K1,3
*DO,I,K1+1,K2
FITEM,2,I
*ENDDO
A,P51X
WPROTA,,-90
CSWPLA,11,1,1,1
CSYS,11
K,,R0-DR/4,90,LJ/4
K,,R0-DR/2,180,LJ/2
K,,R0-DR*0.75,270,LJ*.75
*GET,L1,LINE,,NUM,MAX
NUMSTR,LINE,L< XMLNAMESPACE PREFIX ="ST1" />1
L,K1+2,K2+1
L,K2+1,K2+2
L,K2+2,K2+3
L,K2+3,K1+4
*DO,I,1,4
ASEL,S,LOC,Y,(I-1)*90
VDRAG,ALL,,,,,,L1+I
*ENDDO