12-0框架结构模型
合集下载
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
latt,1,,1,,,,2
lesize,all,l_lesize
lmesh,all
lsel,s,,,1,24
latt,1,,1,,,,3
lesize,all,l_lesize
lmesh,all
sectype,4,beam,rect
secoffset,user,-0.15,0.15
secdata,0.6,0.3
sectype,3,beam,rect
secdata,0.6,0.3
l_lesize=0.4
z_lesize=0.5
lsel,s,,,25,36
latt,1,,1,,,,1
lesize,all,l_lesize
lmesh,all
lsel,s,,,37,48
lmesh,all
sectype,11,beam,rect
secoffset,user,-0.15
secdata,0.6,0.6
lsel,s,,,53,57,4
latt,1,,1,,,,11
lesize,all,z_lesize
lmesh,all
sectype,12,beam,rect
mp,dens,2,2700
r,1,0.11
r,2,0.6
et,3,combin14
!定义梁柱板尺寸并划分
sectype,1,beam,rect
secoffset,user,-0.3
secdata,0.6,0.3
sectype,2,beam,rect
secoffset,user,0.3
sectype,7,beam,rect
secoffset,user,0.15,0
secdata,0.6,0.6
lsel,s,,,56,60,4
latt,1,,1,,,,7
lesize,all,z_lesize
lmesh,all
sectype,8,beam,rect
secoffset,user,0.15,-0.15
finish
/clear
/prep7
/title,Jiulimingzhu 12f-0
!建立第一层梁柱
k,1
k,2,-8
k,3,-16
k,4,-24
l,1,2
l,2,3
l,3,4
lsel,s,,,1,3
lgen,2,all,,,,,-6
lsel,s,,,4,6
lgen,2,all,,,,,-7
lesize,all,z_lesize
lmesh,all
sectype,6,beam,rect
secoffset,user,0.15,0.15
secdata,0.6,0.6
lsel,s,,,52
latt,1,,1,,,,6
lesize,all,z_lesize
lmesh,all
*enddo
!复制另一半时在此复制
!建立第一层楼板及筏板
a,17,29,32,20
lsel,s,loc,y,3
asbl,1,all
k,,1,,1
k,,-25,,1
k,,-25,,-20
k,,1,,-20
a,
*Get,nnod,NODE,0,COUNT !得到底部节点数量
*Dim,xyz,array,nnod,3
*Dim,nodes,array,nnod
*Get,nd,NODE,0,NUM,MIN
*Do,I,1,nnod,1
nodes(I)= nd
secdata,0.6,0.6
lsel,s,,,64
latt,1,,1,,,,8
lesize,all,z_lesize
lmesh,all
sectype,9,beam,rect
secoffset,user,0,-0.15
secdata,0.6,0.6
lsel,s,,,62,63
secdata,0.6,0.6
lsel,s,,,49
latt,1,,1,,,,4
lesize,all,z_lesize
lmesh,all
sectype,5,beam,rect
secoffset,user,0,0.15
secdata,0.6,0.6
lsel,s,,,50,51
latt,1,,1,,,,5
secdata,0.6,0.6
lsel,s,,,54,55
lsel,a,,,58,59
latt,1,,1,,,,12
lesize,all,z_lesize
lmesh,all
asel,s,loc,y,3
aatt,2,1,2
amesh,all
asel,s,loc,y,0
esize,0.5
latt,1,,1,,,,9
lesize,all,z_lesize
lmesh,all
sectype,10,beam,rect
secoffset,user,-0.15,-0.15
secdata,0.6,0.6
lsel,s,,,61
latt,1,,1,,,,10
lesize,all,z_lesize
lsel,s,loc,y,0
asbl,1,all
nummrg,all
numcmp,all
!定义材料参数
et,1,beam188
mp,ex,1,3.25e10
mp,prxy,1,0.2
mp,dens,1,2700
et,2,shell63
mp,ex,2,3.25e10
mp,prxy,2,0.2
lsel,s,,,7,9
lgen,2,all,,,,,-6
l,13,9
l,9,5
l,5,1
lsel,s,,,13,15,1
lgen,4,all,,,-8
nummrg,all
numcmp,all
lsel,all
lgen,2,all,,,,3
*do,i,1,16
l,i,i+16
mshape,0
mshkey,0
aatt,2,2,2
amesh,all
!复制1到12层
lsel,s,loc,y,0.1,3
lgen,12,all,,,,3
asel,s,loc,y,3
agen,12,all,,,,3
nummrg,all
numcmp,all
!加弹簧
y1=0
lesize,all,l_lesize
lmesh,all
lsel,s,,,1,24
latt,1,,1,,,,3
lesize,all,l_lesize
lmesh,all
sectype,4,beam,rect
secoffset,user,-0.15,0.15
secdata,0.6,0.3
sectype,3,beam,rect
secdata,0.6,0.3
l_lesize=0.4
z_lesize=0.5
lsel,s,,,25,36
latt,1,,1,,,,1
lesize,all,l_lesize
lmesh,all
lsel,s,,,37,48
lmesh,all
sectype,11,beam,rect
secoffset,user,-0.15
secdata,0.6,0.6
lsel,s,,,53,57,4
latt,1,,1,,,,11
lesize,all,z_lesize
lmesh,all
sectype,12,beam,rect
mp,dens,2,2700
r,1,0.11
r,2,0.6
et,3,combin14
!定义梁柱板尺寸并划分
sectype,1,beam,rect
secoffset,user,-0.3
secdata,0.6,0.3
sectype,2,beam,rect
secoffset,user,0.3
sectype,7,beam,rect
secoffset,user,0.15,0
secdata,0.6,0.6
lsel,s,,,56,60,4
latt,1,,1,,,,7
lesize,all,z_lesize
lmesh,all
sectype,8,beam,rect
secoffset,user,0.15,-0.15
finish
/clear
/prep7
/title,Jiulimingzhu 12f-0
!建立第一层梁柱
k,1
k,2,-8
k,3,-16
k,4,-24
l,1,2
l,2,3
l,3,4
lsel,s,,,1,3
lgen,2,all,,,,,-6
lsel,s,,,4,6
lgen,2,all,,,,,-7
lesize,all,z_lesize
lmesh,all
sectype,6,beam,rect
secoffset,user,0.15,0.15
secdata,0.6,0.6
lsel,s,,,52
latt,1,,1,,,,6
lesize,all,z_lesize
lmesh,all
*enddo
!复制另一半时在此复制
!建立第一层楼板及筏板
a,17,29,32,20
lsel,s,loc,y,3
asbl,1,all
k,,1,,1
k,,-25,,1
k,,-25,,-20
k,,1,,-20
a,
*Get,nnod,NODE,0,COUNT !得到底部节点数量
*Dim,xyz,array,nnod,3
*Dim,nodes,array,nnod
*Get,nd,NODE,0,NUM,MIN
*Do,I,1,nnod,1
nodes(I)= nd
secdata,0.6,0.6
lsel,s,,,64
latt,1,,1,,,,8
lesize,all,z_lesize
lmesh,all
sectype,9,beam,rect
secoffset,user,0,-0.15
secdata,0.6,0.6
lsel,s,,,62,63
secdata,0.6,0.6
lsel,s,,,49
latt,1,,1,,,,4
lesize,all,z_lesize
lmesh,all
sectype,5,beam,rect
secoffset,user,0,0.15
secdata,0.6,0.6
lsel,s,,,50,51
latt,1,,1,,,,5
secdata,0.6,0.6
lsel,s,,,54,55
lsel,a,,,58,59
latt,1,,1,,,,12
lesize,all,z_lesize
lmesh,all
asel,s,loc,y,3
aatt,2,1,2
amesh,all
asel,s,loc,y,0
esize,0.5
latt,1,,1,,,,9
lesize,all,z_lesize
lmesh,all
sectype,10,beam,rect
secoffset,user,-0.15,-0.15
secdata,0.6,0.6
lsel,s,,,61
latt,1,,1,,,,10
lesize,all,z_lesize
lsel,s,loc,y,0
asbl,1,all
nummrg,all
numcmp,all
!定义材料参数
et,1,beam188
mp,ex,1,3.25e10
mp,prxy,1,0.2
mp,dens,1,2700
et,2,shell63
mp,ex,2,3.25e10
mp,prxy,2,0.2
lsel,s,,,7,9
lgen,2,all,,,,,-6
l,13,9
l,9,5
l,5,1
lsel,s,,,13,15,1
lgen,4,all,,,-8
nummrg,all
numcmp,all
lsel,all
lgen,2,all,,,,3
*do,i,1,16
l,i,i+16
mshape,0
mshkey,0
aatt,2,2,2
amesh,all
!复制1到12层
lsel,s,loc,y,0.1,3
lgen,12,all,,,,3
asel,s,loc,y,3
agen,12,all,,,,3
nummrg,all
numcmp,all
!加弹簧
y1=0