ANSYS热分析教程及命令流算例

!!!**************注意事项********************************** !!1.每次修改数据流需改动如下内容： !!(1).检查生死是否正确

!!(2).检查材料是否正确(包括材料编号、）

!!(3).检查荷载是否正确(包括温度场、重力、水压） !!(4).检查时间步是否正确.

!引起错误之处

!1.变材料有徐变，而初始材料未设徐变参数时，会造成几步后不能运算的错误.

FINISH /PREP7

*DO,I,1,37,1

CMSEL,S,LAYER(I,1) EMODIF,ALL,MAT,I+20, *ENDDO

/SOLU ANTYPE,0

LSCLEAR,ALL

NROPT,FULL NLGEOM,ON

!!!!!!!!!!!!!!!!!!!!!!!!!!!!砼浇筑期（第1天-第111天） !约束

ALLSEL,ALL !约束岩石底部 ASEL,S,LOC,Z,-40 NSLA,S,1

D,ALL, , , , , ,UX,UY,UZ, , , !!约束岩石上下游方向 ASEL,S,LOC,Y,50 ASEL,A,LOC,Y,450

!将纵向围堰的相应节点去除 FLST,5,22,5,ORDE,22 FITEM,5,184 FITEM,5,195 FITEM,5,199 FITEM,5,203 FITEM,5,207 FITEM,5,211 FITEM,5,215 FITEM,5,219

FITEM,5,277 FITEM,5,280 FITEM,5,284 FITEM,5,287 FITEM,5,457 FITEM,5,461 FITEM,5,465 FITEM,5,469 FITEM,5,473 FITEM,5,477 FITEM,5,481 FITEM,5,485 FITEM,5,490 FITEM,5,493 ASEL,U, , ,P51X NSLA,S,1

D,ALL, , , , , ,UY, , , , , !约束岩石两岸方向

ASEL,S,LOC,X,-458,-457 ASEL,A,LOC,X,317,318 NSLA,S,1

D,ALL, , , , , ,UX, , , , , ALLSEL,ALL

!KILL THE DAM ELEMENT ESEL,S,MAT,,1

NSLE,S EKILL,ALL !KILL WHOLE DAM

!!按浇筑时间层层激活37层

*DO,I,0,36,1 !@@@@@@第三层循环START CMSEL,S,LAYER(I+1,1) NSLE,S EALIVE,ALL

!!按层层激活浇筑间歇期3天

*DO,J,1,3,1 !@@@@@@第二层循环START T=I*3+J

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!按时间变化修改材料 !J=1时,修改激活层的材料编号 *IF,J,EQ,1,THEN

!修改刚激活层的材料编号 CMSEL,S,LAYER(I+1,1) MPCHG,(I+1)*200+1,ALL,

!修改下层激活层的材料编号

*DO,K,0,I-1,1 CMSEL,S,LAYER(k+1,1)

MPCHG,(K+1)*200+(T-3*K),ALL, *ENDDO *ELSE

!J不等于1时,修改激活层的材料编号

*DO,K,0,I,1 !@@@@@@第一层循环START *IF,T,LE,3*K+105,THEN CMSEL,S,LAYER(k+1,1)

MPCHG,(K+1)*200+(T-3*K),ALL, *ENDIF

*ENDDO !@@@@@@第一层循环END *ENDIF

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!按时间变化修改材料 ALLSEL,ALL !!****************!solve*****

!!!!!!!!!!!!!! LOAD !GRAVITY LOAD

ACEL,0,0,9.8,

!TEMP LOAD

LDREAD,TEMP,,,T, ,'CAL-030301','rth',' ' !TEMP LOAD

!WATER PRESURRE

!*IF,T,GT,1095,AND,T,LE,1185,THEN !SFGRAD,PRES,0,Z,1580+2.45*(T-1095),-9800 !CMSEL,S,UPNODE !NSEL,R,LOC,Z,1580,1580+2.45*(T-1095), !SF,ALL,PRES,0 !ALLSEL,ALL !*ENDIF

ALLSEL,ALL TIME,T AUTOTS,0

NSUBST,1,0,0

CNVTOL,F, ,0.2,2,200, KBC,0

*if,MOD(T,5),eq,0,THEN OUTRES,ALL,LAST, *ELSE OUTRES,ALL,none, *ENDIF

!!!!!!!!!!检验数据流的正确性，随意存几个时间步结果 !*IF,T,EQ,4,THEN !SAVE,SA4,DB !*ENDIF !

!*IF,T,EQ,7,THEN !SAVE,SA7,DB !*ENDIF ! !

!*IF,T,EQ,37,THEN !SAVE,SA37,DB !*ENDIF !

!*IF,T,EQ,97,THEN !SAVE,SA97,DB !*ENDIF !

!*IF,T,EQ,109,THEN !SAVE,SA109,DB !*ENDIF

!!!!!!!!!!检验数据流的正确性，随意存几个时间步结果

solve

*ENDDO !@@@@@@第二层循环END *ENDDO !@@@@@@第三层循环END

!!!!!!!!!!!!!!!!!!!!!!!!!!!!砼浇筑后一个月按天计算（第112天-第141天）

!修改各层的材料编号 *DO,T,112,141,1

*DO,K,0,36,1