1、!連續梁橋/prep7 et,1,4 !定義梁單元et,2,21 !定義mass21單元!定義粱材料 !泊松比 !密度mp,ex,2,3.45e10 !直線段梁材料 和1M段梁材料 mp,nuxy,2,0.2 mp,dens,2,3302.153125mp,ex,3,3.45e10 mp,nuxy,3,0.2 mp,dens,3,3301.658695mp,ex,4,3.45e10 mp,nuxy,4,0.2 mp,dens,4,3299.906778 mp,ex,5,3.45e10 mp,nuxy,5,0.2 mp,dens,5,3298.327219mp,ex,6,3.45e10 mp,n

2、uxy,6,0.2 mp,dens,6,3292.351605mp,ex,7,3.45e10 mp,nuxy,7,0.2 mp,dens,7,3284.137255mp,ex,8,3.45e10 mp,nuxy,8,0.2 mp,dens,8,3271.802136mp,ex,9,3.45e10 mp,nuxy,9,0.2 mp,dens,9,3260.41903mp,ex,10,3.45e10 mp,nuxy,10,0.2 mp,dens,10,3248.193657mp,ex,11,3.45e10 mp,nuxy,11,0.2 mp,dens,11,3235.117644mp,ex,12,

3、3.45e10 mp,nuxy,12,0.2 mp,dens,12,3221.585664mp,ex,13,3.45e10 mp,nuxy,13,0.2 mp,dens,13,3208.826871mp,ex,14,3.45e10 mp,nuxy,14,0.2 mp,dens,14,3194.279207mp,ex,15,3.45e10 mp,nuxy,15,0.2 mp,dens,15,3179.924673mp,ex,16,3.45e10 mp,nuxy,16,0.2 mp,dens,16,3166.445716mp,ex,17,3.45e10 mp,nuxy,17,0.2 mp,dens

4、,17,3152.555731mp,ex,18,3.45e10 mp,nuxy,18,0.2 mp,dens,18,3138.312105mp,ex,19,3.45e10 mp,nuxy,19,0.2 mp,dens,19,3124.795334mp,ex,20,3.45e10 mp,nuxy,20,0.2 mp,dens,20,3110.7135mp,ex,21,3.45e10 mp,nuxy,21,0.2 mp,dens,21,3097.080875mp,ex,22,3.45e10 mp,nuxy,22,0.2 mp,dens,22,3083.186268mp,ex,23,3.45e10

5、mp,nuxy,23,0.2 mp,dens,23,3068.968824mp,ex,24,3.45e10 mp,nuxy,24,0.2 mp,dens,24,3055.612436mp,ex,25,3.45e10 mp,nuxy,25,0.2 mp,dens,25,3045.857147mp,ex,26,3.45e10 mp,nuxy,26,0.2 mp,dens,26,3035.174287mp,ex,27,3.45e10 mp,nuxy,27,0.2 mp,dens,27,3026.696551mp,ex,28,3.45e10 mp,nuxy,28,0.2 mp,dens,28,3015

6、.795365mp,ex,29,3.45e10 mp,nuxy,29,0.2 mp,dens,29,3007.710181mp,ex,30,3.45e10 mp,nuxy,30,0.2 mp,dens,30,3000.513837mp,ex,31,3.45e10 mp,nuxy,31,0.2 mp,dens,31,2978.611375mp,ex,32,3.45e10 mp,nuxy,32,0.2 mp,dens,32,2958.618861mp,ex,33,3.45e10 mp,nuxy,33,0.2 mp,dens,33,2937.888072mp,ex,34,3.45e10 mp,nux

7、y,34,0.2 mp,dens,34,2919.475751mp,ex,35,3.45e10 mp,nuxy,35,0.2 mp,dens,35,2903.359983 !6700處mp,ex,36,3.45e10 mp,nuxy,36,0.2 mp,dens,36,3302.153125 !可以不用mp,ex,37,3.45e10 mp,nuxy,37,0.2 mp,dens,37,3302.153125mp,ex,38,3.45e10 !-700處梁mp,nuxy,38,0.2 mp,dens,38,3180.578901mp,ex,39,3.45e10 !邊支點橫隔板mp,nuxy,3

