ANSYS命令流--钢管混凝土拱桥算例.docx

ANSYS命令流--钢管混凝土拱桥算例 钢管混凝土拱桥算例Ansys/prep7 /title,the analyse of steel arch bridge !******************************************************************************* et,1,82 !建立协助单元作出截面特性 CYL4,0.6,0.6,0.6, ,0.586 !以下吩咐是用于建立一个空心钢管截面 CYL4,0.6,2.4,0.6, ,0.586 RECTNG,0.35,0.364,0.8,2.2, RECTNG,0.85,0.836,0.8,2.2, asel,all aptn,all ADELE,5,8,1 !删除多余的面积 allsel aadd,all smrtsize,5 amesh,all secwrite,gg,sect,,1 SECTYPE,1,BEAM,MESH, !截面代号1 SECOFFSET,CENT,,, SECREAD,'gg','SECT',,MESH !读入空心钢管截面 asel,all aclear,all adele,all,,,1 !将图形及面、线、点全部删除〔只保存截面文件〕 /replot CYL4,0.6,0.6,0.586 !以下吩咐是用于建立一个空心钢管内的混凝土截面 CYL4,0.6,2.4,0.586 RECTNG,0.364,0.836,0.8,2.2, allsel aadd,all smrtsize,5 amesh,all secwrite,hnt,sect,,1 SECTYPE,2,BEAM,MESH, !截面代号2 SECOFFSET,CENT,,, SECREAD,'hnt','SECT',,MESH !读入混凝土〔空心钢管内的〕截面 asel,all aclear,all adele,all,,,1 !将图形及面、线、点全部删除〔只保存截面文件〕 /replot !重新生成图形 k,1,-0.5,0 !以下吩咐是用于建立一个横梁标准截面 k,2,-0.75,0.25 k,3,-0.75,0.5 k,4,-0.55,0.5 k,5,-0.55,0.85 k,6,0.55,0.85 k,7,0.55,0.5 k,8,0.75,0.5 k,9,0.75,0.25 k,10,0.5,0a,1,2,3,4,5,6,7,8,9,10 !生成横梁标准截面1 A-A smrtsize,5 amesh,all secwrite,hl1,sect,,1 SECTYPE,4,BEAM,MESH, !截面代号4 SECOFFSET,CENT,,, SECREAD,'hl1','SECT',,MESH !读入横梁标准截面1 A-A asel,all aclear,all adele,all,,,1 !将图形及面、线、点全部删除〔只保存截面文件〕 /replot !重新生成图形 k,1,-0.5,0 !以下吩咐是用于建立一个横梁标准截面b-b k,2,-0.5,1 k,3,-0.75,1.25 k,4,-0.75,1.5 k,5,0.75,1.5 k,6,0.75,1.25 k,7,0.5,1 k,8,0.5a,1,2,3,4,5,6,7,8 !生成横梁标准截面2 b-b smrtsize,5 amesh,all secwrite,hl2,sect,,1 SECTYPE,5,BEAM,MESH, !截面代号5 SECOFFSET,CENT,,, SECREAD,'hl2','SECT',,MESH !读入横梁标准截面2 asel,all aclear,all adele,all,,,1 !将图形及面、线、点全部删除〔只保存截面文件〕 /replot !重新生成图形 k,1,-0.5,0 !以下吩咐是用于建立一个横梁标准截面c-c k,2,-0.5,1.04k,3,-0.75,1.04+0.25 k,4,-0.75,1.04+0.5k,5,-0.55,1.04+0.5k,6,-0.55,1.04+0.5+0.35 k,7,0.55,1.04+0.5+0.35 k,8,0.55,1.04+0.5 k,9,0.75,1.04+0.5 k,10,0.75,1.04+0.25 k,11,0.5,1.04 k,12,0.5,0 k,13,-0.2,0.58k,14,-0.2,1.04+0.5-0.3 k,15,0.2,1.04+0.5-0.3 k,16,0.2,0.58a,1,2,3,4,5,6,7,8,9,10,11,12 a,13,14,15,16asba,1,2 !横梁标准截面3 C-C smrtsize,5 amesh,all secwrite,hl3,sect,,1 SECTYPE,6,BEAM,MESH, ! 截面代号6 SECOFFSET,CENT,,, SECREAD,'hl3','SECT',,MESH !横梁标准截面3 asel,all aclear,all adele,all,,,1 !将图形及面、线、点全部删除〔只保存截面文件〕 /replot !重新生成图形 ldele,all kdele,all k,1,-0.5,0 !以下吩咐是用于建立一个横梁标准截面d-d k,2,-0.5,1.23 k,3,-0.75,1.23+0.25 k,4,-0.75,1.23+0.5 k,5,-0.55,1.23+0.5k,6,-0.55,1.23+0.5+0.35 k,7,0.55,1.23+0.5+0.35 k,8,0.55,1.23+0.5 k,9,0.75,1.23+0.5 k,10,0.75,1.23+0.25 k,11,0.5,1.23 k,12,0.5,0 k,13,-0.2,0.38 k,14,-0.3,0.38+0.2k,15,-0.3,1.23+0.5-0.1-0.2 k,16,-0.2,1.23+0.5-0.1k,17,0.2,1.23+0.5-0.1 k,18,0.3,1.23+0.5-0.1-0.2 k,19,0.3,0.38+0.2 k,20,0.2,0.38a,1,2,3,4,5,6,7,8,9,10,11,12 a,13,14,15,16,17,18,19,20asba,1,2 !横梁标准截面4 D-D smrtsize,5 amesh,allsecwrite,hl4,sect,,1SECTYPE,7,BEAM,MESH, !截面代号7 SECOFFSET,CENT,,,SECREAD,'hl4','SECT',,MESH !读入横梁标准截面4 asel,all aclear,alladele,all,,,1 !将图形及面、线、点全部删除〔只保存截面文件〕 /replot ! 重新生成图形 k,1,-0.5,0 !以下吩咐是用于建立一个横梁标准截面e-e k,2,-0.5,1.23k,3,-0.75,1.23+0.25 k,4,-0.75,1.23+0.5 k,5,-0.55,1.23+0.5k,6,-0.55,1.23+0.5+0.35 k,7,0.55,1.23+0.5+0.35 k,8,0.55,1.23+0.5 k,9,0.75,1.23+0.5 k,10,0.75,1.23+0.25 k,11,0.5,1.23 k,12,0.5,0a,1,2,3,4,5,6,7,8,9,10,11,12 !横梁标准截面5 E-E smrtsize,5 amesh,allsecwrite,hl5,sect,,1SECTYPE,8,BEAM,MESH, ! 截面代号8 SECOFFSET,CENT,,,SECREAD,'hl5','SECT',,MESH !横梁标准截面5 asel,all aclear,all adele,all,,,1 /replotetdele,1 !将协助单元类型删除 /replot!*********************************************************************!定义全部材料特性 et,1,beam44 !钢管特性 mp,ex,1,2.1e11 mp,dens,1,7800 mp,prxy,1,0.3n,90000,0,0,30 !参考点et,2,beam44 !拱肋内混凝土特性 50#混凝土 mp,ex,2,3.5e10 mp,dens,2,2600 mp,prxy,2,0.1667et,3,beam44 ! 纵梁特性 30#混凝土 mp,ex,3,3.0e10 mp,dens,3,2600 mp,prxy,3,0.1667et,4,beam44 !横梁特性 30#混凝土 mp,ex,4,3.0e10 mp,dens,4,2600 mp,prxy,4,0.1667et,5,beam44 !风撑特性 mp,ex,5,2.1e11 mp,dens,5,7800 mp,prxy,5,0.3et,6,link10 !吊杆特性 〔钢绞线〕 mp,ex,6,1.90e11 mp,dens,6,7800 mp,prxy,6,0.3keyopt,6,3,0 !只拉吊杆et,7,beam44 !盖梁特性 30# 混凝土 mp,ex,7,3.0e10 mp,dens,7,2600 mp,prxy,7,0.1667et,8,beam44 !墩柱特性 40#混凝土 mp,ex,8,3.3e10 mp,dens,8,2600 mp,prxy,8,0.1667et,9,beam44 !横系梁特性 30#混凝土 mp,ex,9,3.0e10 mp,dens,9,2600 mp,prxy,9,0.1667et,10,link10 !系杆特性〔钢。