发布于:2011-03-23 15:36:23
来自:建筑结构 / ANSYS
[复制转发]
/FILNAME,join,1
/PREP7
/TITLE,joint
ET,1,SOLID65
ET,2,LINK8
ET,3,LINK8
ET,4,SOLID45
FC=18.9
MP,EX,1,17955
MP,PRXY,1,0.2
MP,DENS,1,2.5E3
MP,EX,2,3.04E5
MP,PRXY,2,0.3
MP,DENS,2,7.8E3
MP,EX,3,2.1E5
MP,PRXY,3,0.3
MP,DENS,3,7800
MP,EX,4,1E5
MP,PRXY,4,0.2
MP,DENS,4,0
TB,MISO,1,,11,
TBPT,,0.0004,1.2E+007
TBPT,,0.0008,2.133E+007
TBPT,,0.0012,2.8E+007
TBPT,,0.0016,3.2E+007
TBPT,,0.002,3.333E+007
TBPT,,0.0024,3.222E+007
TBPT,,0.0026,3.111E+007
TBPT,,0.003,3E+007
TBPT,,0.0036,2.889E+007
TBPT,,0.004,2.833E+007
TBPLOT,MISO,1
TB,BKIN,2,,,,
TBMODIF,2,1,456
TBMODIF,3,1,2.1e3
TBPLOT,BKIN,2
TB,BKIN,3,,,,
TBMODIF,2,1,334
TBMODIF,3,1,2.1e3
TBPLOT,BKIN3
PI=ACOS(-1)
建立模型
R,1,0.25*PI*14*14
定义
real
R,2,0.25*PI*12*12
R,3,0.25*PI*8*8
/PREP7
BLOCK,550,750,0,700,0,25
BLOCK,550,750,0,700,25,175
BLOCK,550,750,0,700,175,200
BLOCK,550,750,700,1150,0,25
BLOCK,550,750,700,1150,25,175
BLOCK,550,750,700,1150,175,200
WPOFF,,50
切分平面
WPROT,,-90
VSBW,ALL
*DO,I,1,5
WPOFF,,,80
VSBW,ALL
*ENDDO
*DO,I,1,5
把中间去掉(梁的切分体)
WPOFF,,,50
VSBW,ALL
*ENDDO
VSBW,ALL
*DO,I,1,5
WPOFF,,,80
VSBW,ALL
*ENDDO
WPCSYS,-1
切分出柱纵筋的位置
WPOFF,,,30
VSBW,ALL
WPOFF,,,14
VSBW,ALL
WPOFF,,,112
VSBW,ALL
WPOFF,,,14
VSBW,ALL
WPROT,,,90
WPOFF,,,580
VSBW,ALL
WPOFF,,,14
VSBW,ALL
WPOFF,,,112
VSBW,ALL
WPOFF,,,14
VSBW,ALL
WPCSYS,-1 !
用坐标平面切割梁体
BLOCK,0,550,450,700,25,175
BLOCK,750,1300,450,700,25,175
WPOFF,,,55
切分出梁纵筋的位置
VSBW, ALL
WPOFF,,,12
VSBW, ALL
WPOFF,,,66
VSBW, ALL
WPOFF,,,12
VSBW,ALL
WPOFF,,450
WPROT,,90
WPOFF,,,-30
VSBW, ALL
WPOFF,,,-12
VSBW, ALL
WPOFF,,,-166
VSBW,ALL
WPOFF,,,-12
VSBW, ALL
WPCSYS,-1
wprot,,,90
WPOFF,,,70 Z
轴移动
*DO,I,1,6
VSBW,ALL
WPOFF,,,80
*ENDDO
WPOFF,,,200
*DO,I,1,7
VSBW,ALL
WPOFF,,,80
*ENDDO
nummrg,all
numcmp,all !
整理和合并各种编号
WPCSYS,-1
柱钢筋及划分单元
ELEMSIZ=50
LSEL,S,LOC,Z,44
LSEL,R,LOC,X,594
LSEL,R,LOC,Y,0,1150
CM,ZJ1,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
lsel,s,loc,z,44
lsel,r,loc,x,706
lsel,r,loc,y,0,1150
CM,ZJ2,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
lsel,s,loc,z,156
lsel,r,loc,x,594
lsel,r,loc,y,0,1150
CM,ZJ3,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
lsel,s,loc,z,156
lsel,r,loc,x,706
lsel,r,loc,y,0,1150
CM,ZJ4,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
ALLSEL,ALL
LSEL,S,TAN1,Y
LSEL,R,LOC,X,580,720
LSEL,R,LOC,Z,30,170
LSEL,U,LOC,Y,0
LSEL,U,LOC,Y,1150
LSEL,U,LOC,X,594
LSEL,U,LOC,X,706
LSEL,U,LOC,Z,44
LSEL,U,LOC,Z,156
CM,GJ-1,LINE
LATT,,3,3
LESIZE,ALL,ELEMSIZ
显示箍筋图形
WPCSYS,-1
梁钢筋划分
ELEMSIZ=50
LSEL,S,LOC,Z,67
LSEL,R,LOC,y,492
LSEL,R,LOC,x,0,1300
CM,XJ1,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
lsel,s,loc,z,133
lsel,r,loc,y,492
lsel,r,loc,x,0,1300
CM,XJ2,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
lsel,s,loc,z,133
lsel,r,loc,y,658
lsel,r,loc,x,0,1300
CM,XJ3,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
lsel,s,loc,z,67
lsel,r,loc,y,658
lsel,r,loc,x,0,1300
CM,XJ4,LINE
latt,,1,2
LESIZE,ALL,ELEMSIZ
ALLSEL,ALL
LSEL,S,TAN1,x
LSEL,R,LOC,z,55,145
LSEL,R,LOC,y,480,670
LSEL,U,LOC,x,0
LSEL,U,LOC,x,1300
LSEL,U,LOC,z,67
LSEL,U,LOC,z,133
LSEL,U,LOC,y,492
LSEL,U,LOC,y,658
CM,GJ-2,LINE
LATT,,3,3
LESIZE,ALL,ELEMSIZ
CMSEL,S,ZJ1
CMSEL,A,ZJ2
CMSEL,A,ZJ3
CMSEL,A,ZJ4
CMSEL,A,GJ-1
CMSEL,S,XJ1
CMSEL,A,XJ2
CMSEL,A,XJ3
CMSEL,A,XJ4
CMSEL,A,GJ-2
LMESH,ALL
LSEL,ALL
/ESHAPE,1
EPLOT
全部回复(11 )
只看楼主 我来说两句回复 举报
回复 举报