Ansys有限元大作业十层框架剪力墙结构,X、Y方向均为两跨,每个开间均为5m*3m,是进行静力分析、模态分析、瞬态分析1、结构形式,截面参数材料参数介绍(1)命令流FINI/CLE/FILNAME,YOUZUNI/TITLE,KUANGJIA/UNITS,SI/PREP7!材料MP,EX,1,3.15e10!C35MP,NUXY,1,0.25MP,DENS,1,2500MP,EX,2,3.15e10!C35楼板MP,NUXY,2,0.25MP,DENS,2,4000!单元类型ET,1,BEAM44ET,2,SHELL63!实常数R,1,0!梁截面SECTYPE,1,BEAM,RECT,,0SECOFFSET,CENTSECDATA,0.300,0.700,2,2!R,2,0!柱截面SECTYPE,2,BEAM,RECT,,0SECOFFSET,CENTSECDATA,0.500,0.500,2,2R,3,0.12,0.12,0.12,0.12!楼板截面nn=7*DO,J,0,nnN,1+12*J,4,0,0+3*JN,2+12*J,4,5,0+3*JN,3+12*J,4,10,0+3*JN,4+12*J,4,15,0+3*JN,5+12*J,0,0,0+3*JN,6+12*J,0,5,0+3*JN,7+12*J,0,10,0+3*JN,8+12*J,0,15,0+3*JN,9+12*J,-4,0,0+3*JN,10+12*J,-4,5,0+3*JN,11+12*J,-4,10,0+3*JN,12+12*J,-4,15,0+3*J*ENDDOTYPE,1!梁MAT,1REAL,1SECNUM,1*DO,KK,13,1+12*nn,12*DO,I,KK,KK+3,1*DO,J,I,I+4,4E,J,J+4*ENDDO*ENDDO*ENDDO*DO,KK,13,1+12*nn,12*DO,I,KK,KK+8,4*DO,J,I,I+2,1E,J,J+1*ENDDO*ENDDO*ENDDOTYPE,1!柱子MAT,1REAL,2SECNUM,2*DO,I,1,12*nn,1E,I,I+12*ENDDOTYPE,2!楼面MAT,2REAL,3*DO,K,13,1+12*nn,12*DO,I,K,K+4,4*DO,J,I,I+2,1E,J,J+1,J+5,J+4*ENDDO*ENDDO*ENDDOALLSEL!施加约束NSEL,S,LOC,Z,0/SOLUD,ALL,ALL,0ALLSELFINISH(2)结果2、静力分析命令流jingli.mac/SOLUACEL,0,0,9.8*DO,I,204,245,1SFE,I,2,PRES,,500*ENDDOSOLVEFINISH!在所有荷载作用下的变形图/POST1PLDISP,1!位移云图PLNSOL,U,SUM,0,1!应力云图PLNSOL,S,EQV,0,1!输出支座反力PRRSOL(2)结果:所有荷载作用下的变形图最大位移云图最大应力云图支座反力3模态分析(1)命令流motai.mac/SOLUANTYPE,MODALMODOPT,LANPCG,5,0,100MXPAND,ALLSELSOLVEFINISH!模态分析/POST1SET,LISTSET,FIRSTPLNSOL,U,SUM,0,1ANMODE,10,0.5,,0/ANFILE,SAVE,'animate-1stmodal','avi',''SET,NEXTPLNSOL,U,SUM,0,1SET,NEXTPLNSOL,U,SUM,0,1SET,NEXTPLNSOL,U,SUM,0,1SET,NEXTPLNSOL,U,SUM,0,1FINISH(2)结果:前5阶振型第一阶振型从位移分布可知为弯曲振型第二阶振型从位移分布可知为弯曲振型第三阶振型从位移分布可知为扭转振型第四阶振型从位移分布可知为弯曲振型第五阶振型从位移分布可知为弯曲振型前五阶频率:4、瞬态分析(1)命令流shuntai.mac!瞬态分析PI=3.1415926C=0.05/SOLUANTYPE,MODALMODOPT,LANB,2MXPAND,ALLSELSOLVEFINISH/POST1*GET,FRE1,MODE,1,FREQ*GET,FRE2,MODE,2,FREQA1=1./(2.*2.*PI*FRE1)B1=2.*PI*FRE1/2.BET=C/(FRE1+FRE2)/PIALF=(C-B1*BET)/A1*DIM,DTAB,ARRAY,1,2*VFILL,DTAB(1,1),DATA,FRE1*VFILL,DTAB(1,2),DATA,FRE2*CFOPEN,RESULT,TXT*VWRITE,DTAB(1,1),DTAB(1,2)(F8.4,5X,F8.4,5X)*CFCLOSEFINISH/SOLUALLSEL,ALLANTYPE,TRANSTRNOPT,FULLNCNV,0,ALPHAD,ALFBETAD,BETTIMINT,ONKBC,0FCUM,REPLSTEP=0.01OUTPR,ALL,ALL,OUTRES,ALL,ALL,*DIM,WL_220,,4000,2*VREAD,WL_220,WL4000,TXT,,JIK,2,4000(2F15.3)*DO,I,1,4000TIME,I*STEPALLSELF,86,FX,WL_220(I,1)F,86,FY,WL_220(I,2)ALLSELSOLVE*ENDDOFINISH/POST26NSOL,2,86,U,X,UX_1PLVAR,2NSOL,3,88,U,Y,UY_1PLVAR,3ESOL,4,240,85,S,EQV,SEQV_1PLVAR,4RFORCE,5,8,F,X,FX_1PLVAR,5RFORCE,6,8,F,Y,FY_1PLVAR,6RFORCE,7,8,M,X,MX_1PLVAR,7RFORCE,8,8,M,Y,MY_1PLVAR,8FINISH(2)结果:最大位移时程曲线最大应力时程曲线基底最大弯矩时程曲线基底最大剪力时程曲线