附件 | /COM,STRUCTURAL /PREP7 /TITLE,modal analysis of a turbo-disk !指定分析标题 /SHOW !显示分析标题 ET,1,PLANE42 !定义单元类型 ET,2,SOLID45 MP,EX,1,2.1E5 !定义材料的弹性模量 MP,PRXY,1,0.3 !定义泊松比 MP,DENS,1,7.8E-009 !定义材料密度 BLC4,-15,15,30,25 !建立矩形面 BLC4,-10,140,20,10 K,9,-4,55,, !建立关键点 K,10,4,55,, K,11,-3,140,, K,12,3,140,, /PNUM,KP,1 !显示关键点编号 /PNUM,LINE,1 /PNUM,AREA,1 A,4,9,11,12,10,3 !通过关键点建立面 !* LFILLT,1,2,5, , !给面倒圆角 LFILLT,1,4,5, , LSEL,S,LINE,14 !选择编号为14的线 LSEL,A,LINE,17 ASBL, 1, ALL !用选择的线分割面 ALLSEL,ALL !选择所有的线 ADELE,4,5, ,1 !删除面 AADD,ALL !将所有的面相加 NUMCMP,ALL !压缩模型中所有元素的编号 ESIZE,6.7,0, !指定单元尺寸 LESIZE,11,,,1 !对线的网格进行控制 LESIEZ,14,,,1 AMESH,ALL !划分所有面的网格 K,,-10,0,0, !创建关键点 K,,10,0,0, TYPE,2 !指定生成体的单元类型 EXTOPT,ESIZE,18,0, !指定单元分划数 EXTOPT,ACLEAR,1 !清除原面网格 VROTAT,ALL, , , , , ,15,16,!绕关键点15、!16构成的轴将所划的面网格旋转360度 wpro,,,90.000000 !将工作平面绕Y轴选转90度 CSWPLA,11,1,1,1, !在工作平面原点创建柱坐标系,并激活 NROTAT,ALL !将所有节点旋转到激活坐标系 FINISH /SOLU !进入求解菜单 ANTYPE,0 !指定分析类型为静力分析 PSTRES,ON ! 打开预应力选项 NSEL,S,LOC,X,15 !选择内孔上的节点 D,ALL, , , , , ,UY,UZ, , , , !将所选节点的Y、Z方向位移约束 ALLSEL,ALL !选择所有元素 OMEGA,1256.64,0,0,0 !定义绕轴旋转角速度 SAVE !保存数据库文件 SOLVE !进行静力求解 FINISH ANTYPE,2 !指定为模态分析! MODOPT,LANB,10 !指定提取特征值数及所用方法 MXPAND,10, , ,0 !指定扩展的模态阶数 PSTRES,1 !打开预应力选项 SAVE !保存数据库文件 SOLVE !进行模态求解 FINISH /POST1 !进入通用后处理器 SET,LIST !列出所有结果 SET,FIRST !读入第一结果子集 PLNSOL,U,SUM,0,1 !对读入子集的总变形进行云图显示 SET,NEXT PLNSOL,U,SUM,0,1 FINISH |