ANSYS地震反应谱SRSS分析.docxVIP

ANSYS地震反应谱SRSS分析我在ANSYS中作地震分解反应谱分析，一次X方向，一次Y方向，他们要求是独立互不干扰的，可是采用直进行一次模态分析的话，他生成的*.mcom文件好像是包含了前面的计算结果，命令流如下：!进入PREP7并建模/PREP7 B=15 !基本尺寸A1=1000 !第一个面积A2=1000 !第二个面积A3=1000 !第三个面积ET,1,beam4 !二维杆单元R,1,0.25,0.0052,0.0052,0.5,0.5 !以参数形式的实参MP,EX,1,2.0E11 !杨氏模量mp,PRXY,1,,0.3 mp,dens,1,7.8e3 N,1,-B,0,0 !定义结点N,2,0,0,0 N,3,-B,0,b N,4,0,0,b N,5,-B,0,2*b N,6,0,0,2*b N,7,-B,0,3*b N,8,0,0,3*b E,1,3 !定义单元E,2,4 E,3,5 E,4,6 E,3,4 E,5,6 e,5,7 e,6,8 e,7,8 D,1,ALL,0,,2 FINISH ! !进入求解器，定义载荷和求解/SOLU D,1,ALL,0,,2 !结点UX=UY=0sfbeam,1,1,PRES,100000, sfbeam,3,1,PRES,100000, sfbeam,7,1,PRES,100000, SOLVE FINISH allselNMODE=10 /SOL !* ANTYPE,2 !* MSAVE,0 !* MODOPT,LANB,NMODE EQSLV,SPAR MXPAND,NMODE , , ,1 LUMPM,0 PSTRES,0 !* MODOPT,LANB,NMODE ,0,0, ,OFF SOLVE *DIM,FRE,,NMODE *DO,I,1,NMODE *GET,FRE(I),MODE,I,FREQ ! OBTAIN MODE FREQENCY FOR MODE I *ENDDO FINISH !地震影响系数grav=9.81 tg=0.35 amax=0.08 c=0.05 ! *dim,a,,nmode*dim,t,,nmode*do,i,1,nmode t(i)=1.0/fre(i) *enddor=0.9+(0.05-c)/(0.5+5.0*c) p1=0.02+(0.05-c)/8 p2=1+(0.05-c)/(0.06+1.7*c) *do,i,1,nmode *if,t(i),ge,0.0,and,t(i),lt,0.1,then a(i)=(0.45+(10.0*p2-4.5)*t(i))*amax*grav*elseif,t(i),ge,0.1,and,t(i),le,tga(i)=p2*amax*grav*elseif,t(i),gt,tg,and,t(i),le,5*tga(i)=(tg/t(i))**r*p2*amax*grav*else a(i)=(p2*0.2**r-p1*(t(i)-5*tg))*amax*grav*endif*enddo! ! X-方向谱分析 Spectrum analysis along Global X-axis direction/SOLU ANTYPE,SPECTR ! Spectrum analysis SPOPT,SPRS ! Single point spectrum SED,1,, ! Global X-axis as spectrum direction SVTYP,2 ! Seismic acceleration response spectrum ! Frequency points and Spectrum values for SV vs. freq. table FREQ,fre(1),fre(2),fre(3),fre(4),fre(5),fre(6),fre(7),fre(8),fre(9) FREQ,fre(10)? ?SV,,a(1),a(2),a(3),a(4),a(5),a(6),a(7),a(8),a(9) SV,,a(10)? ?FINISH !/SOLU !ANTYPE,MODAL ! Mode-frequency analysis !EXPASS,ON !MXPAND,nmode,,,YES,0.0 ! Expand nmode shapes, calculate element stresses !SOLVE !FINISH /SOLU ANTYPE,SPECTR SRSS,0.0,DISP ! Square Root of Sum of Squares Mode combination ? ?? ?? ?? ?? ?? ?! with signif=0.0 and