找回密码
 注册
Simdroid-非首页
查看: 475|回复: 12

[文件下载区] 箱型孔轧制模拟命令流!

[复制链接]
发表于 2006-5-19 09:52:44 | 显示全部楼层 |阅读模式 来自 河南新乡
近日对前一段轧制模拟进行了总结,特提供一个箱型孔命令流,希望对进行轧制模拟的同仁有帮助,也希望斑竹能给加分,哈哈!!
!坯料和轧辊材料
!坯料密度: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 编辑 ]

评分

1

查看全部评分

 楼主| 发表于 2006-5-21 12:07:12 | 显示全部楼层 来自 河南新乡
Simdroid开发平台
谢谢鼓励!我这几天抽空整理一下,再传上来!!!
发表于 2007-2-11 12:03:25 | 显示全部楼层 来自 辽宁沈阳

有关坯料密度

请问为什么:坯料密度:7850kg/m^3
而命令流:MP,DENS,1,785000
输入命令流时密度乘100是什么原因?
发表于 2007-4-8 10:04:55 | 显示全部楼层 来自 河北秦皇岛

哈哈

哥们能把详细的东西都发过来吗?我正需要这方面的东西了!万分感激!
到我的油箱也行:sunhuidong0901@163.com
发表于 2007-4-8 10:06:35 | 显示全部楼层 来自 河北秦皇岛

哈哈

哥们能把详细的东西都发过来吗?我正需要这方面的东西了!万分感激!
到我的油箱也行:sunhuidong0901@163.com
发表于 2007-7-3 14:40:35 | 显示全部楼层 来自 湖北武汉
这个rbrz里的2.62是接触点的线速度还是刚体旋转的角速度或是转速?

[ 本帖最后由 goodbear 于 2007-7-6 10:44 编辑 ]
回复 不支持

使用道具 举报

发表于 2007-7-12 17:05:08 | 显示全部楼层 来自 辽宁沈阳
密度扩大100倍,可以提高计算速度,而且对结果精度影响小。
回复 不支持

使用道具 举报

发表于 2007-7-17 15:07:11 | 显示全部楼层 来自 辽宁沈阳
!*  
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   

tangent modulus 为1.3e7 ,怎么会比弹性模量还小呢?
回复 不支持

使用道具 举报

发表于 2007-7-17 15:07:33 | 显示全部楼层 来自 辽宁沈阳
rbrx里的2.62,是角速度吧
回复 不支持

使用道具 举报

发表于 2011-11-14 10:21:58 | 显示全部楼层 来自 湖北武汉
本帖最后由 fanny2324 于 2011-11-14 10:27 编辑

  生成的关键字还要修改
回复 不支持

使用道具 举报

发表于 2011-11-14 10:05:48 | 显示全部楼层 来自 湖北武汉
这是DYNA模块做的、、、发到这算个什么
回复 不支持

使用道具 举报

发表于 2011-11-14 10:22:36 | 显示全部楼层 来自 湖北武汉
本帖最后由 fanny2324 于 2011-11-14 10:25 编辑

可不可以加个分、、、、  主要是最后的设置、、接触等、、前面建模很简单
他这是LOG文件太乱了


!坯料密度: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,                !算法号
LESIZE,_Y1,0.007, , , , , , ,1    !划分线
LESIZE,_Y1,0.005, , , , , , ,1    !划分线
VPLOT   

EDPART,CREATE                     !创建PART
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, , ,                 !定义数组time
!*  
*DIM,velocity,ARRAY,2,1,1, , ,              !定义数组velociyt
!*  
*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,                                  !RST结果输出选项
EDHTIME,50,                                !时间历程结果输出选项

EDDUMP,1,   
EDOUT,RCFORC
slove

回复 不支持

使用道具 举报

发表于 2013-4-6 21:55:29 | 显示全部楼层 来自 北京
这个好像是本书上的例子吧!
回复 不支持

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-4-27 16:21 , Processed in 0.072144 second(s), 17 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表