激光焊接ANSYS命令流脉冲热源Word文档下载推荐.docx

1、MPTEMP,MPTEMP,1,293MPTEMP,2,373MPTEMP,3,473MPTEMP,4,573MPTEMP,5,673MPTEMP,6,773MPTEMP,7,873MPTEMP,8,973MPTEMP,9,1073MPTEMP,10,1173MPTEMP,11,1273MPTEMP,12,1373MPTEMP,13,1500MPTEMP,14,1600MPTEMP,15,1700MPTEMP,16,1800MPTEMP,17,1900MPTEMP,18,2000MPTEMP,19,2200MPTEMP,20,2400MPTEMP,21,2500MPTEMP,22,2600MP

2、TEMP,23,2700MPTEMP,24,2800MPTEMP,25,2900MPTEMP,26,3000MPDATA,KXX,1,10.8MPDATA,KXX,1,11.9MPDATA,KXX,1,12.9MPDATA,KXX,1,14.2MPDATA,KXX,1,15.8MPDATA,KXX,1,17.6MPDATA,KXX,1,19.5MPDATA,KXX,1,21.3MPDATA,KXX,1,23.2MPDATA,KXX,1,24.8MPDATA,KXX,1,26.3MPDATA,KXX,1,27.4MPDATA,KXX,1,28.2MPDATA,KXX,1,41.1定义密度MPTE

3、MP,1,0MPDATA,DENS,1,8890定义比热容MPDATA,C,1,423MPDATA,C,1,454MPDATA,C,1,472MPDATA,C,1,489MPDATA,C,1,505MPDATA,C,1,522MPDATA,C,1,538MPDATA,C,1,553MPDATA,C,1,569MPDATA,C,1,584MPDATA,C,1,598MPDATA,C,1,613MPDATA,C,1,830MPDATA,C,1,1650MPDATA,C,1,660MPDATA,C,1,670MPDATA,C,1,680MPDATA,C,1,688MPDATA,C,1,695MPDA

4、TA,C,1,699MPDATA,C,1,703MPDATA,C,1,705建立模型S_DIS=0.0005RECTNG,S_DIS,0.050+S_DIS,0,0.0008RECTNG,S_DIS,0.050+S_DIS,0.0008,0.0018RECTNG,S_DIS,0.050+S_DIS,0.0018,0.005RECTNG,S_DIS,0.050+S_DIS,0.005,0.050aglue,all numcmp,all 划分网格-面4LESIZE,12,20LESIZE,13,20LESIZE,7,20MSHKEY,1MSHAPE,0,2D AMESH,4-面3LESIZE,10

5、,2LESIZE,11,2AMESH,3LREFINE,5,1,1,OFF -面2LESIZE,8,2LESIZE,9,2AMESH,2LREFINE,3,1,1,OFF -面1LESIZE,2,4,LESIZE,4,4,AMESH,1ALLSEL,ALL NUMCMP,ALL/REPLOTFINISH /SOLUANTYPE,TRANS TRNOPT,FULL TUNIF,293nlgeom,off nropt,full KK=3N_ONCE=TT/TINC MAX_TIME=N_ONCE+1MAX_X=（LENGTH+2*S_DIS）/LSIZE+1MAX_Y=2*L_ZONE/LSIZE

6、+1H_MAX_Y=L_ZONE/LSIZE+1-定义载荷并求解-SFA,2,CONV,400,293SFA,3,CONV,250,293SFA,4,CONV,50,293*DIM,FLUX2,TABLE,MAX_X,MAX_Y,MAX_TIME,X,Y,TIME*DO,K,1,MAX_TIME,1*DO,I,1,MAX_X,1FLUX2（I,0,K）=（I-1）*LSIZE *ENDDO*DO,J,1,MAX_Y,1FLUX2（0,J,K）=-（H_MAX_Y-J）*LSIZE XCENTER=（K-1）*Vlaser/F YCENTER=0XCOORD=（I-1）*LSIZE YCOORD

7、=-（H_MAX_Y-J）*LSIZE DISTANCE=SQRT（XCOORD-XCENTER）*2+（YCOORD-YCENTER）*2）*IF,DISTANCE,LE,Rlaser,THENFLUX2（I,J,K）=QMAX/EXP（KK*（DISTANCE*2）/（Rlaser*2）*ELSEFLUX2（I,J,K）=0*ENDIFFLUX2（0,0,K）=（K-1）*TINC OUTRES,BASIC,ALL KBC,1TSRES,ERASE TIMINT,ON LNSRCH,ON TM1=0.005+（K-1）*TINC TIME,TM1SFA,1,HFLUX,%FLUX2%AUT

