连续钢构桥三维仿真分析

htys

为什么总是要收费

butterfly99

虽然有人说是老帖子了，但我还是愿意买下。
楼主把这拿出来卖，自然有他的想法，尊重

googlevs

有没有人看过觉得怎么样，做的细不细？

弘祖

小豆包

楼主给力 ，再接再厉

埋在樱花树下

fini
/clear
/prep7
/title,BRIDGE DAM SIMULATION,DEVELOPED BY YIFEICHONGTIAN
     
ET,1,SOLID65
ET,2,LINK8
MP,PRXY,1,0.1667
MP,DENS,1,2600
MP,EX,1,3.5E10
MP,EX,2,1.95E11
MP,DENS,2,7800
MP,PRXY,2,0.3
!预应力钢筋的特性
!纵向钢筋,直径15.24mm,标准强度1860MPA，单根张拉控制吨位195.5kN
areagjx=1.81e-4 !纵向，横向单根钢筋面积
areahgjx=8.038e-4 !竖向单根钢筋面积
*dim,gjarea,array,3
gjarea(1)=16*areagjx
gjarea(2)=3*areagjx
gjarea(3)=areahgjx
*dim,F,array,3
F(1)=195.5e3
F(2)=586e3
F(3)=480e3
E=1.95E11
L=0.5
*dim,delt,array,3
delt(1)=F(1)*L/(E*areagjx)
delt(2)=F(2)*L/(E*gjarea(2))
delt(3)=F(3)*L/(E*gjarea(3))
*dim,istrn,array,3
istrn(1)=delt(1)/(delt(1)+L)
istrn(2)=delt(2)/(delt(2)+L)
istrn(3)=delt(3)/(delt(3)+L)
r,2,gjarea(1),istrn(1)
r,3,gjarea(2),istrn(2)
r,4,gjarea(3),istrn(3)

V_NUM=46
DUN_NUM=2
*DIM,DUN_BEGIN,ARRAY,DUN_NUM
*DIM,DUN_END,ARRAY,DUN_NUM
DUN_BEGIN(1)=9,33,
DUN_END(1)=13,37,

!箱梁截面的几何参数
*DIM,B1,ARRAY,V_NUM+1
*DIM,B2,ARRAY,V_NUM+1
*DIM,B3,ARRAY,V_NUM+1
*DIM,B4,ARRAY,V_NUM+1
*DIM,H1,ARRAY,V_NUM+1
*DIM,H2,ARRAY,V_NUM+1
*DIM,H3,ARRAY,V_NUM+1
*DIM,H4,ARRAY,V_NUM+1
*DIM,H5,ARRAY,V_NUM+1
*DIM,H6,ARRAY,V_NUM+1
*DIM,Z0,ARRAY,V_NUM+1

*DO,I,1,47,1
    B1(I)=3
    B3(I)=1.3
    H1(I)=0.2
    H2(I)=0.37
    H4(I)=0.32
    H5(I)=0.35
*ENDDO

B4(1)=2.21,2.21,2.188,2.167,2.145,2.123,2.101,2.08,2.063,2.047,
B4(11)=2.02,2.02,2.02,2.047,2.063,2.08,2.101,2.123,2.145,2.167,
B4(21)=2.188,2.21,2.21,2.21,2.21,2.21,2.188,2.167,2.145,2.123,
B4(31)=2.101,2.08,2.063,2.047,2.02,2.02,2.02,2.047,2.063,2.08,
B4(41)=2.101,2.123,2.145,2.167,2.188,2.21,2.21,

B2(1)=0.36,0.36,0.382,0.403,0.425,0.447,0.469,0.49,0.507,0.523,
B2(11)=0.55,0.55,0.55,0.523,0.507,0.49,0.469,0.447,0.425,0.403,
B2(21)=0.382,0.36,0.36,0.36,0.36,0.36,0.382,0.403,0.425,0.447,
B2(31)=0.469,0.49,0.507,0.523,0.55,0.55,0.55,0.523,0.507,0.49,
B2(41)=0.469,0.447,0.425,0.403,0.382,0.36,0.36,

