ansys框架-剪力墙命令流

Frameshearwall.txt

/filename,frame_shearwall!设置分析工作名称

/title,frame_shearwall!设置图形标题

/prep7!进入前处理器

et,I,beam4!定义单元类型

et,2,she!163

rj,0.25,0.0052,0.0052,0.5,05!定义实常数

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,0J,0.1,0.L0.l

mp,ex,l,3.()el0!定义材料参数

mp,nuxy,1,0.2

mp.dcns.1,2500

!创建底层关键点

k,l+(i-l)*20A0,(i-l)*6

k,2+(i-l)*20,6,0,(i-l)*6

k.3+(i-l)*20.12,0.(i-l)*6

k,4+(i-l)*20J7,0,(i-l)*6

k,5+(i-l)*20,0,5,(i-l)*6

k.6+(i-l)*20.6.5.(i-l)*6

k,7+(i-l)*20J2,5,(i-l)*6

k,8+(i-1)*20/7,5,(i-1)*6

k,9+(i-l)*20,0,10,(i-l)*6

k,10+(i-l)*20,6,I0,(i-l)*6

k,ll+(i-l)*20,12,10,(i-I)*6

k,12+(i-l)*20,17,10,(i-l)*6

k,14+(i-l)*20,6,1.875,(i-l)*6

k,16+(i-1)*20,6,3.125,(1-1)*6

kJ8+(i-1)*2061.875,3.9

k,20+(i-1)*20,6,3.125,3.9

*enddo

!创建2-11层关键点

♦do,Li,10

kJ+i*20,0A(i-l)*3+6

k,2+i*20,6,0,(i-l)*3+6

k,3+i*20,l2.0,(i-l)*3+6

k,4+i*20,17,0,(i-l)*3+6

k,5+i*20,0,5,(i-l)*3+6

k.6+i*20.6.5.(i-l)*3+6

k,7+i*2O,I2,5,(i-D*3+6

k,8+i*20,l7,5,(i-l)*3+6

k.9+i*20.0J0.(i-l)*3+6

k,10+i*20,6,10Xi-l)*3+6

k,ll+i*20,12J0,(i-l)*3+6

kJ2+i*20,17,10,(i-l)*3+6

k,13+i*20,0,1.875,(i-l)*3+6

k,14+i*20,6J.875,(i-l)*3+6

