近日对前一段轧制模拟进行了总结,特提供一个箱型孔命令流,希望对进行轧制模拟的同仁有帮助,也希望斑竹能给加分,哈哈!!
!坯料和轧辊材料
!坯料密度:7850kg/m^3
!弹性模量:1.17E11MPa
!泊松比:0.36
!屈服强度:1.38E8MPa
!剪切模量:1.3E7MPa
!轧辊密度:7850kg/m^3
!弹性模量:2.1E11MPa
!泊松比:0.3
/DSCALE,1,1.0
/PREP7
!*
ET,1,SOLID164
!*
!*
MP,DENS,1,785000
MP,EX,1,1.17e11
MP,NUXY,1,0.36
TB,BISO,1,,,,
TBDAT,1,1.24e8
TBDAT,2,1.3e7
EDMP,RIGI,2,7,7
MP,DENS,2,785000
MP,EX,2,2.1e11
MP,NUXY,2,0.3
K, ,-0.001,0.045,0,
K, ,0.02,0.045,0,
K, ,0.04,0.065,0,
K, ,0.069,0.065,0,
K, ,0.09,0.01,0,
K, ,0.11,0.01,0,
LSTR, 1, 2
LSTR, 2, 3
LSTR, 3, 4
LSTR, 4, 5
LSTR, 5, 6
!*
LPLOT
!*
LFILLT,1,2,0.03, ,
!*
LFILLT,2,3,0.038, ,
!*
LFILLT,3,4,0.008, ,
!*
LFILLT,4,5,0.016, ,
!*
FLST,2,9,4,ORDE,2
FITEM,2,1
FITEM,2,-9
LCOMB,P51X, ,0
FLST,3,1,4,ORDE,1
FITEM,3,1
LGEN,2,P51X, , , ,0.01, , ,0
LSTR, 7, 1
LSTR, 8, 6
FLST,2,4,4
FITEM,2,3
FITEM,2,1
FITEM,2,4
FITEM,2,2
AL,P51X
K, ,0,0.285,,
K, ,0.11,0.285,,
FLST,2,1,5,ORDE,1
FITEM,2,1
FLST,8,2,3
FITEM,8,9
FITEM,8,10
VROTAT,P51X, , , , , ,P51X, ,360, ,
BLOCK,0,0.07,0,0.07,-0.65,-0.15,
!抓模型图
/SHOW,JPEG,,0
JPEG,QUAL,75,
JPEG,ORIENT,HORIZ
JPEG,COLOR,2
JPEG,TMOD,1
/GFILE,800,
!*
/REPLOT
/SHOW,CLOSE
/DEVICE,VECTOR,0
!*
SAVE
VSEL,S, , , 5
ALLSEL,BELOW,VOLU
LPLOT
TYPE, 1
MAT, 1
REAL,
ESYS, 0
SECNUM,
!*
FLST,5,4,4,ORDE,2
FITEM,5,33
FITEM,5,-36
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1,0.007, , , , , , ,1
!*
FLST,5,4,4,ORDE,2
FITEM,5,41
FITEM,5,-44
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1,0.005, , , , , , ,1
!*
MSHAPE,0,3D
MSHKEY,1
!*
CM,_Y,VOLU
VSEL, , , , 5
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
!*
VMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
ALLSEL,ALL
VPLOT
FLST,5,4,6,ORDE,2
FITEM,5,1
FITEM,5,-4
VSEL,S, , ,P51X
ALLSEL,BELOW,VOLU
LPLOT
TYPE, 1
MAT, 2
REAL,
ESYS, 0
SECNUM,
!*
FLST,5,4,4,ORDE,4
FITEM,5,4
FITEM,5,-5
FITEM,5,13
FITEM,5,23
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,1, , , , ,1
!*
FLST,5,8,4,ORDE,8
FITEM,5,1
FITEM,5,-2
FITEM,5,6
FITEM,5,8
FITEM,5,14
FITEM,5,16
FITEM,5,22
FITEM,5,24
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,15, , , , ,1
!*
FLST,5,8,4,ORDE,8
FITEM,5,11
FITEM,5,-12
FITEM,5,19
FITEM,5,-20
FITEM,5,27
FITEM,5,-28
FITEM,5,31
FITEM,5,-32
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1,0.005*1.7, , , , , , ,1
!*
SMRT,6
FLST,5,4,6,ORDE,2
FITEM,5,1
FITEM,5,-4
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
!*
VSWEEP,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
ALLSEL,ALL
VPLOT
EDPART,CREATE
EDCGEN,ASTS, 1, 2,0.45,0.3,0,0,0, , , , ,0,10000000,0,0
VSEL,S, , , 5
ALLSEL,BELOW,VOLU
NSLV,S,1
CM,slab,NODE
ALLSEL,BELOW,VOLU
ASEL,R, , , 23
NSLA,S,1
NPLOT
FLST,2,1111,1,ORDE,8
FITEM,2,2
FITEM,2,22
FITEM,2,32
FITEM,2,-40
FITEM,2,122
FITEM,2,-132
FITEM,2,243
FITEM,2,-1331
!*
/GO
D,P51X, ,0, , , ,UY, , , , ,
ALLSEL,ALL
/REPLOT
VSEL,S, , , 5
ALLSEL,BELOW,VOLU
ASEL,R, , , 25
NSLA,S,1
NPLOT
FLST,2,1111,1,ORDE,12
FITEM,2,1
FITEM,2,-11
FITEM,2,122
FITEM,2,143
FITEM,2,153
FITEM,2,-161
FITEM,2,243
FITEM,2,-341
FITEM,2,1431
FITEM,2,-1529
FITEM,2,2421
FITEM,2,-3311
!*
/GO
D,P51X, ,0, , , ,UX, , , , ,
ALLSEL,ALL
VPLOT
!*
EDVE,VELO,SLAB,0,0,2.88,0,0,0, , , , , ,
*DIM,time,ARRAY,2,1,1, , ,
!*
*DIM,velocity,ARRAY,2,1,1, , ,
!*
*SET,VELOCITY(2,1,1) , -2.62
*SET,TIME(2,1,1) , 0.25
EDLOAD,ADD,RBRX,0, 2,TIME,VELOCITY, 0, , , , ,
FINISH
/SOL
EDENERGY,1,1,1,1
TIME,0.24,
EDOPT,ADD,blank,BOTH
EDRST,20,
EDHTIME,50,
EDDUMP,1,
!*
!*
!*
EDOUT,RCFORC
slove
配上介绍和解释再加分!
[ 本帖最后由 jinqinghai 于 2006-5-19 12:13 编辑 ] |