| 12
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 
 | /soluallsel
 ANTYPE,2
 MODOPT,subsp,10,,,,1    !!!子空间迭代法求解10阶模态
 MXPAND,10,,,YES
 LUMPM,OFF
 ncnv,2
 solve
 finish
 
 /post1
 set,list					!列出10阶自振频率
 !!============批量输出振型图================!!
 /post1
 NUM_MODAL=10      !!!输入需要模态分析的阶数
 /SHOW,PNG			!输出PNG格式图片
 PNGR,DEFAULT	!采用PNG缺省格式
 /GFILE,2400		!像素为2400
 /CMAP,DQMAP,CMP,,SAVE			!保存当前图形区设置
 /RGB,INDEX,100,100,100,0	!将背景色设置为白色
 /RGB,INDEX,0,0,0,15
 *DO,I,1,NUM_MODAL			!每隔一个子步输出一幅图片
 SET,,, ,,, ,I
 PLNSOL,U,SUM,0,1.0		!输出模态振型图片至ANSYS工作目录
 *ENDDO
 /SHOW,CLOSE					!PNG格式图片输出结束
 /CMAP,DQMAP,CMP			!恢复图形区设置
 /DELETE,DQMAP,CMP		!删除DAMAP.CMP文件h
 
 |