ansys齿轮模态分析命令流

/CLEAR
/TITLE,dynamic analysis of a gear
!设定分析作业名和标题
/PREP7
/PLOPTS,LOGO,ON
ET,1,SOLID186
! 定义单元类型
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2.06e11
MPDATA,PRXY,1,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,7.8e3
CSYS,1
!定义一个关键点
K,1,15,0,,
!定义一个点作为辅助点
K,110,12.5,40,,
!偏移工作平面到给定位置
KWPAVE, 110
!旋转工作平面
wprot,-50,0,0
!将激活的坐标系设置为工作平面坐标系
CSYS,4
!建立第二个关键点
K,2,10.489,0,,
!激活的坐标系设置为总体柱坐标系
CSYS,1
!建立其余的辅助点
K,120,12.5,44.5,,
K,130,12.5,49,,
K,140,12.5,53.5,,
K,150,12.5,58,,
K,160,12.5,62.5,,
!将工作平面平移到第二个辅助点
KWPAVE, 120
!旋转工作平面
wprot,4.5,0,0
!将激活的坐标系设置为工作平面坐标系
CSYS,4
!建立第三个关键点
K,3,12.221,0,,
!将工作平面平移到第三个辅助点
KWPAVE, 130
!旋转工作平面
wprot,4.5,0,0
!建立第四个关键点
K,4,14.182,0,,
!将工作平面平移到第四个辅助点
KWPAVE, 140
!旋转工作平面
wprot,4.5,0,0
!建立第五个关键点
K,5,16.011,0,,
!将工作平面平移到第五个辅助点
KWPAVE, 150
!旋转工作平面
wprot,4.5,0,0
!建立第六个关键点
K,6,17.663,0,,
!将工作平面平移到第六个辅助点
KWPAVE, 160
!旋转工作平面
wprot,4.5,0,0
!建立第七个关键点
K,7,19.349,0,,
!将激活的坐标系设置为总体柱坐标系
CSYS,1
!建立编号为8、9、10的关键点
K,8,24,7.06,,
K,9,24,9.87,,
K,10,15,-8.13,,
!在柱面坐标系中创建圆弧线
LSTR, 10, 1
LSTR, 1, 2
LSTR, 2, 3
LSTR, 3, 4
LSTR, 4, 5
LSTR, 5, 6
LSTR, 6, 7
LSTR, 7, 8
LSTR, 8, 9
!把齿轮边上的线加起来，使其成为一条线
FLST,2,7,4,ORDE,2
FITEM,2,2
FITEM,2,-8
LCOMB,P51X, ,0
!偏移工作平面到总坐标系的原点
CSYS,0
WPAVE,0,0,0
CSYS,1
!*
!将工作平面与总体直角坐标系对齐
WPCSYS,-1,0
!将工作平面旋转9.87o
wprot,9.87,0,0
!将激活的坐标系设置为工作平面坐标系
CSYS,4
!将所有线沿X-Z面进行镜像(在 Y 方向)
FLST,3,3,4,ORDE,3
FITEM,3,1
FITEM,3,-2
FITEM,3,9
LSYMM,Y,P51X, , ,1000,0,0
!把齿顶上的两条线粘接起来
FLST,2,2,4,ORDE,2
FITEM,2,5
FITEM,2,9
LGLUE,P51X
!把齿顶上的两条线加起来，成为一条线
FLST,2,2,4,ORDE,2
FITEM,2,5
FITEM,2,-6
LCOMB,P51X, ,0
!在柱坐标系下进行复制线
!将激活的坐标系设置为总体柱坐标系
CSYS,1
FLST,3,5,4,ORDE,2
FITEM,3,1
FITEM,3,-5
LGEN,10,P51X, , , ,36, , ,0
!把齿底上的所

