地震反映谱
一三层 钢框架的地震反映谱分析，请大家笑纳！！!钢框架的振型分解反应谱分析
/prep7
et,1,beam188
mptemp,1
mpdata,ex,1,,2.06e11
mpdata,dens,1,,7850
mpdata,prxy,1,,0.2
mpdata,ex,2,,25.5e15
mpdata,dens,2,,1088e2
mpdata,prxy,2,,0.2
sectype,1,beam,hrec,colum
secoffset,cent
secdata,0.5,0.5,0.02,0.02,0.02,0.02
sectype,2,beam,i,beam
secoffst,user,0,0.5
secdata,0.4,0.4,0.5,0.015,0.015,0.015
k,1,-4.5
k,2,-4.5,4
k,3,-4.5,8.0
k,4,-4.5,12
k,5,4.5,12
k,6,4.5,8
k,7,4.5,4
k,8,4.5
l,1,2
l,2,3
l,3,4
l,4,5
l,5,6
l,6,7
l,7,8
l,3,6
l,2,7
l,7,8
nummrg,all
numcmp,all
lesize,all,,,20
lsel,s,loc,x,-4.5
lsel,a,loc,x,4.5
k,15,0,15
latt,1,1,1,,15,,1
lmesh,all,all
allsel,all
lsel,s,loc,y,4
lsel,a,loc,y,8
lsel,a,loc,y,12
latt,2,1,1,,15,,2
lmesh,all,all
allsel
nsel,s,loc,y,0
d,all,all
allsel,all
/eshape,1
/replot
/solu
antype,modal
modopt,lanb,10,0,0,,off
mxpand,10,,,yes
acel,,9.8
solve
finish
/solu
antype,spectr
spopt,sprs,,yes
dmprat,0.02
svtyp,2,1
sed,1
!!ii类建筑场地，6度设防，多遇地震（近震）
!曲线的下降段衰减系数r=0.95
!amax=0.11
!阻尼比=0.02
!特征周期Tg=0.34s
!直线段的下降段斜率调整系数r1=0.02375
!阻尼调整系数r2=1.319
!定义反应谱曲线
freq,0.420168067,0.452488688,0.49016078,0.534759358,0.588235294,0.653594771,0.735294118,0.840336134,0.980392157
freq,1.176470588,1.470588253,1.960784314,2.941176471,10,1000000
sv,0.02,0.296731616,0.301172866,0.305614116,0.310055366,0.314496616,0.347604662,0.388759029,0.441339541,0.510942806
sv,0.02,0.607567413,0.751032939,0.987076437,1.451,1.451,0.495
solve
finish
/solu
antype,spectr
srss,0.15,disp
solve
finish
/post1
allsel,all
sumtype,prin
/input,,mcom
plnsol,u,sum
etable,mx,smisc,4,17
etable,my,smisc,2,15
etable,bk,smisc,28,30
pletab,mx
pletab,my
pletab,bk
lcwrite,1,'spectrum','l01',''
finish
/solu
antype,static,
solve
fini
/post1
set,1
lcdef,1,1,1
lcfile,2,'spectrum','l01',''
lcfact,2,1.3
sumtype,prin
lcase,1
lcoper,add,2,,2
esel,u,type,,1
plnsol,u,sum
[ 本帖最后由 MVH 于 2006-10-4 15:46 编辑 ] 谢谢啊 谢谢！
页:
[1]