资源描述:
《用ANSYS进行滞回分析.doc》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、用ANSYS进行滞回分析 /PREP7 !定义单元类型,实常数,材料特性 ET,1,SHELL143 R,1,12,,,,, MP,EX,1,196784 MP,NUXY,1,0.3 !双线性随动强化模型 TB,BKIN,1,1,2,1 TBDATA,,310,600,,,, !定义关键点、线、面 K,1,54,0,0 K,2,-54,0,0 K,3,54,0,1000 K,4,-54,0,1000 A,1,2,4,3 !定义边界荷强迫位移,划分网格 AESIZE,ALL,27, MSHAPE,0,2D MSHKEY,0 CM,_Y,ARE
2、A ASEL,,,, 1 CM,_Y1,AREA CMSEL,S,_Y AMESH,_Y1 *do,i,1,5 D,i,ALL,0 *enddo OUTPR,BASIC,ALL, OUTRES,ALL,ALL, D,46,ux,30TIME,1AUTOTS,0NSUBST,10,,,1KBC,0LSWRITE,01,!第2荷载步D,46,ux,-30TIME,3AUTOTS,0NSUBST,20,,,1KBC,0LSWRITE,02,!第3荷载步D,46,ux,30TIME,5AUTOTS,0NSUBST,20,,,1KBC,0LSWRITE,03,!第
3、4荷载步D,46,ux,-30TIME,7AUTOTS,0NSUBST,20,,,1KBC,0LSWRITE,04,!第1荷载步 D,46,ux,40 TIME,1 AUTOTS,0 NSUBST,10,,,1 KBC,0 LSWRITE,05, !第2荷载步 D,46,ux,-40 TIME,3 AUTOTS,0 NSUBST,20,,,1 KBC,0 LSWRITE,06, !第3荷载步 D,46,ux,40 TIME,5 AUTOTS,0 NSUBST,20,,,1 KBC,0 LSWRITE,07, !第4荷载步 D,46,ux
4、,-40 TIME,7 AUTOTS,0 NSUBST,20,,,1 KBC,0 LSWRITE,08, !求解 FINISH /SOLU LSSOLVE,1,8,1, !画出荷载位移曲线 FINISH /POST26 NSOL,2,46,U,X, RFORCE,3,46,F,X, XVAR,2 PLVAR,3,,,,,,,,,,回复:【分享】用ANSYS进行滞回分析请教这位高手,本人也要做一个滞回分析,是个软钢圆柱,而我采用的是实体建模,采用SOLID45单元,双线性随动强化,可结果在大位移的情况就是出现蝶形曲线,而实验的情况则是出现一个梭形
5、,跟你所画的图一样,我换了其他可用的SOLID单元,但结果还是一样。希望你能给我提些建议。能给个联系方式吗?以下是本人的一个命令流/prep7 et,1,solid45mp,ex,1,2.01e5 mp,prxy,1,0.26 TB,BKIN,1,1,2TBTEMP,0TBDATA,,185,0, !建立单元及划分网格block,,15,,15,,200 esize,5vmesh,all !施加底部约束nsel,s,loc,z,0 d,all,all,0ALLSEL,ALL !定义加载的位移数组*dim,disp,,6wlw1=80 disp(1)=0 dis
6、p(2)=wlw1 disp(3)=0 disp(4)=-wlw1 disp(5)=0 disp(6)=wlw1 !进入solution阶段/solunlgeom,onsstif,offautots,onoutres,all,alloutpr,all,all !施加位移荷载 time,0.0001 nsel,s,loc,z,200 nsubst,1,0,0 d,all,ux,disp(1) ALLSEL,ALL solve *do,i,2,6 time,i nsel,s,loc,z,200 d,all,ux,disp(i) nsubst,40,0
7、,0 allsel,all solve*enddofinish那么怎么提取滞回数据呢/PREP7 ET,1,BEAM3 ET,2,COMBIN14 KEYOPT,2,1,0 KEYOPT,2,2,0 KEYOPT,2,3,2 R,1,0.16,0.00213333,0.4,,,, R,2,0.18,0.0054,0.6,0,0,600, R,3,,5000000,,!阻尼器线性系数C1MPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,EX,1,,3e10 MP