弹簧.txt

来自「ansys的apdl指令」· 文本 代码 · 共 53 行

弹簧建模
 
!This example demo modeling a ring using APDL
fini
/cle
/filname,ring,1
/prep7
*AFUN,DEG
TOT=12      !一个螺距上沿圆周分割的点数
N_num=5     !螺距数
p_dis=0.8   !螺距
N=TOT*n_num !整个弹簧的点数
cic=360

et,1,45     !弹簧采用的单元
et,2,200    !给面划网格的MESH200单元
keyopt,2,1,6

DIV=cic/TOT !两点将的圆心角
DIS=p_dis/TOT !螺距
rid=1       !弹簧主半径
rid2=0.1    !弹簧截面半径
csys,1

*DO,I,1,N+1
k,I,rid,(I-1)*DIV,(I-1)*DIS
*ENDDO

flst,3,N+1,3
*do,i,1,N+1
fitem,3,i
*enddo
bsplin,,p51x

csys,0
wprot,,90
wpoff,rid
pcirc,rid2,,0,360

asel,all
lsla,s
lesi,all,,,4
type,2
mshkey,0
amesh,all
eplot


type,1
extopt,esize,300
vdrag,1,,,,,,1
eplot