8、9,0.2 mp,dens,39,2868.674818mp,ex,40,3.45e10 !合攏段橫隔板mp,nuxy,40,0.2 mp,dens,40,2868.674818mp,ex,41,3.45e10 !中支點橫隔板mp,nuxy,41,0.2 mp,dens,41,2757.470588mp,ex,1,3.25e10 !定義墩材料屬性mp,nuxy,1,0.2mp,dens,1,2650!定義實常數 編號 ，面積，IYY，IZZ，寬，高，RMORE，抗扭慣距!主梁截面r,1,11.851,28.52,215.151,16.95,4, !直線段rmore,56.8972r,2,11.

9、862,28.57,215.458,16.95,4.001, !截面100處rmore,56.905r,3,11.871,28.91,215.622,16.95,4.009,rmore,57.345r,4,11.903,29.03,215.78,16.95,4.025,rmore,57.938r,5,11.932,29.626,215.88,16.95,4.049,rmore,58.502r,6,12.043,30.402,217.093,16.95,4.081,rmore,59.768r,7,12.199,31.407,218.899,16.95,4.121,rmore,61.445r,8,

10、12.441,32.716,221.806,16.95,4.169,rmore,63.652r,9,12.673,34.21,224.418,16.95,4.226,rmore,66.058r,10,12.932,35.94,227.279,16.95,4.290,rmore,68.801r,11,13.221,37.941,230.512,16.95,4.362,rmore,71.948r,12,13.534,40.233,233.872,16.95,4.442,rmore,75.432r,13,13.843,42.747,237.133,16.95,4.530,rmore,79.173r,

11、14,14.213,45.688,241.054,16.95,4.627,rmore,83.484r,15,14.598,48.964,245.004,16.95,4.731,rmore,88.155r,16,14.979,52.547,248.817,16.95,4.843,rmore,93.111r,17,15.393,56.562,252.927,16.95,4.963,rmore,98.528r,18,15.842,61.069,257.347,16.95,5.092,rmore,104.47r,19,16.293,65.992,261.673,16.95,5.228,rmore,11

12、0.742r,20,16.791,71.484,266.426,16.95,5.372,rmore,117.648r,21,17.303,77.568,271.225,16.95,5.525,rmore,124.861r,22,17.858,84.282,276.363,16.95,5.685,rmore,132.631r,23,18.464,91.768,281.923,16.95,5.854,rmore,141.068r,24,19.072,99.936,287.364,16.95,6.03,rmore,149.875r,25,19.524,108.482,291.159,16.95,6.

13、214,rmore,158.46r,26,20.084,118.046,295.597,16.95,6.407,rmore,167.857r,27,20.536,128.202,298.9,16.95,6.607,rmore,177.137r,28,21.148,139.669,303.86,16.95,6.816,rmore,187.495r,29,21.626,151.737,307.186,16.95,7.032,rmore,197.507r,30,22.07,164.734,310.057,16.95,7.257,rmore,207.681r,31,23.541,182.225,323

14、.433,16.95,7.490,rmore,223.527r,32,25.066,201.932,336.467,16.95,7.730,rmore,241.046r,33,26.871,223.700,351.448,16.95,7.979,rmore,257.765r,34,28.707,247.928,365.663,16.95,8.235,rmore,275.922r,35,30.533,274.36,378.934,16.95,8.500,rmore,294.461r,46,14.58,35.599,238.702,16.95,4,rmore,238.702!橫隔板截面!邊支點r,

