ansys与sysnoise转换问题

w89986581

看到大家都比较关心这个问题，为此提供一种采用ansys命令流直接生成sysnoise的fre文件（振动模态表面位移），以供参考。

1. !从ANSYS中导出模态频率及振型数据
   
2. /Post1               
   
3. *get,nodenum,node,,num,max                     !读取节点数      
   
4. *set,modenum,20                                         !指定模态的阶数
   
5. *Cfopen,modefile_ansys,fre                         !打开文件
   
6. *Vwrite                                       
   
7. ('SYSNOISE MODES STRUCTURE FILE')    !头文件
   
8. *Vwrite
   
9. ('Rev 5.5  Windows NT   30NOV2000')
   
10. *Vwrite
    
11. ('SYSNOISE Default Model')        
    
12. *Vwrite                                             
    
13. ('23-JUN-2008 10:22:59')
    
14. *Do,i,1,modenum,1                     
    
15. *Vwrite
    
16. ('REAL MODE        FREQUENCY          EIGENVALUE')
    
17. *Get,modefq,mode,i,freq
    
18. bb='%i%'
    
19. modeanglefq = modefq*modefq*2*2*3.141593*3.141593
    
20. *Vwrite, bb, modefq, modeanglefq
    
21. (A10,2e20.8)
    
22. *Vwrite
    
23. ('DISPLACEMENT VALUES')
    
24. set,1,i
    
25. *Do,ii,1,nodenum,1
    
26. *Get,modeshpx,node,ii,u,x
    
27. *Get,modeshpy,node,ii,u,y
    
28. *Get,modeshpz,node,ii,u,z
    
29. *Get,modeshprx,node,ii,rot,x
    
30. *Get,modeshpry,node,ii,rot,y
    
31. *Get,modeshprz,node,ii,rot,z
    
32. bb1 ='%ii%'
    
33. bb2 ='                    '
    
34. *vwrite,bb1,bb1,modeshpx,modeshpy,modeshpz
    
35. (2A10,3e20.8)
    
36. *vwrite,bb2,modeshprx,modeshpry,modeshprz
    
37. (A20,3e20.8)
    
38. *Enddo
    
39. *Enddo
    
40. *cfclos
    
41. FINISH

复制代码

或者参考haohaosir的原创帖
http://forum.vibunion.com/thread-10954-1-1.html

castaway2

楼主真不错啊
真是个好人
谢谢了啊

mao

顶LZ,我正在为这个发愁呢,向楼主学习!

m203

楼主真是个好人啊
:lol
谢谢了啊

mao

楼主,你这个程序好象不是提取结构表面的位移,而是把所有节点的位移都提取了呀:

1. *get,nodenum,node,,num,max                     !读取节点数   
   
2. *Do,ii,1,nodenum,1

复制代码

w89986581

呵呵，我划分网格时结构表面节点恰好从1开始且连续的。如果表面节点编号不是从1开始，则需要修改Do循环。

民工小谭

感谢楼主，我正为这事发愁呢

gweice

楼主，我用您的命令的时候，为什么有些节点提示“没有定义”，然后被忽略

antonylau

以前看过一段时间，谢谢

happymaster

楼主正乃真命天子

fifor

好东西，谢谢lz啊

海量汪涵

:handshake ，感激。

wyxing

楼主真是慷慨，大公无私的分享！

bangder_ing

谢谢，学习了

oyzy83scut

原帖由 w89986581 于 2008-5-5 10:25 发表

                               
登录/注册后可看大图

看到大家都比较关心这个问题，为此提供一种采用ansys命令流直接生成sysnoise的fre文件（振动模态表面位移），以供参考。


!从ANSYS中导出模态频率及振型数据
/Post1               
*get,nodenum,node,,num,m ...

请问这个程序是将ANSYS中的模态数据转化为sysnoise可识别的fre格式文件的通用程序吗？
谢谢