H3(1)=1.467,1.467,1.499,1.592,1.748,1.967,2.249,2.593,2.893,3.228,
H3(11)=3.867,3.867,3.867,3.228,2.893,2.593,2.249,1.967,1.748,1.592,
H3(21)=1.499,1.467,1.467,1.467,1.467,1.467,1.499,1.592,1.748,1.967,
H3(31)=2.249,2.593,2.893,3.228,3.867,3.867,3.867,3.228,2.893,2.593,
H3(41)=2.249,1.967,1.748,1.592,1.499,1.467,1.467,

H6(1)=0.26,0.26,0.264,0.276,0.296,0.324,0.36,0.405,0.444,0.487,
H6(11)=0.57,0.57,0.57,0.487,0.444,0.405,0.36,0.324,0.296,0.276,
H6(21)=0.264,0.26,0.26,0.26,0.26,0.26,0.264,0.276,0.296,0.324,
H6(31)=0.36,0.405,0.444,0.487,0.57,0.57,0.57,0.487,0.444,0.405,
H6(41)=0.36,0.324,0.296,0.276,0.264,0.26,0.26,

!每个箱梁截面中顶点Z的坐标
Z0(1)=0,3,7,11,15,19,23,27,30,33,
Z0(11)=38,39,40,45,48,51,55,59,63,67,
Z0(21)=71,75,78,79,80,83,87,91,95,99,
Z0(31)=103,107,110,113,118,119,120,125,128,131,
Z0(41)=135,139,143,147,151,155,158,

!每个箱梁截面中顶点X,Y的坐标
X0=0
Y0=4.537
K_NUM=24

!************************************************
*DO,J,0,V_NUM,1
    !形成点
    K,1+J*K_NUM,XO-(B1(J+1)+B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1),Z0(J+1)
    K,2+J*K_NUM,XO-(B1(J+1)+B2(J+1)+B3(J+1)+B4(J+1)),Y0,Z0(J+1)
    K,3+J*K_NUM,XO-(B2(J+1)+B3(J+1)+B4(J+1)),Y0,Z0(J+1)
    K,4+J*K_NUM,XO-(B3(J+1)+B4(J+1)),Y0,Z0(J+1)
    K,5+J*K_NUM,XO-B4(J+1),Y0,Z0(J+1)
    K,6+J*K_NUM,XO+B4(J+1),Y0,Z0(J+1)
    K,7+J*K_NUM,XO+(B3(J+1)+B4(J+1)),Y0,Z0(J+1)
    K,8+J*K_NUM,XO+(B2(J+1)+B3(J+1)+B4(J+1)),Y0,Z0(J+1)
    K,9+J*K_NUM,XO+(B1(J+1)+B2(J+1)+B3(J+1)+B4(J+1)),Y0,Z0(J+1)
    K,10+J*K_NUM,XO+(B1(J+1)+B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1),Z0(J+1)
    K,11+J*K_NUM,XO+(B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1),Z0(J+1)
    K,12+J*K_NUM,XO+(B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1)+H6(J+1),Z0(J+1)
    K,13+J*K_NUM,XO+(B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1),Z0(J+1)
    K,14+J*K_NUM,XO+(B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1),Z0(J+1)
    K,15+J*K_NUM,XO-(B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1),Z0(J+1)
    K,16+J*K_NUM,XO-(B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1),Z0(J+1)
    K,17+J*K_NUM,XO-(B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1)+H6(J+1),Z0(J+1)
    K,18+J*K_NUM,XO-(B2(J+1)+B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1),Z0(J+1)
    K,19+J*K_NUM,XO-(B3(J+1)+B4(J+1)),Y0-H4(J+1)-H5(J+1),Z0(J+1)
    K,20+J*K_NUM,XO-B4(J+1),Y0-H4(J+1),Z0(J+1)
    K,21+J*K_NUM,XO+B4(J+1),Y0-H4(J+1),Z0(J+1)
    K,22+J*K_NUM,XO+(B3(J+1)+B4(J+1)),Y0-H4(J+1)-H5(J+1),Z0(J+1)
    K,23+J*K_NUM,XO+(B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1)+H6(J+1),Z0(J+1)
    K,24+J*K_NUM,XO-(B3(J+1)+B4(J+1)),Y0-H1(J+1)-H2(J+1)-H3(J+1)+H6(J+1),Z0(J+1)

    !形成线
    L_NUM=36
    L,1+J*K_NUM,2+J*K_NUM,2
    L,2+J*K_NUM,3+J*K_NUM,4
    L,3+J*K_NUM,4+J*K_NUM,2
    L,4+J*K_NUM,5+J*K_NUM,2
    L,5+J*K_NUM,6+J*K_NUM,4
    L,6+J*K_NUM,7+J*K_NUM,2
    L,7+J*K_NUM,8+J*K_NUM,2
    L,8+J*K_NUM,9+J*K_NUM,4
    L,9+J*K_NUM,10+J*K_NUM,2
    L,10+J*K_NUM,11+J*K_NUM,4
    L,11+J*K_NUM,12+J*K_NUM,5
    L,12+J*K_NUM,13+J*K_NUM,2
    L,13+J*K_NUM,14+J*K_NUM,2
    L,14+J*K_NUM,15+J*K_NUM,5
    L,15+J*K_NUM,16+J*K_NUM,2
    L,16+J*K_NUM,17+J*K_NUM,2
    L,17+J*K_NUM,18+J*K_NUM,5
    L,18+J*K_NUM,19+J*K_NUM,2
    L,19+J*K_NUM,20+J*K_NUM,2
    L,20+J*K_NUM,21+J*K_NUM,4
    L,21+J*K_NUM,22+J*K_NUM,2
    L,22+J*K_NUM,23+J*K_NUM,5
    L,23+J*K_NUM,24+J*K_NUM,5
    L,24+J*K_NUM,19+J*K_NUM,5
    L,18+J*K_NUM,1+J*K_NUM,4
   *DO,I,26,30,1
         L,I-23+J*K_NUM,I-8+J*K_NUM,2
   *ENDDO
   L,11+J*K_NUM,8+J*K_NUM,2
   L,23+J*K_NUM,12+J*K_NUM,2
   L,23+J*K_NUM,14+J*K_NUM,2
   L,24+J*K_NUM,15+J*K_NUM,2
   L,24+J*K_NUM,17+J*K_NUM,2
   L,11+J*K_NUM,22+J*K_NUM,2
