您好,欢迎访问三七文档
当前位置:首页 > 行业资料 > 其它行业文档 > ANSYS一个高层剪力墙三维仿真实例
一个高层剪力墙三维仿真实例finish/clear!定义单元类型和材料属性/prep7et,1,beam188et,2,shell63mp,ex,1,3.25e10mp,dens,1,2700mp,ex,2,3.0e10mp,dens,2,2700!定义柱、梁截面sectype,1,beam,rectsecdate,1.1,1.1sectype,2,beam,rectsecdate,0.4,0.6sectype,3,beam,rectsecdate,0.5,0.8sectype,4,beam,rectsecdate,0.3,0.5!定义筒体、楼板及外墙实常数r,2,0.2r,3,0.3建立整个模型的关键点k,5000,22,8,72k,1k,12,44kfill,1,12!共生成13个点kgen,5,1,12,,,4kgen,19,1,60,,,,3/view,1,1,1,1/angle,1,270,xm,0/replot*do,i,1,1021,60l,i,i+60*enddolgen,3,1,18,1,8,,,2!看每一步模型建立情况lgen,2,1,54,1,,16,,48lgen,2,1,18,1,,8,,24lgen,2,37,54,1,,8,,24lgen,2,1,144,1,28,,,7latt,1,,1,,5000,,1lesize,all,1.5lmesh,alllsel,u,,,all!建立外环梁模型l,61,65l,65,89l,89,92l,92,68l,68,72l,72,120l,120,109l,109,61lgen,18,289,296,1,,,3,60latt,1,,1,,5000,,2!同以上不同lesize,all,2lmesh,alllsel,u,,,all!以上四句给刚画的线指定!建立内框架梁模型l,63,111l,85,89l,89,113l,70,118l,92,96l,92,116lgen,18,433,438,1,,,3,60latt,1,,1,,5000,,3!同以上不同lesize,all,2lmesh,alllsel,u,,,all!建立次梁模型l,62,110l,64,112l,69,117l,71,117l,97,108l,73,77l,80,84l,90,102l,91,103lgen,18,541,549,1,,,3,60latt,1,,1,,5000,,4!同以上不同lesize,all,2lmesh,allallsel!建立楼层板模型。共631个面元素*do,i,61,64,1a,i,i+1,i+13,i+12*enddoagen,4,1,4,1,,4,,12*do,i,68,71,1a,i,i+1,i+13,i+12*enddoagen,4,17,21,1,,4,,12*do,i,89,91,1a,i,i+1,i+13,i+12*enddoagen,18,1,35,1,,,3,60a,1133,1136,1124,1121!建立外墙几何模型并对楼层板及外墙划分网格。外墙共527个面元素,最大面元素1158*do,i,61,64,1a,i,i+1,i+61,i+60*enddo*do,i,89,91,1a,i,i+1,i+61,i+60*enddo*do,i,68,71,1a,i,i+1,i+61,i+60*enddo*do,i,61,64,1a,i,i+1,i+61,i+60*enddo*do,i,109,112,1a,i,i+1,i+61,i+60*enddo*do,i,116,119,1a,i,i+1,i+61,i+60*enddo*do,i,61,97,12a,i,i+12,i+72,i+60*enddo*do,i,65,77,12a,i,i+12,i+72,i+60*enddo*do,i,68,80,12a,i,i+12,i+72,i+60*enddo*do,i,72,108,12a,i,i+12,i+72,i+60*enddoagen,17,632,662,1,,,3,60aatt,2,2,2!指定楼板及外墙单元属性、材料属性、实常数aesize,all,2amesh,allasel,u,,,all!建立筒体模型a,53,56,1136,1133a,41,44,1124,1121aatt,1,3,2aesize,all,2amesh,allasel,u,mat,,1a,41,53,1133,1121a,44,56,1136,1124aatt,1,3,2aesize,all,1.5amesh,allnummrg,all!合并元素numcmp,all!压缩元素编号!加载与求解!施加边界条件!摸台分析/soluantype,modalmodopt,subsp,5mxpand,5,,,yes!扩展摸台solve
本文标题:ANSYS一个高层剪力墙三维仿真实例
链接地址:https://www.777doc.com/doc-5919121 .html