资源描述：
《用自定义截面梁建立模型》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、用自定义截面梁建立模型.txt你看得见我打在屏幕上的字，却看不到我掉在键盘上的泪！自己选择45°仰视别人，就休怪他人135°俯视着看你。先画好梁的截面图形，用plane82划分平面单元（只能用plane82）后，采用secwrite命令写为截面特性文件name.sect，有许多不同截面或者是变截面时可以一次在一个辅助程序里把所有截面特性文件都建立好，再在主程序中用secread读入后建立模型。！下面是变截面箱梁，建立数组存放个截面处箱梁控制数据。通过一个循环生成全部截面特性文件。!/CLEAR,START*dim,H,arra
2、y,100,*dim,Htop,array,100*dim,Hbot,array,100*dim,Hfu,array,100*dim,name,char,100!各个截面H(01)=3$Htop(01)=0.28$Hbot(01)=0.32$Hfu(01)=0.45$name(01)='A3'!A3截面H(02)=3.082$Htop(02)=0.28$Hbot(02)=0.328$Hfu(02)=0.45$name(02)='A5'!L5H(03)=3.326$Htop(03)=0.28$Hbot(03)=0.350$Hfu
3、(03)=0.45$name(03)='A7'!L5H(04)=3.735$Htop(04)=0.28$Hbot(04)=0.389$Hfu(04)=0.45$name(04)='A9'!L7H(05)=4.226$Htop(05)=0.28$Hbot(05)=0.434$Hfu(05)=0.45$name(05)='A11'!L9H(06)=4.746$Htop(06)=0.28$Hbot(06)=0.458$Hfu(06)=0.45$name(06)='A13'!L11H(07)=5.358$Htop(07)=0.28$H
4、bot(07)=0.540$Hfu(07)=0.45$name(07)='A15'!L13H(08)=6.$Htop(08)=0.28$Hbot(08)=0.800$Hfu(08)=0.45$name(08)='A17'!L15!!!H(9)=7.5$Htop(9)=0.45$Hbot(9)=0.95$Hfu(9)=0.65$name(9)='A0'!0号块!/prep7et,1,plane82!!!*do,i,1,9,1k,1,-22.5/2,0k,2,22.5/2,0k,3,22.5/2,-0.2k,4,22.5/2-4,
5、-0.45k,5,22.5/2-5.5,-0.65k,6,22.5/2-5.5,-H(i)k,7,-22.5/2+5.5,-H(i)k,8,-22.5/2+5.5,-0.65k,9,-22.5/2+4,-0.45k,10,-22.5/2,-0.2,a,1,2,3,4,5,6,7,8,9,10k,11,-22.5/2+5.5+Hfu(i),-0.65,k,12,-3.75,-0.45,k,13,0,-Htop(i)k,14,3.75,-0.45,k,15,22.5/2-5.5-Hfu(i),-0.65k,16,22.5/2-5.
6、5-Hfu(i),-H(i)+Hbot(i),k,17,-22.5/2+5.5+Hfu(i),-H(i)+Hbot(i),a,11,12,13,14,15,16,17asba,1,2esize,1,mshkey,2amesh,allsecwrite,name(i),sect!写入文件.sectACLEAR,allADELE,all,,1LDELE,all,,,1NUMSTR,NODE,1,NUMSTR,ELEM,1,NUMSTR,KP,1,NUMSTR,LINE,1,NUMSTR,AREA,1,NUMSTR,VOLU,1,*e
7、nddo!A1k,1,-22.5/2,0k,2,22.5/2,0k,3,22.5/2,-0.65k,4,22.5/2-4,-0.65k,5,22.5/2-5.5,-0.65k,6,22.5/2-5.5,-3k,7,-22.5/2+5.5,-3k,8,-22.5/2+5.5,-0.65k,9,-22.5/2+4,-0.65k,10,-22.5/2,-0.65a,1,2,3,4,5,6,7,8,9,10k,11,-22.5/2+5.5+1.6,-0.65,k,12,-3.75,-0.65,k,13,0,-0.65k,14,3.75
8、,-0.65,k,15,22.5/2-5.5-1.6,-0.65k,16,22.5/2-5.5-1.6,-3+0.8,k,17,-22.5/2+5.5+1.6,-3+0.8,a,11,12,13,14,15,16,17asba,1,2!LESIZE,ALL,1,,,,1,,,
