Ansys经典命令流-钢管混凝土拱桥算例

/prep7/title,theanalyseofsteelarchbridge!*******************************************************************************et,1,82!建立辅助单元作出截面特性CYL4,0.6,0.6,0.6,,0.586!以下命令是用于建立一个空心钢管截面CYL4,0.6,2.4,0.6,,0.586RECTNG,0.35,0.364,0.8,2.2,RECTNG,0.85,0.836,0.8,2.2,asel,allaptn,allADELE,5,8,1!删除多余的面积allselaadd,allsmrtsize,5amesh,allsecwrite,gg,sect,,1SECTYPE,1,BEAM,MESH,!截面代号1SECOFFSET,CENT,,,SECREAD,'gg','SECT',,MESH!读入空心钢管截面asel,allaclear,alladele,all,,,1!将图形及面、线、点全部删除（只保留截面文件）/replotCYL4,0.6,0.6,0.586!以下命令是用于建立一个空心钢管内的混凝土截面CYL4,0.6,2.4,0.586RECTNG,0.364,0.836,0.8,2.2,allselaadd,allsmrtsize,5amesh,allsecwrite,hnt,sect,,1SECTYPE,2,BEAM,MESH,!截面代号2SECOFFSET,CENT,,,SECREAD,'hnt','SECT',,MESH!读入混凝土（空心钢管内的）截面asel,allaclear,alladele,all,,,1!将图形及面、线、点全部删除（只保留截面文件）/replot!重新生成图形k,1,-0.5,0!以下命令是用于建立一个横梁标准截面k,2,-0.75,0.25k,3,-0.75,0.5k,4,-0.55,0.5k,5,-0.55,0.85k,6,0.55,0.85k,7,0.55,0.5k,8,0.75,0.5k,9,0.75,0.25k,10,0.5,0a,1,2,3,4,5,6,7,8,9,10!生成横梁标准截面1A-Asmrtsize,5amesh,allsecwrite,hl1,sect,,1SECTYPE,4,BEAM,MESH,!截面代号4SECOFFSET,CENT,,,SECREAD,'hl1','SECT',,MESH!读入横梁标准截面1A-Aasel,allaclear,alladele,all,,,1!将图形及面、线、点全部删除（只保留截面文件）/replot!重新生成图形k,1,-0.5,0!以下命令是用于建立一个横梁标准截面b-bk,2,-0.5,1k,3,-0.75,1.25k,4,-0.75,1.5k,5,0.75,1.5k,6,0.75,1.25k,7,0.5,1k,8,0.5a,1,2,3,4,5,6,7,8!生成横梁标准截面2b-bsmrtsize,5amesh,allsecwrite,hl2,sect,,1SECTYPE,5,BEAM,MESH,!截面代号5SECOFFSET,CENT,,,SECREAD,'hl2','SECT',,MESH!读入横梁标准截面2asel,allaclear,alladele,all,,,1!将图形及面、线、点全部删除（只保留截面文件）/replot!重新生成图形k,1,-0.5,0!以下命令是用于建立一个横梁标准截面c-ck,2,-0.5,1.04k,3,-0.75,1.04+0.25k,4,-0.75,1.04+0.5k,5,-0.55,1.04+0.5k,6,-0.55,1.04+0.5+0.35k,7,0.55,1.04+0.5+0.35k,8,0.55,1.04+0.5k,9,0.75,1.04+0.5k,10,0.75,1.04+0.25k,11,0.5,1.04k,12,0.5,0k,13,-0.2,0.58k,14,-0.2,1.04+0.5-0.3k,15,0.2,1.04+0.5-0.3k,16,0.2,0.58a,1,2,3,4,5,6,7,8,9,10,11,12a,13,14,15,16asba,1,2!横梁标准截面3C-Csmrtsize,5amesh,allsecwrite,hl3,sect,,1SECTYPE,6,BEAM,MESH,!截面代号6SECOFFSET,CENT,,,SECREAD,'hl3','SECT',,MESH!横梁标准截面3asel,allaclear,alladele,all,,,1!将图形及面、线、点全部删除（只保留截面文件）/replot!重新生成图形ldele,allkdele,allk,1,-0.5,0!以下命令是用于建立一个横梁标准截面d-dk,2,-0.5,1.23k,3,-0.75,1.23+0.25k,4,-0.75,1.23+0.5k,5,-0.55,1.23+0.5k,6,-0.55,1.23+0.5+0.35k,7,0.55,1.23+0.5+0.35k,8,0.55,1.23+0.5k,9,0.75,1.23+0.5k,10,0.75,1.23+0.25k,11,0.5,1.23k,12,0.5,0k,13,-0.2,0.38k,14,-0.3,0.38+0.2k,15,-0.3,1.23+0.5-0.1-0.2k,16,-0.2,1.23+0.5-0.1k,17,0.2,1.23+0.5-0.1k,18,0.3,1.23+0.5-0.1-0.2k,19,0.3,0.38+0.2k,20,0.2,0.38a,1,2,3,4,5,6,7,8,9,10,11,12a,13,14,15,16,17,18,19,20asba,1,2!横梁标准截面4D-Dsmrtsize,5amesh,allsecwrite,hl4,sect,,1SECTYPE,7,BEAM,MESH,!截面代号7SECOFFSET,CENT,,,SECREAD,'hl4','SECT',,MESH!读入横梁标准截面4asel,allaclear,alladele,all,,,1!将图形及面、线、点全部删除（只保留截面文件）/replot!重新生成图形k,1,-0.5,0!以下命令是用于建立一个横梁标准截面e-ek,2,-0.5,1.23k,3,-0.75,1.23+0.25k,4,-0.75,1.23+0.5k,5,-0.55,1.23+0.5k,6,-0.55,1.23+0.5+0.35k,7,0.55,1.23+0.5+0.35k,8,0.55,1.23+0.5k,9,0.75,1.23+0.5k,10,0.75,1.23+0.25k,11,0.5,1.23k,12,0.5,0a,1,2,3,4,5,6,7,8,9,10,11,12!横梁标准截面5E-Esmrtsize,5amesh,allsecwrite,hl5,sect,,1SECTYPE,8,BEAM,MESH,!截面代号8SECOFFSET,CENT,,,SECREAD,'hl5','SECT',,MESH!横梁标准截面5asel,allaclear,alladele,all,,,1/replotetdele,1!将辅助单元类型删除/replot!*********************************************************************!定义所有材料特性et,1,beam44!钢管特性mp,ex,1,2.1e11mp,dens,1,7800mp,prxy,1,0.3n,90000,0,0,30!参考点et,2,beam44!拱肋内混凝土特性50#混凝土mp,ex,2,3.5e10mp,dens,2,2600mp,prxy,2,0.1667et,3,beam44!纵梁特性30#混凝土mp,ex,3,3.0e10mp,dens,3,2600mp,prxy,3,0.1667et,4,beam44!横梁特性30#混凝土mp,ex,4,3.0e10mp,dens,4,2600mp,prxy,4,0.1667et,5,beam44!风撑特性mp,ex,5,2.1e11mp,dens,5,7800mp,prxy,5,0.3et,6,link10!吊杆特性（钢绞线）mp,ex,6,1.90e11mp,dens,6,7800mp,prxy,6,0.3keyopt,6,3,0!只拉吊杆et,7,beam44!盖梁特性30#混凝土mp,ex,7,3.0e10mp,dens,7,2600mp,prxy,7,0.1667et,8,beam44!墩柱特性40#混凝土mp,ex,8,3.3e10mp,dens,8,2600mp,prxy,8,0.1667et,9,beam44!横系梁特性30#混凝土mp,ex,9,3.0e10mp,dens,9,2600mp,prxy,9,0.1667et,10,link10!系杆特性（钢绞线）mp,ex,10,2.0e11mp,dens,10,7800mp,prxy,10,0.3keyopt,10,3,0!只拉系杆et,11,beam44!承台桩基础特性25#混凝土mp,ex,11,2.85e10mp,dens,11,2500mp,prxy,11,0.1667n,90000,0,0,30!**********************************************************************!开始建立模型!0#横梁(端横梁)n,1,0,2.025n,2,6.25,2.025n,3,6.25+5.1,2.025n,4,6.25+5.1+0.2+1.9/2,2.025!12.5米位置n,5,6.25+5.1+2.3,2.025n,6,6.25+5.1+2.3+2.23,2.025nsym,x,10,2,6,1type,4!横梁r,1(定义一组单元实常数)real,1(划分单元时指定的实常书)mat,4secnum,7!单元1到10为0#横梁e,1,2!截面7D-Dsecnum,6e,2,3!截面6D-Dsecnum,5e,3,4!截面5D-De,4,5!截面5D-Dsecnum,4e,5,6!截面4a-asecnum,7e,1,12!截面7D-Dsecnum,6e,12,13!截面6D-Dsecnum,5e,13,14!截面5D-De,14,15!截面5D-Dsecnum,4e,15,16!截面4a-a!1#端横梁egen,2,100,1,10,1,,,,,,0,4.7+1.25/2+1.5/2!其余横梁2#~17#egen,17,100,11,20,1,,,,,,0,5.3+1.5!横梁18#(端横梁)egen,2,100,171,180,1,,,,,,0,4.7+1.5/2+1.25/2cm,hl,elemesel,none!***********************************************************!纵梁单元type,3r,2real,2mat,3SECTYPE,10,beam,rect,zl!纵梁截面代号10secdata,0.4,1.2secnum,10!0#纵梁(端纵梁）e,1,101e,2,102e,3,103e,5,105e,12,112e,13,113e,15,115!中间的纵梁1#~16#*do,i,0,15,1e,101+i*100,201+i*100e,102+i*100,202+i*100e,104+i*100,204+i*100e,112+i*100,212+i*100e,114+i*100,214+i*100*enddo!17#纵梁(端纵梁）e,1701,1801e,1702,1802e,1703,1803e,1705,1805e,1712