首页 > !从ANSYS中导出模态频率及振型数据

!从ANSYS中导出模态频率及振型数据

发布时间：2010-12-14 17:32:29 来源：文档文库

小中大

字号：

手机查看

!从ANSYS中导出模态频率及振型数据
/Post1
*get,nodenum,node,,num,max                !读取节点数
*set,modenum,20                              !指定模态的阶数
*Cfopen,modefile_ansys,fre                   !打开文件
*Vwrite
('SYSNOISE MODES STRUCTURE FILE') !头文件
*Vwrite
('Rev 5.5  Windows NT 30NOV2000')
*Vwrite
('SYSNOISE Default Model')
*Vwrite
('23-JUN-2008 10:22:59')
*Do,i,1,modenum,1
*Vwrite
('REAL MODE       FREQUENCY       EIGENVALUE')
*Get,modefq,mode,i,freq
bb='%i%'
modeanglefq = modefq*modefq*2*2*3.141593*3.141593
*Vwrite, bb, modefq, modeanglefq
(A10,2e20.8)
*Vwrite
('DISPLACEMENT VALUES')
set,1,i
*Do,ii,1,nodenum,1
*Get,modeshpx,node,ii,u,x
*Get,modeshpy,node,ii,u,y
*Get,modeshpz,node,ii,u,z
*Get,modeshprx,node,ii,rot,x
*Get,modeshpry,node,ii,rot,y
*Get,modeshprz,node,ii,rot,z
bb1 ='%ii%'
bb2 ='                   '
*vwrite,bb1,bb1,modeshpx,modeshpy,modeshpz
(2A10,3e20.8)
*vwrite,bb2,modeshprx,modeshpry,modeshprz
(A20,3e20.8)
*Enddo
*Enddo
*cfclos
FINISH