15、36,35.376,54.393,339.84,16.95,4.00,rmore,128.747!合攏段r,37,35.376,53.405,339.84,16.95,4.00,rmore,127.015 !中支點r,38,71.981,454.871,543.871,16.95,8.5,rmore,684.565!主墩截面!截面1（實心）r,39,39.932,82.876,212.138,8,5,rmore,203.709!截面（1/2空心）r,40,23.863,72.571,168.024,8,5,rmore,168.491!截面3(空心）r,41,14.236,52.366,114.

16、529,8,5,rmore,116.391!邊墩截面!截面1（實心1）r,42,36.113,66.217,177.703,7.7,4.7,rmore,165.119!截面2（空心1/2）r,43,20.753,35.743,99.711,7,4,rmore,88.486!截面3（空心）r,44,9.103,16.082,45.911,6.5,3.5,rmore,39.39!截面4（實心2）r,45,22.673,23.005,79.361,6.5,3.5,rmore,61.527!截面5（1/2）空心2r,49,16,21.958,68.708,6.5,3.5,rmore,55.682!建立

17、第一跨梁節點xl=atan(1.029/80)n,1,0,n,2,2.25,2.25*xln,3,6,6*xln,4,9,9*xln,5,11,11*xln,6,13,13*xl-0.0045n,7,15,15*xl-0.0135n,8,17,17*xl-0.023n,9,19,19*xl-0.038n,10,21,21*xl-0.062n,11,23,23*xl-0.092n,12,25,25*xl-0.1275n,13,27,27*xl-0.167n,14,29,29*xl-0.2115n,15,31,31*xl-0.261n,16,33,33*xl-0.314n,17,35,35*xl-

18、0.3715n,18,37,37*xl-0.435n,19,39,39*xl-0.502n,20,41,41*xl-0.5725n,21,43,43*xl-0.648n,22,45,45*xl-0.728n,23,47,47*xl-0.8115n,24,49,49*xl-0.8995n,25,51,51*xl-0.9925n,26,53,53*xl-1.0895n,27,55,55*xl-1.1905n,28,57,57*xl-1.325n,29,59,59*xl-1.433n,30,61,61*xl-1.5155n,31,63,63*xl-1.6325n,32,65,65*xl-1.7535

19、n,33,67,67*xl-1.879n,34,69,69*xl-2.007n,35,71,71*xl-2.1325n,36,73,73*xl-2.2635n,37,75,75*xl-2.399n,38,77,77*xl-2.533n,39,79,79*xl-2.631xl2=atan(0.7/140)local,11,0,80,80*xl-2.631,0,xl2nsym,x,35,5,39,1 !復制粱結點從5到39結點編號增加35csys,0n,75,149.6,0.15852local,12,0,150,0.15852,0,xl2nsym,x,36,40,75,1local,13,0,2

20、20,-1.6027,0nsym,x,111,1,111,1csys,0n,500,80,80*xl-2.631n,501,220,-1.6027n,502,360,-1.6148csys,0 !返回普通坐標!建立墩結點!PM112邊墩截面n,300,0,-2.165 !(實心）2米長n,301,0,-4.365 n,302,0,-9.365 !（1/2空心）5M長n,303,0,-13.365 n,304,0,-17.365 n,305,0,-21.365 n,306,0,-24.93n,307,0,-28.93n,308,0,-30.63!PM113主敦截面n,309,80,0.5-6.6

21、65-0.8 n,310,80,0.5-3.5-6.665 !(實心)3.5mn,311,80,0.5-8.5-6.665 !(1/2空心）5mn,312,80,0.5-12.5-6.665 !(空心）4Mn,313,80,0.5-16.5-6.665 !n,316,80,0.5-24.594-6.665+0.4!(實心）2m!pm114主墩截面n,350,220,0.5-6.665-0.8 !n,351,220,0.5-3.5-6.665 !(1/2空心)5mn,352,220,0.5-8.5-6.665 !(空心）5m n,353,220,0.5-12.5-6.665 !(空心）6.064

22、Mn,354,220,0.5-16.5-6.665 !(1/2空心）4Mn,355,220,0.5-19.294-6.665 !(實心）2Mn,357,220,0.5-25.294-6.665+0.4local,13,0,220,-1.6027,0nsym,x,17,300,316,1csys,0 !生成邊跨1mat,39real,36e,1,2mat,38real,46e,2,3mat,2real,1e,3,4e,4,5mat,2real,2e,5,6*do,i,3,35,1mat,ireal,ie,3+i,4+i*enddo*do,i,3,35,1mat,ireal,ie,38+i,39+

23、i*enddo*do,i,3,35,1mat,ireal,ie,74+i,75+i*enddo*do,i,3,35,1mat,ireal,ie,114+i,115+i*enddo*do,i,3,35,1mat,ireal,ie,149+i,150+i*enddo*do,i,3,35,1mat,ireal,ie,185+i,186+i*enddomat,41real,38e,39,500mat,41real,38e,500,74mat,2real,2e,41,40mat,2real,1e,40,75mat,40real,37e,75,111mat,2real,1e,111,76mat,2real

24、,2e,76,77mat,41real,38e,110,501mat,41real,38e,501,221mat,2real,2e,188,187mat,2real,1e,187,222mat,41real,37e,222,186mat,2real,1e,186,151mat,2real,2e,151,152mat,41real,38e,185,502mat,41real,38e,502,150mat,39real,36e,112,113mat,38real,46e,113,114mat,2real,1e,114,115e,115,116mat,2real,2e,116,117!建立橋墩!邊墩

25、1mat,1real,42e,300,301mat,1real,43e,301,302mat,1real,44e,302,303mat,1real,44e,303,304mat,1real,44e,304,305mat,1real,44e,305,306mat,1real,49e,306,307mat,1real,45e,307,308!主墩1mat,1real,39e,309,310mat,1real,40e,310,311mat,1real,41e,311,312mat,1real,41e,312,313mat,1real,41e,313,314mat,1real,40e,314,315m

26、at,1real,39e,315,316!主墩2mat,1real,39e,350,351mat,1real,40e,351,352mat,1real,41e,352,353mat,1real,41e,353,354mat,1real,41e,354,355mat,1real,40e,355,356mat,1real,39e,356,357!主墩3mat,1real,39e,326,327mat,1real,40e,327,328mat,1real,41e,328,329mat,1real,41e,329,330mat,1real,41e,330,331mat,1real,40e,331,33

27、2mat,1real,39e,332,333!邊墩2mat,1real,42e,317,318mat,1real,43e,318,319mat,1real,44e,319,320mat,1real,44e,320,321mat,1real,44e,321,322mat,1real,44e,322,323mat,1real,49e,323,324mat,1real,45e,324,325!添加質量慣距!兩米段質量慣距r,100,1293348.4 !100米處和直線段的質量慣距r,101,1296019.6r,102,1297493r,103,1301181.8r,104,1311723r,10

28、5,1326622r,106,1348967r,107,1370728r,108,1395061r,109,1422801r,110,1452757r,111,1483258r,112,1519733r,113,1558030r,114,1597229r,115,1640292r,116,1687605r,117,1736625r,118,1790923r,119,1848602r,120,1911418r,121,1980562r,122,2052690r,123,2118097r,124,2192307r,125,2263641r,126,2350704r,127,2432292r,128

29、,2516392r,129,2679987r,130,2853514r,131,3048284r,132,3252032r,133,3462506!邊跨直線3米段r,148,1293348.4*3/2!-700處3.75米段的質量慣距r,134,2725866.2!邊支點橫隔r,135,2246142.5!合龍段橫隔r,136,833679/2!中支點橫隔r,137,5292760!添加邊墩質量慣距從上到下 !變截面實心2米段r,138,1163498!1/2空心5米段r,139,1794766!空心段4米r,140,657211!1/2空心4米段r,141,1085079!實心2米段r,14

30、2,1064567!添加主墩質量慣性距 從上到下!實心3米段r,143,2345361!1/2空心5米段r,144,2869095!空心4米段r,145,1769087!1/2空心4米段r,146,2869095*4/5!實心2米段r,147,2345361*2/3!在結點處加入質量慣性距!邊跨合龍段!左邊邊跨type,2real,135e,2type,2real,134e,3type,2real,148e,4type,2real,100e,5!右邊邊跨type,2real,135e,113type,2real,134e,114type,2real,148e,115type,2real,100

31、e,116!對第一個主跨的循環*do,i,6,39,1type,2real,94+ie,i*enddo!對第二個主跨的循環*do,i,41,74,1type,2real,59+ie,i*enddo!對第3個循環*do,i,77,110,1type,2real,33+ie,i*enddo!對第4個循環*do,i,188,221,1type,2real,(-88)+ie,i*enddo!對第5個循環*do,i,152,185,1type,2real,i-52e,i*enddo!對第6個循環*do,i,117,150,1type,2real,(-17)+ie,i*enddo!添加質量慣距到橋墩!左邊

32、墩type,2real,138e,301type,2real,139e,302type,2real,140e,303type,2real,140e,304type,2real,140e,305type,2real,140e,306type,2real,141e,307type,2real,142e,308!右邊墩type,2real,138e,318type,2real,139e,319type,2real,140e,320type,2real,140e,321type,2real,140e,322type,2real,140e,323type,2real,141e,324type,2real,142e,325!左邊主墩type,2real,143e,310type,2real,144e,311type,2real,145e,312type,2real,145e,313type,2r,400,1769087*3/4e,314type