glise 发表于 2006-3-20 20:02

[转帖]单层索网计算命令流文件

/filname,sglcblnt <BR>/title,single cable net analysis /Units:N,mm,kg <BR><BR>!进入前处理器 <BR>/prep7 <BR>ET,1,LINK10 <BR>ET,2,MASS21 <BR>MP,EX,1,1.4E11 <BR>MP,PRXY,1,0.3 <BR>MP,ALPX,1,1.8E-5 <BR>R,1,227.71E-6,11E-4 !定义横向索的截面积A=227.71e-6,初始应变为0.0011 <BR>R,2,227.71E-6,14.3E-4 !定义竖向索的截面积和初始应变 <BR>R,10,0.016*2560*2*1.75,0.016*2560*2*1.75,0.016*2560*2*1.75 !定义质点质量 <BR><BR>!定义关键点和线 <BR>K,1,0,0 <BR>K,2,0,10 <BR>L,1,2 <BR>LGEN,11,1,,,1.75 <BR>L,2,22 <BR>LGEN,6,12,,,,-2.0 <BR>LOVLAP,ALL <BR>LSEL,S,LOC,X,0 <BR>LSEL,R,LOC,Y,1,3 <BR>LGEN,2,ALL,,,6 <BR>LSEL,S,LOC,X,17.5 <BR>LSEL,R,LOC,Y,1,3 <BR>LGEN,2,ALL,,,-6 <BR>LSEL,S,LOC,Y,0 <BR>LSEL,R,LOC,X,5.25,12.25 <BR>LGEN,2,ALL,,,,3 <BR>LSEL,S,LOC,X,6,11.5 <BR>LSEL,R,LOC,Y,0,3 <BR>LOVLAP,ALL <BR><BR>LSEL,S,LOC,Y,3 <BR>LSEL,R,LOC,X,5.5,12 <BR>LDELE,ALL,,,1 <BR>LSEL,S,LOC,X,6 <BR>LSEL,A,LOC,X,11.5 <BR>LDELE,ALL,,,1 <BR>LSEL,S,LOC,X,6,11.5 <BR>LSEL,R,LOC,Y,0,2.5 <BR>LDELE,ALL,,,1 <BR>LSEL,S,LOC,X,0 <BR>LSEL,A,LOC,X,17.5 <BR>LDELE,ALL,,,1 <BR>LSEL,S,LOC,Y,0 <BR>LSEL,A,LOC,Y,10 <BR>LDELE,ALL,,,1 <BR>LSEL,ALL <BR>/PNUM,LINE,ON <BR>LPLOT <BR><BR>!划分横向线单元 <BR>LSEL,S,LOC,Y,2 <BR>LSEL,A,LOC,Y,4 <BR>LSEL,A,LOC,Y,6 <BR>LSEL,A,LOC,Y,8 <BR>LESIZE,ALL,,,1 <BR>LMESH,ALL <BR><BR>!划分竖向线单元 <BR>LSEL,S,LOC,X,1.75 <BR>LSEL,A,LOC,X,3.5 <BR>LSEL,A,LOC,X,5.25 <BR>LSEL,A,LOC,X,7 <BR>LSEL,A,LOC,X,8.75 <BR>LSEL,A,LOC,X,10.5 <BR>LSEL,A,LOC,X,12.25 <BR>LSEL,A,LOC,X,14 <BR>LSEL,A,LOC,X,15.75 <BR>LSEL,A,LOC,X,17.5 <BR>LESIZE,ALL,,,1 <BR>REAL,2 <BR>LMESH,ALL <BR><BR>LSEL,ALL <BR>GPLOT <BR><BR>KSEL,S,LOC,X,1.75,15.75 <BR>KSEL,R,LOC,Y,2,8 <BR>KSEL,U,LOC,Y,3 <BR>KSEL,U,LOC,X,6 <BR>KSEL,U,LOC,X,11.5 <BR>TYPE,2 <BR>REAL,10 <BR>KMESH,ALL <BR><BR>KSEL,INVE <BR>DK,ALL,UX,,,,UY,UZ <BR>KSEL,ALL <BR>FINISH <BR><BR>/SOLU <BR>ANTYPE,STATIC <BR>NLGEOM,ON <BR>SSTIF,ON <BR>TIME,1 <BR>NSUBST,10,10,01 <BR>KBC,1 <BR>OUTPR,BASIC,ALL <BR>SOLVE <BR>FINISH <BR><BR>/SOLU <BR>ANTYPE,STATIC <BR>NSEL,S,LOC,X,1.75,15.75 <BR>NSEL,R,LOC,Y,2,8 <BR>NSEL,U,LOC,Y,3 <BR>NSEL,U,LOC,X,6 <BR>NSEL,U,LOC,X,11.5 <BR>F,ALL,FZ,4900 <BR>ACEL,,10.5 <BR>NSEL,ALL <BR>/PBC,F,,2 <BR>NLGEOM,ON <BR>SSTIF,ON <BR>TIME,1 <BR>NSUBST,10,10,10 <BR>KBC,1 <BR>OUTPR,BASIC,ALL <BR>SOLVE <BR>FINISH <BR><BR>/POST1 <BR>SET,LAST <BR>NSORT,U,Z <BR>*GET,defmaxz,SORT,0,MAX <BR>NSORT,U,Y <BR>*GET,defmaxy,SORT,0,MAX <BR>FINISH <BR><BR>/SOLU <BR>ANTYPE,STATIC <BR>FSCALE,1.4 <BR>ACEL,,13.5 <BR>NLGEOM,ON <BR>SSTIF,ON <BR>TIME,1 <BR>NSUBST,10,10,10 <BR>KBC,1 <BR>OUTPR,BASIC,ALL <BR>SOLVE <BR>FINISH <BR><BR>/POST1 <BR>SET,LAST <BR>ETABLE,AXLF,SMISC,1 <BR>ESORT,ETAB,AXLF <BR>*GET,AXLFMAX,SORT,0,MAX <BR>*msg,ui,defmaxy*1000,defmaxz*1000,AXLFMAX/1000 <BR>Max_defy= %g mm %/&amp; <BR>Max_defz= %g mm %/&amp; <BR>Max_AXiaL_Force= %g kN <BR>PLLS,AXLF,AXLF,0.1 <BR>FINISH <BR><BR>来自傲雪

congcong96 发表于 2008-3-30 08:51

谢谢楼主,运行一下看是什么样的模型

anybody_szf 发表于 2010-6-8 23:25

感谢楼主的分享
页: [1]
查看完整版本: [转帖]单层索网计算命令流文件