24小时热门版块排行榜    

CyRhmU.jpeg
查看: 823  |  回复: 4
当前主题已经存档。

cui9315

金虫 (小有名气)


[资源] 【转帖】ANSYS命令流实例库【已搜无重复】

1.结构静力分析--梁分析
/PREP7 !进入前处理器
ET,1,BEAM3 !定义单元类型
R,1,0.25,0.0052,0.5  !定义实常数
MP,EX,1,210E6
MP,PRXY,1,0.3     !定义材料属性
N,1,0
N,2,1
N,3,5
N,4,7
N,5,7
N,6,9
N,7,11
N,8,11
N,9,13
N,10,14        !定义节点
E,1,2
E,2,3
E,3,4
E,5,6
E,6,7
E,8,9
E,9,10         !生成单元
CP,1,UX,4,5
CP,2,UY,4,5
CP,3,UX,7,8
CP,4,UY,7,8      !耦合节点
FINISH
/SOLU         !进入求解器
D,2,UX
D,2,UY
D,3,UY
D,6,UY
D,9,UY         !施加位移约束
F,10,FY,-4       !施加集中约束
SFBEAM,1,1,PRES,4,4
SFBEAM,2,1,PRES,4,4   !施加均布力
SOLVE         !求解
/POST1         !进入后处理器
PLDISP         !绘制结构变形图
PRDISP         !列出各节点的位移
ETABLE,IMOMENT,SMISC,6
ETABLE,JMOMENT,SMISC,12
ETABLE,ISHEAR,SMISC,2
ETABLE,JSHEAR,SMISC,8   !将节点弯矩、剪力制表
PRETAB           !列表显示单元的弯矩、剪力
/TITLE,SHEAR FORCE DISTRIBUTION     !设置剪力分布图的标题
PLLS,ISHEAR,JSHEAR            !绘制剪力分布图
/TITLE,BENDING MOMENT IDSTRIBUTION    !设置弯矩分布图的标题
PLLS,IMOMENT,JMOMENT           !绘制弯矩分布图
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cui9315

金虫 (小有名气)


流固耦合实例

RAD=0.8 !底面半径
H=1
G=9.8
OMEGAR=2
ROU=1000   !定义参数变量
/PREP7    !进入前处理器
ET,1,FLUID79 !选择单元类型
KEYOPT,1,3,1  !设置单元关键字
MP,EX,1,2E9    !设置杨氏模量
MP,DENS,1,ROU    !设置材料密度
K,1
K,2,RAD
K,3,RAD,H
K,4,,H       !生成关键点
A,1,2,3,4      !连接关键点生成面积
LESIZE,ALL,,,10   !设置网格划分精度
AMESH,ALL    !将面积划分网络
/SOLU      !进入求解器
DL,2,,UX
DL,1,,UY
NSEL,S,LOC,X
DSYM,SYMM,X
D,ALL,UX
NSEL,ALL    !施加位移约束
ACEL,,G
OMEGA,,OMEGAR   !施加惯性力
SOLVE        !求解
/POST1
SET,LAST      !进入通用后处理器
PLNSOL,U,X,0,1   !绘制应力云图
UCENT=UY(22)
UEDGE=UY(12)
UELEV=UEDGE-UCENT !提取节点位移
2楼2008-05-12 08:20:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cui9315

金虫 (小有名气)


结构静力分析--壳结构内力分析

LENGTH=100
YOUNG=200000
THICKNESS=2
FORCE=1000
DENSITY=9E-6 !将材质、载荷、板的几何尺寸等参数化
/PREP7     !进入前处理器
MP,EX,1,YOUNG
MP,NUXY,1,0.3
MP,DENS,1,DENSITY   !定义材质
ET,1,SHELL63     !定义单元类型
R,1,THICKNESS,THICKNESS,THICKNESS,THICKNESS  !定义实常数
!构建结构的几何模型
K,1,0,0
K,2,LENGTH,0
K,3,LENGTH,LENGTH
K,4,0,LENGTH   !定义关键点
A,1,2,3,4    !通过关键点生成面
LSEL,ALL
LESIZE,ALL,,,16
AMESH,ALL     !设定网格划分参数,划分网格
FINISH
/SOLU    !进入求解器
NSEL,S,LOC,X,0,0
D,ALL,ALL,0     !选择X=0的节点将其固定
NSEL,S,LOC,X,LENGTH,LENGTH
D,ALL,ALL,0     !选择X=LENGTH的节点将其固定
NSEL,S,LOC,X,0.5*LENGTH,0.5*LENGTH
NSEL,R,LOC,Y,0.5*LENGTH,0.5*LENGTH
F,ALL,FZ,FORCE
ALLSEL        !捕捉板的中心点并在中心点处施加集中力荷载
SOLVE   !求解
FINISH
/POST1   !进入后处理器
/DSC,,10
PLNSOL,U,Z,0,1 !绘图显示板的竖向变形
NSEL,ALL     !提取板的最大竖向变形
NSORT,U,Z,1,1   !将节点的位移绝对值以升序排序
*GET,MAXDEFLECTION,SORT,0,MAX  !提取位移最大值并赋给变量
NSEL,S,LOC,X,0
NSEL,A,LOC,X,LENGTH,LENGTH   !选择固定边节点
NSORT,S,EQV,1,1        !将节点等效应力的绝对值以升序排序
*GET,MAXSTRESS,SORT,0,MAX   !提取等效应力最大值并赋给变量
3楼2008-05-12 08:22:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cui9315

金虫 (小有名气)


结构静力分析--平面桁架分析

/PREP7 !进入前处理器
ET,1,LINK1   !选择单元
R,1,0.1   !定义实常数
MP,EX,1,30E6
MP,PRXY,1,0.3   !定义材料属性
N,1,0
N,2,4
N,3,8
N,4,12
N,5,0,3
N,6,4,3
N,7,8,3      !生成节点
E,1,2
E,2,3
E,3,4
E,4,7
E,3,7
E,2,7
E,2,6
E,2,5
E,1,5
E,5,6
E,6,7      !生成单元
FINISH
/SOLU     !进入求解器
D,1,UX
D,1,UY
D,5,UX     !实加位移约束
F,2,FY,-15
F,3,FY,-15
F,4,FY,-15     !施加集中力
SOLVE      !求解
/POST1     !进入能用后处理器
PRESOL,FORC    !列表显示反力
4楼2008-05-12 08:24:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zh_pan

木虫 (小有名气)


蛮好的,多谢搂主了
5楼2008-06-22 20:18:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 cui9315 的主题更新
☆ 无星级 ★ 一星级 ★★★ 三星级 ★★★★★ 五星级
普通表情 高级回复(可上传附件)
信息提示
请填处理意见