k,15+i*20,0,3.125,(i-D*3+6

k,16+i*20,6,3.125,(i-l)*3+6

kJ7+i*20,0,1.875,(i-1)*3+6+1.5

k.l8+i*20,6J.875,(i-D*3+6+2

k,l9+i*20,0,3.125,(i-1)*3+6+1.5

k,20+i*20,6,3.l25,(i-1)*3+6+2

*enddo

!创建12层关键点

k,l+i*20,0,0,(i-D*3+6

k,2+i*20.6,0,(i-l)*3+6

k,3+i*20,12,0,(i-D*3+6

k,4+i*20.17,0,(i-l)*3+6

k,5+i*2O,O,5,(i-l)*3+6

k,6+i*20,6,5,(i-l)*3+6

k,7+i*20,12,5,(i-l)*3+6

k,8+i*2O,I7,5,(i-l)*3+6

k.9+i*20,0J0.(i-l)*3+6

k,10+i*20,6,10,(i-l)*3+6

kJl+i*20,12,10,0-1)*3+6

kJ2+i*20,17J0.(i-l)*3+6

k,13+i*20,0,1.875,(i-1)*3+6

k,l4+i*20,6.l.875,(i-l)*3+6

k.l5+i*20,0,3.125,(i-l)*3+6

kJ6+i*20,6,3.125,(i-l)*3+6

kJ7+i*20,0,1,875,(i-l)*3+6+1.8

k.l8+i*20,6.1.875.6-1)*3+6+2.5

k,l9+1*20,0,3.125,(i-l)*3+6+1.8

k.20+i*20.6.3.l25,(i-l)*3+6+2.5

*enddo

!创建顶层关键点

*do,iJ2,12

k,l+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*20J7.5.39.5

k,9+i*20,0,10,39.5

kJ0+i*20,6J0,39.5

k.ll+i*2O,12,IO.39.5

k,12+i*20,17,1039.5

*enddo

!创建各层梁格

*do,it2,13

I,(i-l)*20+l,(i-l)*20+2

l,(i-l)*20+2,(i-1)*20+3

l,(i-l)*20+3,(i-l)*20+4

I,(i-l)*20+5,(i-l)*20+6

l,(i-l)*20+6,(i-l)*20+7

l,(i-l)*20+7,(i-l)*20+8

I,(i-l)*20+9,(i-l)*20+10

l,(i-1)*20+10,(i-1)*20+11

l.(i-1)*20+11,(M)*2O+I2

I,(i-D*20+5,(i-l)*20+9

I,(i-l)*20+6,(i-1)*20+10

l,(i-I)*20+3,(i-l)*20+7

I,(i-l)*20+7,(i-l)*20+ll

l,(i-l)*20+4,(i-l)*20+8

l,(i-l)*20+8,(i-l)*20+l2

*enddo

怆U建立柱

*do.i.l.l2

l,(i-l)*20+l,i*20+l

l.(i-i)*20+2,i*20+2

l.(i-l)*2O+3,i*2O+3

l,(i-l)*20+4,i*20+4

l,(i-l)*20+5,i*20+5

I,(i-D*20+6,i*20+6

l,(i-l)*20+7,i*20+7

l,(i-i)*20+8,i*20+8

l,(i-l)*20+9,i*20+9

l,(i-l)*20+10,i*20+10

I,(i-l)*20+ll,i*20+ll

l,(i-l)*20+12,i*20+12

l,(i-l)*20+l,i*20+l

*cnddo

!创建底层剪力墙开孔边框

♦do,i,1,1

l,(i-1)*20+14,(i-1)*20+18

l,(i-1)*20+16,0-1)*20+20

*cnddo

!创建其他层剪力墙开孔边框

*do,i,2,12

l,(i-1)*20+13,(i-1)*20+17

l,(i-1)*204-15,0-1)*20+19

I,(i-l)*20+14,(i-l)*20+18

)*20+16,(i-l)*20+20

*cnddo

aJ,21,25,5!创建底层外侧剪力墙

*do,i,2,12!创建2-12层外侧剪力墙

a,(i-1)*20+1,i*20+1,i*2O+5,(i-D*20+5,(i-1)*20+15,(i-1)*20+19,(i-l)*20+17,(i-1)*20+13

*enddo

*do,iJ,12!创建内侧剪力墙

a,(i-1)*20+2,i*20+2,i*20+6,(i-l)*20+6,(i-1)*20+16,(i-l)*20+20,(i-l)*20+18,(i-1)*20+14

*enddo

!创建楼板平面

*do,i,l,12

a,i*20+l,i*20+2J*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*2O+9

a,i*20+6,i*20+7,i*20+ll,i*20+10

a,i*20+7,i*20+8,i*20+12,i*20+lI

♦enddo

!划分网格

lsel,s„,181,I92!选择底层立柱

lattJJJ!设置底层立柱网格划分属性

Icsizc.all,„l()!设置底层立柱网格划分数NDIV为10

lmesh,all!底层立柱划分网格

lsel,s„J92,324!选择2-12层立柱

latt,1,2,1!设置2-12层立柱网格划分属性

lesize,all„,5!设置2-112层立柱网格划分数NDIV为5

Imesh.all!2-12层立柱划分网格

lsel,s„,l,180!选择各层梁格

!设置梁格网格划分属性

lesize,all,„8!设置梁格网格划分数NDIV为8

lmesh,all!各层梁格划分网格

!剪力墙网格划分

lsel,s„,372!选择外恻剪力墙底端

lsel,a„,413!设置内恻剪力墙底端

lsel,a,„461!设置内侧剪力墙顶端

Iesize,all„.8!设置网格划分数NDIV为8

lsel,s,„418!选择内侧剪力墙底端

lscl,a,„420

lesize,all,„3!设置网格花分数NDIV为3

lsel,s„,325!选择内恻剪力墙底端内侧

1sei,a,”326

lesize,all,„6!设置网格花分数NDIV为6

!选择剪力墙开孔顶端

lsel,s,„375

lsel,a,„379

Iscl.a.,,383

lsel,a,„387

lsel,a,„39l

Iscl,a,„395

lsel,a,„399

lsel,a,„403

lsel.a.,.407

lsel,a,„411

lsel,a,„4l5

Isel.a...419

lsel,a,„423

lsel,a,„427

Isel,a,„431

1sei,a,”435

lsel,a,„439

lsel,a„.443

lsel,a,„447

lsel,a,„451

lsel,a,„455

lsel,a,„459

1sei,a,”463

lesize,all,„2!设置网格划分数NDIV为2

asel,s,„l,24!选择剪力堵

aatt,1,4,2!设置剪力增的网格划分属性

amesh.all!剪力墙划分网格

asel,s,„25,96!选择各层楼板

aatt,1,5,2!设置楼板的网格划分属性

amesh,all!楼板划分网格

/eshape,1.0

Finish

/solu!进入求解器

antype,static!设置分析类型为静力分析

!选取模型底端节点

nsel9s,loc,z,0

d,all,all!施加位移约束

!风荷载作用下的结构响应

/solu!进入求解器

antype,static!设置分析类型为静力分析

*dim,load_1.array,12!定义荷载数组1

load_1(1)=3.78216.2.39.2.57.2.72.2.84.2.95.3.17.3.20.3.29.3.39.3.51

*dim.load_2,array,l2!定义荷载数组2

load_2(l)=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

*dirn,load_4.array,12!定义荷我数组4

Ioad_4(l)=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,l2!定义荷载数组a

load_a(l)=3.15J.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

k)ad_b(l)=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(l)=3.15J.80,1.99,2.14,2.27,237,2.46,2.64,2.67,2.74,2.82,2.93

*do,i,l,12!轴线1施加荷载

tlcj+20*i,fy.load_l(i)

*enddo

!釉线2施加荷载

tlc.2+20*i,fy.load_2(i)

*enddo

*do,i,l,12!轴线3施加荷载

fk,3+20*i,fy.load_3(i)

*enddo

♦do,ul,12!轴线4施加荷载

f\,4+20*i,fy.load_4(i)

*enddo

solve!求解

fkdele,all,all!删除丫方向风荷载

*do,i,U2!轴线a施加荷载

fk.l+20*i,fx,load_a(i)

*enddo

*do,i.i,12!轴线b施加荷我

fk,5+20*i,fx,load_b(i)

*enddo

♦do,i,1,12!轴线c施加荷我

tk9+20*i,fx』oad_c⑴

*enddo

solve!求解

finish!退出求解器

!后处理器观察结构位移和应力的分布

/postl!进入通用后处理器

set,first!读入Y方向荷载计算结果

plnsol.u.y,0,1!显示侧向位移UY分布

plnsol.s.1.0.1!显示主应力S1分布

set,next!读入X方向荷载计算结果

plnsol.u.x,0.1!显示侧向位移UX分布

plnsol,s,1,0,1!显示主应力S1分布

finish!退出后处理器

!结构模态分析

/solu!进入求解器

antype,modal!设置分析类型模态分析

niodopt.lanb.6!采用BlockLanzcos模态提取法，提取数为6

mosoptJanb,6,0,0.off!采用模态设置

solve!求解

finish:退出求解器

!后处理观察结果

/post1!进入通用后处理器

sei.list!列表显示模型的固有频率

set,first!读入第一荷载步的计算结果

pldisp,0!设置显示方式为只显示变形后的模型

set.next!读入第二荷载步的计算结果

pldisp,0!设置显示方式为只显示变形后的模型

set,next!读入第三荷载步计算结果

pldisp.O!设置显示方式为只显示变形后的模型

set,next!读入第四荷载步的计算结果

pldisp,0!设置显示方式为只显示变形后的模型

set.next!读入第五荷载步的计算结果

pldisp,0!设置显示方式为只显示变形后的模型

set,next!读入第六荷载步的计算结果

pldisp.O!设置显示方式为只显示变形后的模型

finish:退出通用后处理器

!地震作用下的结构响应

nt=150!定义时间点数目

*dim,time„nt!定义时间数组

*dim,ac_x,.nt!定义地震加速度数组

*dim.ac_y..ni

*dim,ac_z„nt

!从数据文件读入数据

*vread.timc.timc,txt..ijk,nt

(f6.2)

*vread,ac_x,ac_x,txt.

(f6.2)

*vread,ac_y,ac_y,txt,

(f6.2)

*vread,ac_z,ac_z,txt

(f6.2)

!分析选项设置与求解

/solu!进入求解器

antypc.trans!定义分析类型

nsubst,1„,1!定义荷载子步数

*do,i,l,nt

acel,ac_x(i),ac_y(i),ac_z(i)!施加加速度荷载

time,time⑴!设置时间点

solve!求解

*cnddo

!后处理观察结构位移响应

/post26!进入时间历程后处理器

nsol,2,733,u,x,ux_l!定义X方向位移变量

nsol,3,773,u,x,ux_2

nsol,4,748.u,x.ux_3

nsol,5,788,u,x,ux_4

nsol.6.733,u,y,uy_l!定义y方向位移变量

nsol.7,748.u,y.uy