有线粘接起来
FLST,2,2,4,ORDE,2
FITEM,2,38
FITEM,2,41
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,43
FITEM,2,46
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,1
FITEM,2,48
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,3
FITEM,2,6
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,8
FITEM,2,11
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,13
FITEM,2,16
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,18
FITEM,2,21
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,23
FITEM,2,26
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,28
FITEM,2,31
LGLUE,P51X
FLST,2,2,4,ORDE,2
FITEM,2,33
FITEM,2,36
LGLUE,P51X
!把齿底上的所有线加起来
FLST,2,2,4,ORDE,2
FITEM,2,38
FITEM,2,51
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,41
FITEM,2,43
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,1
FITEM,2,46
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,3
FITEM,2,48
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,6
FITEM,2,8
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,11
FITEM,2,13
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,16
FITEM,2,18
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,21
FITEM,2,23
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,26
FITEM,2,28
LCOMB,P51X, ,0
FLST,2,2,4,ORDE,2
FITEM,2,31
FITEM,2,33
LCOMB,P51X, ,0
!把所有线粘接起来
FLST,2,40,4,ORDE,21
FITEM,2,1
FITEM,2,-7
FITEM,2,9
FITEM,2,-12
FITEM,2,14
FITEM,2,-17
FITEM,2,19
FITEM,2,-22
FITEM,2,24
FITEM,2,-27
FITEM,2,29
FITEM,2,-32
FITEM,2,34
FITEM,2,-35
FITEM,2,37
FITEM,2,-42
FITEM,2,44
FITEM,2,-45
FITEM,2,47
FITEM,2,49
FITEM,2,-50
LGLUE,P51X
FLST,2,120,4,ORDE,12
FITEM,2,8
FITEM,2,13
FITEM,2,18
FITEM,2,23
FITEM,2,28
FITEM,2,33
FITEM,2,36
FITEM,2,43
FITEM,2,46
FITEM,2,48
FITEM,2,51
FITEM,2,-160
LGLUE,P51X
!用当前定义的所有线创建一个面
FLST,2,140,4
FITEM,2,175
FITEM,2,26
FITEM,2,84
FITEM,2,83
FITEM,2,79
FITEM,2,80
FITEM,2,24
FITEM,2,173
FITEM,2,25
FITEM,2,81
FITEM,2,82
FITEM,2,76
FITEM,2,75
FITEM,2,21
FITEM,2,171
FITEM,2,20
FITEM,2,74
FITEM,2,73
FITEM,2,69
FITEM,2,70
FITEM,2,17
FITEM,2,169
FITEM,2,19
FITEM,2,71
FITEM,2,72
FITEM,2,66
FITEM,2,65
FITEM,2,15
FITEM,2,167
FITEM,2,14
FITEM,2,64
FITEM,2,63
FITEM,2,55
FITEM,2,56
FITEM,2,9
FITEM,2,165
FITEM,2,11
FITEM,2,59
FITEM,2,60
FITEM,2,52
FITEM,2,51
FITEM,2,6
FITEM,2,163
FITEM,2,5
FITEM,2,48
FITEM,2,46
FITEM,2,67
FITEM,2,68
FITEM,2,16
FITEM,2,161
FITEM,2,4
FITEM,2,36
FITEM,2,43
FITEM,2,33
FITEM,2,28
FITEM,2,3
FITEM,2,162
FITEM,2,12
FITEM,2,62
FITEM,2,61
FITEM,2,85
FITEM,2,86
FITEM,2,27
FITEM,2,164
FITEM,2,2
FITEM,2,18
FITEM,2,23
FITEM,2,58
FITEM,2,57
FITEM,2,10
FITEM,2,166
F

