装配式混凝土柱钢梁节点ANSYS命令流.docx
《装配式混凝土柱钢梁节点ANSYS命令流.docx》由会员分享，可在线阅读，更多相关《装配式混凝土柱钢梁节点ANSYS命令流.docx（25页珍藏版）》请在冰豆网上搜索。
装配式混凝土柱钢梁节点ANSYS命令流
finish$/clear$/config,fsplit,750$/prep7
定义材料
!
!
下面定义材料1，Q235A型钢钢材
mp,ex,1,2.1e11$mp,prxy,1,0.3$mp,dens,1,7850
tb,bkin,1
tbdata,,268.85e6,0
!
!
下面定义材料9，Q235A型钢钢材
mp,ex,3,2.1e11$mp,prxy,3,0.3$mp,dens,3,7850
tb,bkin,3
$tbdata,,235e6,0
下面定义材料2,混凝土C40
fck=26*0.85*0.8e6$ftk=2.3e6
mp,ex,2,fck*0.44/0.0005$mp,prxy,2,0.2$mp,dens,2,2600
tb,concr,2$tbdata,,0.125,0.7,FTK,-1
tb,mkin,2$tbtemp,,strain!
混凝土屈服准则
Tbdata,1,0.0005,0.001,0.0015,0.002,0.0038$tbtemp,0
$Tbdata,1,0.44*fck,0.75*fck,0.94*fck,fck,0.85*fck!
混凝土应力应变曲线
下面定义材料4,纵钢筋直径20
mp,ex,4,2.1e11$mp,prxy,4,0.3$mp,dens,4,7850
tb,bkin,4
tbdata,,365e6,0
下面定义材料7,箍筋直径8
mp,ex,5,2.1e11$mp,prxy,5,0.3$mp,dens,5,7850
tb,bkin,5
tbdata,,243e6,0
定义实常数
Pi=acos（-1）
$r,1$r,2$
r,3,0.25*pi*0.020*0.020
r,4,0.25*pi*0.008*0.008
R,5
定义单元
et,1,solid45$et,2,solid65$et,3,LINK8
keyopt,2,7,1$keyopt,2,1,1$keyopt,2,3,2
建模型
!
柱子
wpstyl,defa$Block,-0.2,0.2,-1.5,1.5,0,0.2
cm,zhuzi,volu
!
工字钢
vsel,none$wpstyl,defa$$block,-2,2,-0.125,0.125,0,0.003$block,-2,2,0.125-0.015,0.125,0,0.078$
$block,-2,2,-0.125,-0.125+0.015,0,0.078$
$wpstyl,defa$wpoff,-0.2$$block,0,0.010,-0.125,0.125,0,0.078
$wpstyl,defa$wpoff,0.2$$block,-0.010,0,-0.125,0.125,0,0.078
$wpstyl,defa$wpoff,,0.125-0.015
$block,-0.075,0.075,0,1.5-0.125+0.015,0,0.003$
$block,-0.075,-0.075+0.008,0,1.39,0,0.078$
$block,0.075-0.008,0.075,0,1.39,0,0.078$
$wpstyl,defa$wpoff,,-0.125+0.015
$block,-0.075,0.075,-1.39,0,0,0.003$
$block,-0.075,-0.075+0.008,-1.39,0,0,0.078$
$block,0.075-0.008,0.075,-1.39,0,0,0.078$
$wpstyl,defa$wpoff,,-0.125+0.015
$block,-0.2,0.2,-0.06-0.015,0,0,0.003$
$wpstyl,defa$wpoff,,0.125-0.015
$block,-0.2,0.2,0,0.060+0.015,0,0.003$
$wpstyl,defa$wpoff,-0.2$$block,0,0.010,0.125,0.125+0.06,0,0.2
$wpstyl,defa$wpoff,0.2$$block,-0.010,0,0.125,0.125+0.06,0,0.2
$wpstyl,defa$wpoff,-0.2$$block,0,0.010,-0.125-0.06,-0.125,0,0.2
$wpstyl,defa$wpoff,0.2$$block,-0.010,0,-0.125-0.06,-0.125,0,0.2
$wpstyl,defa$wpoff,,-0.125$wpoff,,,0.2
$block,-0.2,0.2,-0.06,0,-0.010,0$
$wpstyl,defa$wpoff,,0.125$wpoff,,,0.2
$block,-0.2,0.2,0,0.06,-0.010,0$
$wpstyl,defa$wpoff,-0.2$$block,0,0.010,-0.11,0.11,0,0.2$wpstyl,defa$wpoff,0.2$$block,-0.010,0,-0.11,0.11,0,0.2
$wpstyl,defa$wpoff,,,0.2
$block,-0.2,0.2,-0.11,0.11,-0.010,0$
Nummrg,kp$vptn,all$
cm,gzg,volu$numcmp,all
$allsel,all
$vptn,all$
$allsel,all
Vsel,u,,,gzg
Cm,zhuzi,volu
!
切分gzg
Cmsel,s,gzg,volu$Nummrg,kp$
!
画纵筋
$wpstyl,defa$wpoff,0.2$wpoff,,,0.160$vsbw,all$
$wpstyl,defa$wpoff,0.160$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,-0.16$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,0.110$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,-0.11$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,0.2$wpoff,,,0.078$vsbw,all$
$numcmp,all
!
画箍筋
$wpstyl,defa$wprota,,90$wpoff,,,0.04$vsbw,all
$wpoff,,,0.070$vsbw,all
$wpoff,,,0.015$vsbw,all
$wpoff,,,0.030$vsbw,all
$wpoff,,,0.045$vsbw,all
$wpoff,,,0.05$vsbw,all
$*do,i,1,12,1$wpoff,,,0.10$vsbw,all$*enddo
$wpstyl,defa$wprota,,-90$$wpoff,,,0.04$vsbw,all
$wpoff,,,0.070$vsbw,all
$wpoff,,,0.015$vsbw,all
$wpoff,,,0.030$vsbw,all
$wpoff,,,0.045$vsbw,all
$wpoff,,,0.05$vsbw,all
$*do,i,1,12,1$wpoff,,,0.10$vsbw,all$*enddo
$$wpstyl,defa$wprota,,,90$wpoff,,,0.075-0.008$vsbw,all
$wpoff,,,0.008$vsbw,all$wpstyl,defa$wprota,,,-90$wpoff,,,0.075-0.008$vsbw,all
$wpoff,,,0.008$vsbw,all
$wpstyl,defa$wpoff,,,0.003$vsbw,all
$wpstyl,defa$wpoff,,,0.078$vsbw,all
$wpstyl,defa$wprota,,,90$vsbw,all
$wpstyl,defa$wprota,,90$wpoff,,,0.125+0.06$vsbw,all
$wpstyl,defa$wprota,,-90$wpoff,,,0.125+0.06$vsbw,all
$numcmp,all
cm,gzg,volu
!
切分柱
cmsel,s,zhuzi,volu$
!
画纵筋
$wpstyl,defa$wpoff,0.2$wpoff,,,0.160$vsbw,all$
$wpstyl,defa$wpoff,0.160$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,-0.16$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,0.110$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,-0.11$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,,,0.078$vsbw,all$
$numcmp,all
!
画箍筋
$wpstyl,defa$wprota,,90$wpoff,,,0.04$vsbw,all
$wpoff,,,0.070$vsbw,all
$wpoff,,,0.015$vsbw,all
$wpoff,,,0.030$vsbw,all
$wpoff,,,0.045$vsbw,all
$wpoff,,,0.05$vsbw,all
$*do,i,1,12,1$wpoff,,,0.10$vsbw,all$*enddo
$wpstyl,defa$wprota,,-90$$wpoff,,,0.04$vsbw,all
$wpoff,,,0.070$vsbw,all
$wpoff,,,0.015$vsbw,all
$wpoff,,,0.030$vsbw,all
$wpoff,,,0.045$vsbw,all
$wpoff,,,0.05$vsbw,all
$*do,i,1,12,1$wpoff,,,0.10$vsbw,all$*enddo
$$wpstyl,defa$wprota,,,90$wpoff,,,0.075-0.008$vsbw,all
$wpoff,,,0.008$vsbw,all$wpstyl,defa$wprota,,,-90$wpoff,,,0.075-0.008$vsbw,all
$wpoff,,,0.008$vsbw,all
$wpstyl,defa$wpoff,,,0.003$vsbw,all
$wpstyl,defa$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,0.2-0.01$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,-0.2+0.01$wprota,,,90$vsbw,all
$wpstyl,defa$wpoff,0.2$wpoff,,,0.2-0.01$vsbw,all$
$wpstyl,defa$wprota,,90$wpoff,,,0.125+0.06$vsbw,all
$wpstyl,defa$wprota,,-90$wpoff,,,0.125+0.06$vsbw,all
$numcmp,all
cm,zhuzi,volu
赋钢筋单元属性并划分网格
elemsiz=50e-3
lsel,s,loc,x,-0.16$lsel,r,loc,z,0.078$cm,waizj1,line$latt,4,3,3,0$lesize,all,elemsiz
lsel,s,loc,x,-0.16$lsel,r,loc,z,0.16$cm,waizj2,line
$latt,4,3,3,0$lesize,all,elemsiz
lsel,s,loc,x,-0.11$lsel,r,loc,z,0.16$cm,waizj3,line
$latt,4,3,3,0$lesize,all,elemsiz
lsel,s,loc,x,0.16$lsel,r,loc,z,0.078$cm,ywaizj1,line$latt,4,3,3,0$lesize,all,elemsiz
lsel,s,loc,x,0.16$lsel,r,loc,z,0.16$cm,ywaizj2,line
$latt,4,3,3,0$lesize,all,elemsiz
lsel,s,loc,x,0.11$lsel,r,loc,z,0.16$cm,ywaizj3,line
$latt,4,3,3,0$lesize,all,elemsiz
$cmsel,s,waizj1,line$$cmsel,a,waizj2,line$$cmsel,a,waizj3,line$
$cmsel,a,ywaizj1,line$$cmsel,a,ywaizj2,line$$cmsel,a,ywaizj3,line$
$cm,zj,line
!
节点外域箍筋
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.295,0.295
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,1.5
$lsel,u,loc,y,-1.5
$lsel,r,loc,z,0,0.16
$lsel,r,loc,x,-0.16
$cm,sgj1,line$
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.295,0.295
$lsel,u,loc,y,1.5
$lsel,u,loc,y,-1.5
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,r,loc,z,0,0.16
$lsel,r,loc,x,0.16
$cm,sgj2,line$
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.295,0.295
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,1.5
$lsel,u,loc,y,-1.5
$lsel,r,loc,z,0.16
$cm,sgj3,line$
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.295,0.295
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,1.5
$lsel,u,loc,y,-1.5
$Lsel,r,loc,z,0.078
$cm,sgj4,line$
$cmsel,s,sgj1,line$$cmsel,a,sgj2,line$
cmsel,a,sgj3,line$$
cmsel,a,sgj4,line$cm,guj1,line$
!
节点区域箍筋
!
节点区域上下四肢箍箍筋
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,-0.095,0.095
$lsel,u,loc,y,0.251,1.5
$lsel,u,loc,y,-1.5,-0.251
$lsel,u,loc,y,0.125
$lsel,u,loc,y,-0.125
$Lsel,r,loc,z,0.16
$cm,ssgj1,line$
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,-0.095,0.095
$lsel,u,loc,y,0.251,1.5
$lsel,u,loc,y,-1.5,-0.251
$lsel,u,loc,y,0.125
$lsel,u,loc,y,-0.125
$Lsel,r,loc,z,0.078
$cm,ssgj2,line$
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.095,0.095
$lsel,u,loc,y,0.251,1.5
$lsel,u,loc,y,-1.5,-0.251
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,0.125
$lsel,u,loc,y,-0.125
$Lsel,r,loc,x,-0.16
$Lsel,r,loc,z,0,0.16
$cm,ssgj3,line$
lsel,s,tan1,y!
对称外定义箍筋
$lsel,u,loc,x,-2.25,-0.161
$lsel,u,loc,x,0.161,2.25
$lsel,u,loc,y,0.125-0.015
$lsel,u,loc,y,-0.125+0.015
$lsel,u,loc,y,-0.125-0.06
$lsel,u,loc,y,0.125+0.06
$lsel,u,loc,y,-0.095,0.095
$lsel,u,loc,y,0.251,1.5
$lsel,u,loc,y,-1.5,-0.251
$lsel,u,loc,y,0.125
$lsel,u,loc,y,-0.125
$Lsel,r,loc,x,0.16
$Lsel,r,loc,z,0,0.16
$cm,ssgj4,line$
$cmsel,s,ssgj1,line$$cmsel,a,ssgj2,line$
cmsel,a,ssgj3,line$cmsel,a,ssgj4,line$$cm,guj3,line$
$cmsel,s,guj1,line$$cmsel,a,guj3,line$$cm,guj,line$latt,5,4,3,0$lesize,all,elemsiz
$cmsel,s,guj,line$cmsel,a,zj,line$cm,gj,line
Cmsel,s,gzg,volu$VSEL,r,LOC,Y,-0.125+0.015,0.125-0.015
$VSEL,r,LOC,z,0,0.003
$cm,fb,VOLU
Cmsel,s,gzg,volu$VSEL,u,LOC,Y,-0.125,0.125$cm,GZhu,VOLU
Cmsel,s,gzg,volu$$cmSEL,U,fb,VOLU$VSEL,r,LOC,Y,-0.125+0.015,0.125-0.015$cm,mianban,VOLU
Cmsel,s,gzg,volu$$cmSEL,U,fb,VOLU$$cmSEL,U,gzhu,VOLU$$cmSEL,U,mianban,VOLU$$cm,yy,VOLU
Mesh钢筋
cmsel,s,gj,line$lmesh,all$lsel,all
$/eshape,1$eplot!
钢筋划分完毕
mesh钢筋混凝土柱
Cmsel,s,zhuzi,volu$esize,50e-3$vatt,2,1,2,0
$MSHAPE,0,3D$MSHKEY,1$VMESH,all
allsel,all
Mesh翼缘
Cmsel,s,yy,volu$
$LSEL,s,length,,1.8
LESIZE,all,,,12
vatt,1,1,1,0$esize,50e-3$$MSHAPE,0,3D$MSHKEY,1
$VMESH,all$allsel,all
Meshfb
Cmsel,s,fb,volu$
vatt,1,1,1,0$esize,50e-3$$MSHAPE,0,3D$MSHKEY,1
$VMESH,all$allsel,all
Meshmianbangzhu
Cmsel,s,mianban,volu$Cmsel,a,gzhu,volu$
vatt,3,5,1,0$esize,50e-3$$MSHAPE,0,3D$MSHKEY,1
$VMESH,all$allsel,all
$nummrg,node$numcmp,all
!
定义远距离加载点
$ET,4,TARGE170
ET,5,CONTA174
R,6
keyopt,4,2,1$keyopt,5,2,2$keyopt,5,4,2$keyopt,5,12,5
asel,s,loc,x,2$nsla,s,1$real,6$type,5$esurf
nmax=ndinqr（0,14）+1$n,nmax,2,,
type,4$tshap,pilo$e,nmax
R,7
keyopt,4,2,1$keyopt,5,2,2$keyopt,5,4,2$keyopt,5,12,5
asel,s,loc,x,-2$nsla,s,1$real,7$type,5$esurf
nmax=ndinqr（0,14）+1$n,nmax,-2,,
type,4$tshap,pilo$e,nmax
R,8
keyopt,4,2,1$keyopt,5,2,2$keyopt,5,4,2$keyopt,5,12,5
asel,s,loc,y,1.5$nsla,s,1$real,8$type,5$esurf
升级会员 