*ENDDO

!建立A_LINE线集合，
CM,A_LINE,LINE

!截面上体的个数
VV_NUM=12

!形成体
*DO,K,0,V_NUM-1,1
   V,1+K*K_NUM,2+K*K_NUM,3+K*K_NUM,18+K*K_NUM,1+(K+1)*K_NUM,2+(K+1)*K_NUM,3+(K+1)*K_NUM,18+(K+1)*K_NUM
   V,3+K*K_NUM,4+K*K_NUM,19+K*K_NUM,18+K*K_NUM,3+(K+1)*K_NUM,4+(K+1)*K_NUM,19+(K+1)*K_NUM,18+(K+1)*K_NUM
   V,4+K*K_NUM,5+K*K_NUM,20+K*K_NUM,19+K*K_NUM,4+(K+1)*K_NUM,5+(K+1)*K_NUM,20+(K+1)*K_NUM,19+(K+1)*K_NUM
   V,5+K*K_NUM,6+K*K_NUM,21+K*K_NUM,20+K*K_NUM,5+(K+1)*K_NUM,6+(K+1)*K_NUM,21+(K+1)*K_NUM,20+(K+1)*K_NUM
   V,6+K*K_NUM,7+K*K_NUM,22+K*K_NUM,21+K*K_NUM,6+(K+1)*K_NUM,7+(K+1)*K_NUM,22+(K+1)*K_NUM,21+(K+1)*K_NUM
   V,7+K*K_NUM,8+K*K_NUM,11+K*K_NUM,22+K*K_NUM,7+(K+1)*K_NUM,8+(K+1)*K_NUM,11+(K+1)*K_NUM,22+(K+1)*K_NUM
   V,8+K*K_NUM,9+K*K_NUM,10+K*K_NUM,11+K*K_NUM,8+(K+1)*K_NUM,9+(K+1)*K_NUM,10+(K+1)*K_NUM,11+(K+1)*K_NUM
   V,11+K*K_NUM,12+K*K_NUM,23+K*K_NUM,22+K*K_NUM,11+(K+1)*K_NUM,12+(K+1)*K_NUM,23+(K+1)*K_NUM,22+(K+1)*K_NUM
   V,23+K*K_NUM,12+K*K_NUM,13+K*K_NUM,14+K*K_NUM,23+(K+1)*K_NUM,12+(K+1)*K_NUM,13+(K+1)*K_NUM,14+(K+1)*K_NUM
   V,23+K*K_NUM,14+K*K_NUM,15+K*K_NUM,24+K*K_NUM,23+(K+1)*K_NUM,14+(K+1)*K_NUM,15+(K+1)*K_NUM,24+(K+1)*K_NUM
   V,15+K*K_NUM,16+K*K_NUM,17+K*K_NUM,24+K*K_NUM,15+(K+1)*K_NUM,16+(K+1)*K_NUM,17+(K+1)*K_NUM,24+(K+1)*K_NUM
   V,17+K*K_NUM,18+K*K_NUM,19+K*K_NUM,24+K*K_NUM,17+(K+1)*K_NUM,18+(K+1)*K_NUM,19+(K+1)*K_NUM,24+(K+1)*K_NUM
