Ansys中计算的响应位移结构导入sysnoise

是在

ANSYS

软件界面上方

< br>Ansys Commond Prompt

命令栏中输入如下命令流：

/post1

nfreq=(freqe- freqb)/df+1

*get,nnod,node,,count

*dim,r,array,nnod,7,nfreq

*do,i,1,nfreq,1

set,,i

*get,nd,node,,num,min

*do,j,1,nnod,1

r(j,1,i)=nd

r(j,2,i)=ux(nd)

r(j,4,i)=uy(nd)

r(j,6,i)=uz(nd)

nd=ndnext(nd)

*enddo

set,,i,,1

*get,nd,node,,num,min

*do,j,1,nnod,1

r(j,3,i)=ux(nd)

r(j,5,i)=uy(nd)

r(j,7,i)=uz(nd)

nd=ndnext(nd)

*enddo

*enddo

*cfopen,result,fre

*do,i,1,nfreq,1

*vwrite,'SYSNOISE',' DISPLAC','EMENTS','FILE'

(a,a,a7,a4)

*vwrite,'Rev 5.5 ','IBM P2ES','SL 20-AP','R-04'

(a,a,a,a4)

*vwrite,'Displace','_Structu','re'

(a,a,a2)

*vwrite,' 20-APR-','2004 10:','07:13'

(a,a,a5)

*vwrite,'FREQUENC','Y'

(a,a1)

freq=freqb+(i-1)*df

*vwrite,freq

(e20.8)

*vwrite,'NODAL DI','SPLACEME','NT V

ALUE','S'

(a,a,a,a1)

*do,j,1,nnod,1

nseq=chrval(j)

a=r(j,1,i)

nd=chrval(a)

uxr=r(j,2,i)

uxi=r(j,3,i)

uyr=r(j,4,i)

uyi=r(j,5,i)

uzr=r(j,6,i)

uzi=r(j,7,i)

*vwrite,'

',nseq,'

',nd,uxr,uxi,uyr

(a2,a8,a2,a8,e20.8,e20.8,e20.8)

*vwrite,'','','',uyi,uzr,uzi

(a8,a8,a4,e20.8,e20.8,e20.8)

*vwrite,'','','',0,0,0

(a8,a8,a4,e20.8,e20.8,e20.8)

*vwrite,'','','',0,0,0

(a8,a8,a4,e20.8,e20.8,e20.8)

*enddo

*enddo

*cfclos

需要注意的是：

nfreq=(freqe-freqb)/d f+1

一句中，

freqe

为要提取的 截止频率，

freqb

为起始频率，

两 频率都不能超出之前在

ansys

中分析的频率。

在输入命令之

前，还要对

freqe

和

freqb

赋值。如：

/post1

freqe=500

freqb=0

df=5

nfreq=(freqe-freqb)/df+1

*get,nnod,node,,count

表示提取的频率为

0~500Hz< /p>

，步长为

5Hz

。

如此之后，就可以在

C:Documents

and

Settings

用户名目录 下得到一名为

的文件，即为响应结果文件，其

< br>fre

格式为

SYSNOISE

所支持的格式。

3

、导出文件的整理

以上导出的文件还 需要进行整理才能顺利导入

SYSNOISE

文件。

对于导出的网格模型文件，先将他用记事本打开，其第一行为：

/COM,ANSYS

RELEASE

9.0

UP20041104

14:22:49

05/29/2008

其中

9.0

为

ANSY S

的版本号，

只需将其版本号改为

5. 7

即可，

其他不用改动，

然后保存关闭 。

对于导出的响应文件，同样用记事本打开，可以看到开头为：

2

2

0.00000000E+00

0.00000000E+00

0.00000000E+00