框架剪力墙结构

框架剪力墙结构 /filename,frame_shear wall !设置分析工作名称 /title,frame_shear wall !设置图形标题 /prep7 !进入前处理器 et,1,beam4 !定义单元类型 et,2,shell63 r,1,0.25,0.0052,0.0052,0.5,0.5 !定义实常数 r,2,0.2025,0.0034,0.0034,0.45,0.45 r,3,0.06,0.0002,0.00045,0.3,0.2 r,4,0.25,0.25,0.25,0.25 r,5,0.1,0.1,0.1,0.1 mp,ex,1,3.0e10 !定义材料参数 mp,nuxy,1,0.2 mp,dens,1,2500 1 !创建底层关键点 *do,i,1,1 k,1+(i-1)*20,0,0,(i-1)*6 k,2+(i-1)*20,6,0,(i-1)*6 k,3+(i-1)*20,12,0,(i-1)*6 k,4+(i-1)*20,17,0,(i-1)*6 k,5+(i-1)*20,0,5,(i-1)*6 k,6+(i-1)*20,6,5,(i-1)*6 k,7+(i-1)*20,12,5,(i-1)*6 k,8+(i-1)*20,17,5,(i-1)*6 k,9+(i-1)*20,0,10,(i-1)*6 k,10+(i-1)*20,6,10,(i-1)*6 k,11+(i-1)*20,12,10,(i-1)*6 k,12+(i-1)*20,17,10,(i-1)*6 k,14+(i-1)*20,6,1.875,(i-1)*6 k,16+(i-1)*20,6,3.125,(i-1)*6 k,18+(i-1)*20,6,1.875,3.9 k,20+(i-1)*20,6,3.125,3.9 *enddo !创建2-11层关键点 2 *do,i,1,10 k,1+i*20,0,0,(i-1)*3+6 k,2+i*20,6,0,(i-1)*3+6 k,3+i*20,12,0,(i-1)*3+6 k,4+i*20,17,0,(i-1)*3+6 k,5+i*20,0,5,(i-1)*3+6 k,6+i*20,6,5,(i-1)*3+6 k,7+i*20,12,5,(i-1)*3+6 k,8+i*20,17,5,(i-1)*3+6 k,9+i*20,0,10,(i-1)*3+6 k,10+i*20,6,10,(i-1)*3+6 k,11+i*20,12,10,(i-1)*3+6 k,12+i*20,17,10,(i-1)*3+6 k,13+i*20,0,1.875,(i-1)*3+6 k,14+i*20,6,1.875,(i-1)*3+6 k,15+i*20,0,3.125,(i-1)*3+6 k,16+i*20,6,3.125,(i-1)*3+6 k,17+i*20,0,1.875,(i-1)*3+6+1.5 k,18+i*20,6,1.875,(i-1)*3+6+2 k,19+i*20,0,3.125,(i-1)*3+6+1.5 k,20+i*20,6,3.125,(i-1)*3+6+2 *enddo 3 !创建12层关键点 *do,i,11,11 k,1+i*20,0,0,(i-1)*3+6 k,2+i*20,6,0,(i-1)*3+6 k,3+i*20,12,0,(i-1)*3+6 k,4+i*20,17,0,(i-1)*3+6 k,5+i*20,0,5,(i-1)*3+6 k,6+i*20,6,5,(i-1)*3+6 k,7+i*20,12,5,(i-1)*3+6 k,8+i*20,17,5,(i-1)*3+6 k,9+i*20,0,10,(i-1)*3+6 k,10+i*20,6,10,(i-1)*3+6 k,11+i*20,12,10,(i-1)*3+6 k,12+i*20,17,10,(i-1)*3+6 k,13+i*20,0,1.875,(i-1)*3+6 k,14+i*20,6,1.875,(i-1)*3+6 k,15+i*20,0,3.125,(i-1)*3+6 k,16+i*20,6,3.125,(i-1)*3+6 k,17+i*20,0,1.875,(i-1)*3+6+1.8 k,18+i*20,6,1.875,(i-1)*3+6+2.5 k,19+i*20,0,3.125,(i-1)*3+6+1.8 4 k,20+i*20,6,3.125,(i-1)*3+6+2.5 *enddo !创建顶层关键点 *do,i,12,12 k,1+i*20,0,0,39.5 k,2+i*20,6,0,39.5 k,3+i*20,12,0,39.5 k,4+i*20,17,0,39.5 k,5+i*20,0,5,39.5 k,6+i*20,6,5,39.5 k,7+i*20,12,5,39.5 k,8+i*20,17,5,39.5 k,9+i*20,0,10,39.5 k,10+i*20,6,10,39.5 k,11+i*20,12,10,39.5 k,12+i*20,17,10,39.5 *enddo !创建各层梁格 *do,i,2,13 l,(i-1)*20+1,(i-1)*20+2 5 l,(i-1)*20+2,(i-1)*20+3 l,(i-1)*20+3,(i-1)*20+4 l,(i-1)*20+5,(i-1)*20+6 l,(i-1)*20+6,(i-1)*20+7 l,(i-1)*20+7,(i-1)*20+8 l,(i-1)*20+9,(i-1)*20+10 l,(i-1)*20+10,(i-1)*20+11 l,(i-1)*20+11,(i-1)*20+12 l,(i-1)*20+5,(i-1)*20+9 l,(i-1)* 20+6,(i-1)*20+10 l,(i-1)*20+3,(i-1)*20+7 l,(i-1)*20+7,(i-1)*20+11 l,(i-1)*20+4,(i-1)*20+8 l,(i-1)*20+8,(i-1)*20+12 *enddo !创建立柱 *do,i,1,12 l,(i-1)*20+1,i*20+1 l,(i-1)*20+2,i*20+2 l,(i-1)*20+3,i*20+3 6 l,(i-1)*20+4,i*20+4 l,(i-1)*20+5,i*20+5 l,(i-1)*20+6,i*20+6 l,(i-1)*20+7,i*20+7 l,(i-1)*20+8,i*20+8 l,(i-1)*20+9,i*20+9 l,(i-1)*20+10,i*20+10 l,(i-1)*20+11,i*20+11 l,(i-1)*20+12,i*20+12 l,(i-1)*20+1,i*20+1 *enddo !创建底层剪力墙开孔边框 *do,i,1,1 l,(i-1)*20+14,(i-1)*20+18 l,(i-1)*20+16,(i-1)*20+20 *enddo !创建其他层剪力墙开孔边框 *do,i,2,12 l,(i-1)*20+13,(i-1)*20+17 l,(i-1)*20+15,(i-1)*20+19 7 l,(i-1)*20+14,(i-1)*20+18 l,(i-1)*20+16,(i-1)*20+20 *enddo a,1,21,25,5 !创建底层外侧剪力墙 *do,i,2,12 !创建2-12层外侧剪力墙 a,(i-1)*20+1,i*20+1,i*20+5,(i-1)*20+5,(i-1)*20+15,(i-1)*20+ 19,(i-1)*20+17,(i-1)*20+13 *enddo *do,i,1,12 !创建内侧剪力墙 a,(i-1)*20+2,i*20+2,i*20+6,(i-1)*20+6,(i-1)*20+16,(i-1)*20+ 20,(i-1)*20+18,(i-1)*20+14 *enddo !创建楼板平面 *do,i,1,12 a,i*20+1,i*20+2,i*20+6,i*20+5 a,i*20+2,i*20+3,i*20+7,i*20+6 a,i*20+3,i*20+4,i*20+8,i*20+7 a,i*20+5,i*20+6,i*20+10,i*20+9 8 a,i*20+6,i*20+7,i*20+11,i*20+10 a,i*20+7,i*20+8,i*20+12,i*20+11 *enddo !划分网格 lsel,s,,,181,192 !选择底层立柱 latt,1,1,1 !设置底层立柱网格划分属性 lesize,all,,,10 !设置底层立柱网格划分数NDIV为10 lmesh,all !底层立柱划分网格 lsel,s,,,192,324 !选择2-12层立柱 latt,1,2,1 !设置2-12层立柱网格划分属性 lesize,all,,,5 !设置2-112层立柱网格划分数NDIV为5 lmesh,all !2-12层立柱划分网格 lsel,s,,,1,180 !选择各层梁格 latt,1,3,1 !设置梁格网格划分属性 lesize,all,,,8 !设置梁格网格划分数NDIV为8 lmesh,all !各层梁格划分网格 !剪力墙网格划分 9 lsel,s,,,372 !选择外侧剪力墙底端 lsel,a,,,413 !设置内侧剪力墙底端 lsel,a,,,461 !设置内侧剪力墙顶端 lesize,all,,,8 !设置网格划分数NDIV为8 lsel,s,,,418 !选择内侧剪力墙底端 lsel,a,,,420 lesize,all,,,3 !设置网格花分数NDIV为3 lsel,s,,,325 !选择内侧剪力墙底端内侧 lsel,a,,,326 lesize,all,,,6 !设置网格花分数NDIV为6 !选择剪力墙开孔顶端 lsel,s,,,375 lsel,a,,,379 lsel,a,,,383 lsel,a,,,387 lsel,a,,,391 lsel,a,,,395 lsel,a,,,399 lsel,a,,,403 10 lsel,a,,,407 lsel,a,,,411 lsel,a,,,415 lsel,a,,,419 lsel,a,,,423 lsel,a,,,427 lsel,a,,,431 lsel,a,,,435 lsel,a,,,439 lsel,a, ,,443 lsel,a,,,447 lsel,a,,,451 lsel,a,,,455 lsel,a,,,459 lsel,a,,,463 lesize,all,,,2 !设置网格划分数NDIV为2 asel,s,,,1,24 !选择剪力墙 aatt,1,4,2 !设置剪力墙的网格划分属性 amesh,all !剪力墙划分网格 11 asel,s,,,25,96 !选择各层楼板 aatt,1,5,2 !设置楼板的网格划分属性 amesh,all !楼板划分网格 /eshape,1.0 !/ESHAPE, SCALE 按看似固体化分的形式显示线、面单元 ! SCALE: 0:简单显示线、面单元 !1:使用实常数显示单元形状 Finish /solu !进入求解器 antype,static ! 设置分析类型为静力分析 nsel,s,loc,z,0 !选取模型底端节点 d,all,all !施加位移约束 !风荷载作用下的结构响应 ! /solu !进入求解器 ! antype,static !设置分析类型为静力分析 12 *dim,load_1,array,12 !定义荷载数组1 load_1(1)=3.78,2.16,2.39,2.57,2.72,2.84,2.95,3.17,3.20,3.29,3.39,3.51 *dim,load_2,array,12 !定义荷载数组2 load_2(1)=7.56,4.32,4.78,5.14,5.44,5.68,5.90,6.34,6.40,6.58,6.76,7.02 *dim,load_3,array,12 !定义荷载数组3 load_3(1)=6.93,3.96,4.38,4.71,4.99,5.21,5.41,5.81,5.87,6.03,6.20,6.44 *dim,load_4,array,12 !定义荷载数组4 load_4(1)=3.15,1.80,1.99,2.14,2.27,2.37,2.46,2.64,2.67,2.74,2.82,2.93 *dim,load_a,array,12 !定义荷载数组a load_a(1)=3.15,1.80,1.99,2.14,2.27,2.37,2.46,2.64,2.67,2.74,2.82,2.93 *dim,load_b,array,12 !定义荷载数组b load_b(1)=6.30,3.60,3.98,4.28,4.54,4.74,4.92,5.28,5.34,5.48,5.64,5.86 *dim,load_c,array,12 !定义荷载数组c load_c(1)=3.15,1.80,1.99,2.14,2.27,2.37,2.46,2.64,2.67,2.74,2.82,2.93 *do,i,1,12 !轴线1施加荷载 13 fk,1+20*i,fy,load_1(i) *enddo *do,i,1,12 !轴线2施加荷载 fk,2+20*i,fy,load_2(i) *enddo *do,i,1,12 !轴线3施加荷载 fk,3+20*i,fy,load_3(i) *enddo *do,i,1,12 !轴线4施加荷载 fk,4+20*i,fy,load_4(i) *enddo 百度搜索“就爱阅读”,专业资料,生活学习,尽在就爱阅读网92to.com,您的在线图书馆 14