*ENDDO

CMSEL,U,A_LINE
LSEL,ALL
LESIZE,ALL,,,6
ALLSEL
VATT,1,1,1

*DO,I,1,V_NUM*VV_NUM,1
   VSWEEP,I
*ENDDO

!定义预应力筋****************************************************
*GET,LMAX,LINE,,NUM,MAX
*DO,I,0,V_NUM,1
   LSEL,NONE
   L,4+K_NUM*I,15+K_NUM*I,1
   !连接生成竖向预应力筋
   L,7+K_NUM*I,14+K_NUM*I,1
   LATT,2,4,2
   LESIZE,ALL,,,1
   LMESH,ALL
   LSEL,NONE
   L,1+K_NUM*I,10+K_NUM*I,1
   !连接生成横向预应力筋
   LATT,2,4,2
   LESIZE,ALL,,,1
   LMESH,ALL
   LSEL,NONE
*ENDDO

!按施工进度方案定义每一阶段的纵向预应力钢索，竖向，横向预应力钢筋集合
!每8天浇注一段混凝土箱梁，拉伸纵向预应力钢索一次
ALLSEL
*DO,BADAY,0,9,1
   LSEL,NONE
   ESEL,NONE
   *DO,I,1,2,1
   L,18+(DUN_BEGIN(I)-BADAY)*K_NUM,18+(DUN_END(I)+BADAY)*K_NUM,
   L,11+(DUN_BEGIN(I)-BADAY)*K_NUM,11+(DUN_END(I)+BADAY)*K_NUM,
   *ENDDO
   LATT,2,2,2
   LESIZE,ALL,,,1
   LMESH,ALL,
   *DO,I,1,2
   LSEL,A,,,LMAX+3*(DUN_BEGIN(I)-BADAY)-2,LMAX+3*(DUN_BEGIN(I)-BADAY+1),1
   LSEL,A,,,LMAX+3*(DUN_END(I)+BADAY)-2,LMAX+3*(DUN_END(I)+BADAY+1),1
   *ENDDO
   ESLL,A
   CM,Z_REBAR%BADAY%,ELEM
*ENDDO

ALLSEL
NUMMRG,NODE
SAVE,,,,MODEL

ppoiupp

这个怎么样啊

jlm8521

每次下下来都打不开，这次都不敢下了啊

hhgbhh

楼主发的不错，顶一下，哈哈

xujian2361

回复个~~

baoer2008

不错啊，楼主的例子，看了下

batey340

dddddddddddddddddddddd

刘英玉2088

骗人的，楼主，下的就是一张图片

jg2902

楼主不地道

hhgbhh

照顶不误

wxy30003000

可以免费的让我们使用不 楼主

hxz808

啊hi哦啊合肥大黄蜂

冯海源

先下下来看看再说

yx1984_2008

付费了，怎么下不了啊

wodewowo

多谢分享