[转帖]将ANSYS模型写成SYSNOISE支持的*fre格式

aspen

1. FINISH
   
2. /CLEAR,NOSTART
   
3. /PREP7
   
4. ET,1,SHELL63,2
   
5. R,1,.5
   
6. MP,EX,1,210
   
7. MP,NUXY,1,0.3
   
8. MP,DENS,1,7800
   
9. BLC4,-2,-2,4,4
   
10. LESIZE,ALL, , ,4, ,1, , ,1,
    
11. AMESH,ALL
    
12. DL,ALL, ,ALL,
    
13. !CDWRITE,ALL,PLATE,cdb
    
14. /SOLU
    
15. ANTYPE,MODAL
    
16. MODOPT,LANB,5
    
17. MXPAND,5
    
18. SOLVE
    
19. FINISH
    
20. /POST1
    
21. *GET,MAXNUM_NODE,NODE,,NUM,MAX
    
22. *GET,MAXNUM_ELEM,ELEM,,NUM,MAX
    
23. ELEMTYPE=4
    
24. 
    
25. *DIM,SYSNOISE_TITLE,CHAR,4,3
    
26. SYSNOISE_TITLE(1,1)='SYSNOISE'
    
27. SYSNOISE_TITLE(1,2)=' MESH FI'
    
28. SYSNOISE_TITLE(1,3)='LE'
    
29. SYSNOISE_TITLE(2,1)='Rev 5.2 '
    
30. SYSNOISE_TITLE(2,2)=' SGI'
    
31. SYSNOISE_TITLE(3,1)='Set numb'
    
32. SYSNOISE_TITLE(3,2)='er'
    
33. SYSNOISE_TITLE(4,1)='TIME'
    
34. *CFOPEN,PLATE_MESH,fre
    
35. *VWRITE,SYSNOISE_TITLE(1,1),SYSNOISE_TITLE(1,2),SYSNOISE_TITLE(1,3)
    
36. %C%C%C
    
37. 
    
38. *VWRITE,MAXNUM_NODE,MAXNUM_ELEM,ELEMTYPE
    
39. %10I%10I%10I
    
40. 
    
41. *DIM,SYSNOISE_SUBT1,CHAR,1,1
    
42. SYSNOISE_SUBT1(1,1)='NODES'
    
43. *VWRITE,SYSNOISE_SUBT1(1,1)
    
44. (A8)
    
45. 
    
46. *DIM,LOC_NODE,,MAXNUM_NODE,3
    
47. *DIM,NUM_,,MAXNUM_NODE,1
    
48. *DO,IP,1,MAXNUM_NODE
    
49. NUM_(IP,1)=IP
    
50. *GET,LOC_NODE(IP,1),NODE,IP,LOC,X
    
51. *GET,LOC_NODE(IP,2),NODE,IP,LOC,Y
    
52. *GET,LOC_NODE(IP,3),NODE,IP,LOC,Z
    
53. *ENDDO
    
54. 
    
55. *VWRITE,NUM_(1,1),NUM_(1,1),LOC_NODE(1,1),LOC_NODE(1,2),LOC_NODE(1,3)
    
56. %10I%10I%20.8E%20.8E%20.8E
    
57. 
    
58. *DIM,SYSNOISE_SUBT2,CHAR,1,1
    
59. SYSNOISE_SUBT2(1,1)='ELEMENTS'
    
60. *VWRITE,SYSNOISE_SUBT2(1,1)
    
61. (A8)
    
62. 
    
63. *DIM,NODE_ELEM,,MAXNUM_ELEM,4
    
64. *DIM,NUME_,,MAXNUM_NODE,1
    
65. *DO,IP,1,MAXNUM_ELEM
    
66. NUME_(IP,1)=IP
    
67. NODE_ELEM(IP,1)=NELEM(IP,1)
    
68. NODE_ELEM(IP,2)=NELEM(IP,2)
    
69. NODE_ELEM(IP,3)=NELEM(IP,3)
    
70. NODE_ELEM(IP,4)=NELEM(IP,4)
    
71. *ENDDO
    
72. ELEMTY=6
    
73. NODETY=4
    
74. *VWRITE,NUME_(1,1),NUME_(1,1),ELEMTY,NODETY,NODE_ELEM(1,1),NODE_ELEM(1,2),NODE_ELEM(1,3),NODE_ELEM(1,4)
    
75. %10I%10I%10I%10I%10I%10I%10I%10I
    
76. *VWRITE,MODE_NUM,FREQ_STR,EIGE_STR
    
77. (1X,I11,2E21.8)

复制代码

这是将ANSYS模型写成SYSNOISE支持的*fre格式。尽管CDWRITE命令能够实现这个功能，但是在处理结果文件导入时，简单的ANSYS命令已经无能为力了。要从基本上解决结果文件导入的问题，必须从基本的文件格式入手，这就是本命令流价值的所在。

来自：simwe

ANSYSER

我用了你的程序.可是输出来的FRE文件字节为0啊.是什么原因呢

ANSYSER

　　输出来的是节点的坐标啊,能否有节点振动位移数据转化成FRE格式的程序呢,谢谢

frogfish

是不是版本或者是不一样的分析结果？

zhxunxun

原帖由 aspen 于 2005-12-15 11:32 发表
FINISH /CLEAR,NOSTART /PREP7 ET,1,SHELL63,2 R,1,.5 MP,EX,1,210 MP,NUXY,1,0.3 MP,DENS,1,7800 BLC4,-2,-2,4,4 LESIZE,ALL, , ,4, ,1, , ,1, AMESH,ALL DL,ALL, ,ALL, !CDWRITE,ALL,PLATE,cdb /SOLU ANTYPE,MODAL ...

　　最后两行：
　　*VWRITE,MODE_NUM,FREQ_STR,EIGE_STR
　　(1X,I11,2E21.8)
　　是为了提取结构模态用的，我写了一个将ansys结构计算的模态提取为sysnoise支持的fre格式的命令流，有一个小问题就是，如何提取ansys模态分析中计算出来的“特征值”——即fre模态文件中的“EIGENVALUE”——望高手指教，谢谢!

w89986581

呵呵,角频率或者角频率的平方,两着哪一个我记不得了.

baobeiguo66

貌似不太好用，我用了一下，生成的fre文件sysnoise不识别

w89986581

呵呵，搜索本版，有好用的。

3QMM

直接保存为CDB格式 不是就能读取吗？

豆芽虫

正在摸索中