/FILNAME,Double,1 ！定义工作文件名。

/TITLE,Temperature Analysis ！定义工作标题。

!*
/PREP7
!定义单元。

ET,1,SOLID70
!*
!定义材料属性。

MPTEMP,,,,,,,, !定义材料1。

MPTEMP,1,0
MPDATA,KXX,1,,238*3.6 !定义材料1的传热系数KXX1。

MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,C,1,,500 !定义材料1的比热C1。

MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,3e-6 !定义材料1密度DENS1。

!*
MPTEMP,,,,,,,, !定义材料2。

MPTEMP,1,0
MPDATA,KXX,2,,15*3.6 !定义材料2的传热系数KXX2。

MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,C,2,,100 !定义材料2的比热C2。

MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,2,,2.2e-6 !定义材料2密度DENS2。

!*
!建立几何模型。

BLC4,-80,-10,160,20,700
VOFFST,3,20, ,
!*
!网格划分。

FLST,5,20,4,ORDE,2
FITEM,5,1
FITEM,5,-20
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
LESIZE,_Y1,10, , , , , , ,1 !定义网格大小。

!*
TYPE, 1
MAT, 1
REAL,
ESYS, 0
SECNUM,
CM,_Y,VOLU
VSEL, , , , 1
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
VSWEEP,_Y1
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
TYPE, 1
MAT, 2
REAL,
ESYS, 0
SECNUM,
CM,_Y,VOLU
VSEL, , , , 2
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
VSWEEP,_Y1
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!定义网格大小完成。

!*
FINISH
/SOL
ANTYPE,4 !定义瞬态分析类型。

TRNOPT,FULL
LUMPM,0
OUTRES,ERASE
OUTRES,ALL,ALL !定义输出每一步结果。

TIME,1 !定义时间及步长。

AUTOTS,-1
DELTIM,0.05, , ,1
KBC,1
TSRES,ERASE
!*
FLST,2,6035,1,ORDE,2
FITEM,2,1
FITEM,2,-6035
IC,P51X,TEMP,20, !定义初始温度。

FLST,2,2,5,ORDE,2
FITEM,2,1
FITEM,2,9
/GO
SFA,P51X,1,HFLUX,100 !定义热流。

!求解。

FINISH
/SOL
/STATUS,SOLU
SOLVE
!重新进入前处理。

/PREP7
ETCHG,TTS
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2.06e5
MPDATA,PRXY,1,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
UIMP,1,REFT,,,20
MPDATA,ALPX,1,,0.5e-4 !定义材料1属性。

MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,2,,1.5e5
MPDATA,PRXY,2,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
UIMP,2,REFT,,,20
MPDATA,ALPX,2,,5e-4 !定义材料2属性。

!重新进入求解模块。

FINISH
/SOL
!*
ANTYPE,0
NSUBST,1,0,0
FLST,2,2,5,ORDE,2
FITEM,2,2
FITEM,2,11
/GO
DA,P51X,ALL,
LDREAD,TEMP,,,0.3, ,'Double','rth',' ' ! 读入热分析的节点温度。

TREF,20, ! 设置参考温度。

!*
/STATUS,SOLU ! 求解计算。

SOLVE。