8、OTS,-1NSUBST,4/GST,ON/REP,FAST/PSF,HFLUX,1 !表面上热流加载用带颜色填充曲面表示SOLVE SFADELE,1,HFLUX TM2=K*TINC TIME,TM2SFA,1,CONV,400,293SFADELE,1,CONV SAVE *冷却阶段*DO,k,1,30,1TIME,TT+5*k !载荷步结束时间NSUBST,25outres,all,all finish /FILNAME,stress3,1/PREP7et,1,solid45!把热单元转化成结构单元R,1,0.0005-设置结构分析的材料属性-MPTEMP,4,513MPTEMP,5,

9、573MPTEMP,6,673MPTEMP,7,773MPTEMP,8,873MPTEMP,9,973MPTEMP,10,1073MPTEMP,11,1173MPTEMP,12,1273MPTEMP,13,1373MPTEMP,14,1423MPTEMP,15,1473MPTEMP,16,1596MPTEMP,17,1673MPTEMP,18,1873MPTEMP,19,2073MPTEMP,20,2273MPTEMP,21,2473MPTEMP,22,2673MPTEMP,23,2873MPTEMP,24,3073MPTEMP,25,3273MPDATA,ALPX,1,0.184E-5MPD

10、ATA,ALPX,1,1.17E-5MPDATA,ALPX,1,1.21E-5MPDATA,ALPX,1,1.28E-5MPDATA,ALPX,1,1.31E-5MPDATA,ALPX,1,1.35E-5MPDATA,ALPX,1,1.40E-5MPDATA,ALPX,1,1.47E-5MPDATA,ALPX,1,1.55E-5MPDATA,ALPX,1,1.60E-5MPDATA,ALPX,1,1.65E-5MPDATA,ALPX,1,1.8E-5MPTEMP,13,1473MPTEMP,14,1596MPTEMP,15,1673MPTEMP,16,1873MPTEMP,17,2073MPT

11、EMP,18,2273MPTEMP,19,2473MPTEMP,20,2673MPTEMP,21,2873MPTEMP,22,3073MPTEMP,23,3273MPDATA,EX,1,2.05E11MPDATA,EX,1,2.03E11MPDATA,EX,1,1.98E11MPDATA,EX,1,1.92E11MPDATA,EX,1,1.86E11MPDATA,EX,1,1.80E11MPDATA,EX,1,1.78E11MPDATA,EX,1,1.67E11MPDATA,EX,1,1.59E11MPDATA,EX,1,1.50E11MPDATA,EX,1,1.41E11MPDATA,EX,

12、1,1.2E11MPDATA,EX,1,0.8E11MPDATA,EX,1,0.08E11MPDATA,PRXY,1,0.33TB,BISO,1,6,2,TBTEMP,298TBDATA,354e6,5.89e9,TBTEMP,873TBDATA,212e6,1.7e9,TBTEMP,1073TBDATA,199e6,1.4e9,TBTEMP,1473TBDATA,100e6,1e8,TBTEMP,1596TBDATA,50e6,1e7,TBTEMP,2173TBDATA,5e6,1e7,save antype,trans trnopt,full !指定为完全瞬态分析nropt,full,on

13、 !完全牛顿拉夫逊法自适应下降nlgeom,1!大变形autots,on !激活时间步自动阶跃timint,on,struct !打开结构瞬态分析tintp,0.005,1,0.5,0.2kbc,0CNVTOL,F,0.005,2,1.0e-6CNVTOL,U,0.005,2,1.0e-6OUTRES,ERASE OUTRES,NSOL,LAST nsel,s,loc,y,0.015,0.05d,all,all,0allsel,all nsel,s,loc,y,0dsym,symm,y,*SET,ii,1*DO,T,1E-6,1,TINC/2TM1=TINC*（ii-1）/2+1E-6ldre

14、ad,temp,TM1,Thermal3,rth nsubst,20solve *SET,ii,ii+1*enddo*SET,aa,1*DO,T,1,30.5,TINC/2TM2=TINC*（aa-1）/2+1ldread,temp,TM2,Thermal3,rth nsubst,6*SET,aa,aa+1*SET,k,1*DO,T,30.51,55.51,0.1TM3=（k-1）*0.1+30.51TIME,TM3ldread,temp,TM3,Thermal3,rth *SET,k,k+1nsel,s,loc,y,0.03d,all,ux,0d,all,uz,0*SET,bb,1*DO,T,55.52,57.52,0.02TM4=（bb-1）*0.02+55.52TIME,TM4ldread,temp,TM4,Thermal3,rth nsubst,30*SET,bb,bb+1*SET,jj,1*DO,T,57.53,180,2TM5=（jj-1）*2+57.53TIME,TM5ldread,temp,TM5,Thermal3,rth *SET,jj,jj+1