24小时热门版块排行榜    

查看: 1083  |  回复: 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 的主题更新
☆ 无星级 ★ 一星级 ★★★ 三星级 ★★★★★ 五星级
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 j5mmowWXNWxv 2026-09-05 4/200 2026-09-06 12:49 by eObJPa4gWmp6
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 j5mmowWXNWxv 2026-09-05 3/150 2026-09-06 12:49 by eObJPa4gWmp6
[考博] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 j5mmowWXNWxv 2026-09-05 4/200 2026-09-06 12:29 by eObJPa4gWmp6
[找工作] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 7/350 2026-09-06 11:40 by eObJPa4gWmp6
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 7/350 2026-09-06 11:20 by eObJPa4gWmp6
[基金申请] 科研人应该花精力去思考如何解决问题,而不是去凝练问题 +10 瞬息宇宙 2026-09-01 19/950 2026-09-06 11:15 by jiangxuan2004
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-04 7/350 2026-09-06 11:00 by eObJPa4gWmp6
[论文投稿] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 jPDp0sc2B7zQ 2026-09-04 8/400 2026-09-06 11:00 by eObJPa4gWmp6
[考研] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 jPDp0sc2B7zQ 2026-09-05 4/200 2026-09-06 07:20 by E1iiBLMU2XnD
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +6 7ZYIEW2YWn72 2026-09-04 9/450 2026-09-06 06:00 by E1iiBLMU2XnD
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +8 CRJ0Aq2FtVH0 2026-09-03 15/750 2026-09-06 05:48 by E1iiBLMU2XnD
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 jPDp0sc2B7zQ 2026-09-05 5/250 2026-09-06 02:39 by E1iiBLMU2XnD
[基金申请] 面上没中,邀请各位路过的虫友分析一下分数 +12 jackleilei 2026-09-03 13/650 2026-09-05 18:10 by fireguard
[文学芳草园] 两块石头 +6 阿美_Lml888 2026-09-03 8/400 2026-09-05 13:52 by 阿美_Lml888
[文学芳草园] 初秋的晨风 +4 阿美_Lml888 2026-09-04 6/300 2026-09-05 13:51 by 阿美_Lml888
[基金申请] 学科评审组评审是指会评吗? +6 瞬息宇宙 2026-08-31 9/450 2026-09-05 13:11 by haizai99
[博后之家] 广西大学-广州大学招聘博士后 欢迎广大优秀人才!!! +4 SCSIOyxguo 2026-09-03 7/350 2026-09-05 10:39 by Honglianlian
[硕博家园] Ei源刊怎么投 +4 Fengshun9711 2026-09-04 4/200 2026-09-04 19:30 by 研途知予
[硕博家园] 哈尔滨工业大学韩晓军教授课题组招收2027年硕士推免生及博士研究生 +3 灯灯灯灯DDDD 2026-09-03 3/150 2026-09-03 21:22 by 科研皮皮猪
[基金申请] 要骂人了,新模版改版就是要淡化问题凝练这种虚的东西,结果有个评委还在说凝练得不够 +9 瞬息宇宙 2026-08-31 17/850 2026-09-02 14:04 by anjeeshine
信息提示
请填处理意见