ITEM,2,7
FITEM,2,54
FITEM,2,53
FITEM,2,117
FITEM,2,118
FITEM,2,49
FITEM,2,168
FITEM,2,50
FITEM,2,119
FITEM,2,120
FITEM,2,78
FITEM,2,77
FITEM,2,22
FITEM,2,170
FITEM,2,1
FITEM,2,13
FITEM,2,8
FITEM,2,113
FITEM,2,114
FITEM,2,45
FITEM,2,172
FITEM,2,47
FITEM,2,115
FITEM,2,116
FITEM,2,112
FITEM,2,111
FITEM,2,44
FITEM,2,174
FITEM,2,42
FITEM,2,110
FITEM,2,109
FITEM,2,103
FITEM,2,104
FITEM,2,39
FITEM,2,176
FITEM,2,41
FITEM,2,107
FITEM,2,108
FITEM,2,102
FITEM,2,101
FITEM,2,38
FITEM,2,178
FITEM,2,37
FITEM,2,100
FITEM,2,99
FITEM,2,93
FITEM,2,94
FITEM,2,32
FITEM,2,180
FITEM,2,35
FITEM,2,97
FITEM,2,98
FITEM,2,92
FITEM,2,91
FITEM,2,31
FITEM,2,179
FITEM,2,34
FITEM,2,96
FITEM,2,95
FITEM,2,87
FITEM,2,88
FITEM,2,29
FITEM,2,177
FITEM,2,40
FITEM,2,105
FITEM,2,106
FITEM,2,90
FITEM,2,89
FITEM,2,30
AL,P51X
!创建圆面
CYL4, , ,5
!从齿轮面中“减”去圆面形成轴功率孔
ASBA, 1, 2
!*
!用当前定义的面创建一个体
VOFFST,3,8, ,
!创建一个圆柱体
CYL4,0,0,12, , , ,2.5
!偏移工作平面
FLST,2,1,8
FITEM,2,0,0,8
WPAVE,P51X
!创建另一个圆柱体
CYL4, , ,12, , , ,-2.5
CSYS,1
!定义一个关键点
K,10000,8.5,-5,,
!偏移工作平面到给定位置
KWPAVE, 10000
!将激活的坐标系设置为工作平面坐标系
CSYS,4
!创建一个圆柱体
CYL4, , ,2, , , ,8
!从齿轮体中“减”去3个圆柱体
FLST,3,3,6,ORDE,2
FITEM,3,2
FITEM,3,-4
VSBV, 1,P51X
CSYS,4
!创建一个圆柱体
/USER, 1
CYL4,0,0,2, , , ,8
!将激活的坐标系设置为总体柱坐标系
CSYS,1
!将小圆柱沿周向方向复制
FLST,3,1,6,ORDE,1
FITEM,3,1
VGEN,10,P51X, , , ,36, , ,0
!从齿轮体中“减”去10个圆柱体
FLST,3,10,6,ORDE,3
FITEM,3,1
FITEM,3,3
FITEM,3,-11
VSBV, 2,P51X
!对齿轮体进行划分网格
SMRT,6
SMRT,3
MSHAPE,1,3D
MSHKEY,0
!*
CM,_Y,VOLU
VSEL, , , , 12
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
!*
VMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
/UI,MESH,OFF

/REPLOT,RESIZE
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
VPLOT

/REPLOT,RESIZE
FINISH
/SOL
!*
!进行模态分析设置
ANTYPE,2
!*
!*
MODOPT,LANB,15
EQSLV,SPAR
MXPAND,15, , ,0
LUMPM,0
PSTRES,0
!施加边界条件
MODOPT,LANB,15,0,100000, ,OFF
FLST,2,1,3,ORDE,1
FITEM,2,405
/STATUS,SOLU
!求解
SOLVE
!进行模态扩展设置
MXPAND,15,0,100000,1,0.001,
OUTPR,ALL,ALL,
!进行扩展求解
/STATUS,SOLU
SOLVE
FINISH
!查看结果
/POST1
!列表显示分析的结果
SET,LIST
SET,LAST
!*
!查看总变形
/EFACET,1
PLNSOL, U,SUM, 2,1.0
/REPLOT,RESIZE
!*
!查看von Mises应力
/EFACET,1
PLNSOL, S,EQV, 0,1.0
!*
!动画显示模态形

状
PLNS,U,SUM
ANMODE,10,0.5, ,0
!*
FINISH
! /EXIT,ALL! PLNSOL,S,X,0,1
! 动画显示模态形状
!*
! PLNS,U,SUM
ANMODE,10,0.5, ,0
!*
! SAVE,