24小时热门版块排行榜    

查看: 2168  |  回复: 9

Mr-Wind

新虫 (初入文坛)

[求助] 求大神指点翻译此ANSYS命令的意思?本人是菜鸟,还望大神说明白点。 已有3人参与

finish
/clear
/filname,CCNBD
/prep7
et,1,solid95
et,2,plane82
mp,ex,1,17.67e9
mp,prxy,1,0.21
mp,dens,1,3055
step=1340

ho=0.056  !试样厚度  不是这个试样的几何参数
p=0.1477  !试样直径

q=0.48    !无量纲裂纹长度
Am=0.5*p*q  !临界裂纹长度
xm=0.5*ho+0.0135-sqrt(0.0485*0.0485-Am*Am)  !裂纹前沿宽度
cyl4,,,,,p/2,90,ho/2
!kdist,p
block,,0.03,,0.06,,xm          !15.2裂纹前沿宽度   
   
block,,0.03,,0.06,xm,ho/2
vplot
/pnum,volu,1
!HELP,VOVLAP

block,,0.014,0.024,0.054,0,ho/2



vovlap,all
wprota,,,90
cyl4,-1/2*ho-0.0135,,0.0485,360
adele,1
lplot
/pnum,line,1
ldele,2,,,1
ldele,5,6,1,1
lovlap,1,48
!lsel,s,p
!HELP,LOVLAP
ldele,2,,,1
ldele,6,,,1
ldele,9,,,1
/pnum,kp,1
lang,34,16,90
wpcsys,-1,0
kwpave,8

cyl4,,,0.004,-90,,90

vdrag,1,,,,,,2,5
vplot
lplot
!ksel,s,p
kwpave,22
!vplo
vsbw,2
vdele,4,,,1
ldele,5,,,1
!lplot
!lovlap,42,9
!ldele,31,,,1
!ldele,26,,,1
!ldele,29,,,1
!lsel,s,p
!ldele,2,,,1
!lsel,s,p
!ldele,30,,,1
!lsel,s,p
vplot
vovlap,all
kplot
lplot
!ksel,s,p
ldele,2,,,1
aplot

lsel,s,loc,z,0
lplot

lesize,67,,,2,,,,,1
lesize,35,,,4,,,,,1

lesize,11,,,9,,,,,1
lesize,69,,,8,,,,,1

lesize,37,,,4,,,,,1

lesize,36,,,8,,,,,1

lesize,12,,,18,,,,,1
lesize,65,,,8,,,,,1
mshkey,0
mshape,0,2d
aplot
!amesh,42
!mshkey,0
amesh,42
aplot

allsel

lesize,21,,,4,,,,,1




!vsel,s,p
vsweep,8
allsel
aplot
lesize,60,,,8,,,,,1

lplot
vplot
!vsel,s,p
vsweep,9

aplot
lsel,s,loc,z,0
lplot
!lesize,62,,,3,,,,,1
!lesize,62,,,4,,,,,1
!lesize,62,,,4,,,,,0.25
!lesize,62,,,4,0.25,,,,1
!lesize,62,,,3,0.25,,,,1
lesize,62,,,3,,,,,1
lesize,3,,,24,,,,,1

!lesize,3,,,18,,,,,1
!lesize,61,,,10,0.25,,,,1
lesize,61,,,10,,,,,1
apot
aplot
lplot
mshkey,0
mshape,0,2d
aplot
amesh,35
!aclear,35
lplot

allsel

vsweep,7
!elist
vplot
lplot
lesize,9,,,8,0.25,,,,1
lesize,10,,,8,4,,,,1


lesize,6,,,12,,,,,1
allsel
kscon,19,0.004/15,1,8,1
amesh,1
lesize,23,,,18,,,,,1
lesize,75,,,30,,,,,1
vsweep,2
lplot
vsweep,4
mshkey,0
mshape,1,3d

esize,0.003
vmesh,10
vmesh,11

esel,s,type,,2
aclear,all
allsel,all
numcmp,all

aplot
wpcsys,-1,0
/pnum,area,1


vsymm,y,all,,,,0,0        !镜像产生网格
eplot
aplot
asel,s,loc,y,0
!kplot
!ksel,s,loc,y,0
!nummrg,kp
allsel
allsel
nsel,s,loc,y,0
nplot
/pnum,node,1
nummrg,node
allsel


aplot
kplot
ksel,s,loc,y,0
nummrg,kp
kplot
lplot
lsel,s,loc,y,0
!lsel,s,p
aplot
asel,s,loc,y,0
allsel
eplot
/pnum,node,0

numcmp,all



lsel,s,,,5
NSLL,S,1          !耦合Y方向位移
nplot
cp,1,uy,all

allsel
aplot

lsel,s,,,92
NSLL,S,1          !耦合Y方向位移
nplot
cp,2,uy,all

dl,92,,uy
asel,s,loc,z,0
DA,ALL,symm
allsel,all

asel,s,,,18,38,20
asel,a,,,12,42,30
asel,a,,,51,61,10
asel,a,,,3,73,70      !施加面对称约束
asel,a,,,29,32,3
asel,a,,,66,77,11
asel,a,,,14,48,34
da,all,symm
/PNUM,NODE,0
allsel

/solu                               !求解



antype,trans
trnopt,full
outr,all,all

*dim,LF,array,step
!/input,G:\fanhong\21\21,txt   !50点光滑荷载

/input,E:\E\HEZAI\21,txt



*do,i,5,step,5
               !节点上施加集中荷载
    lsel,s,,,5
    nsll,s,1   
    kbc,0                  
                              
    f,all,fy,-LF(i)/(25*4)       !1/4荷载,1/8模型     
    time,i*1e-7
    !lswrite,i
    allsel  
    solve
*enddo
!lssolve,1,step,1
finish
save





/post1

d=distnd(15967,15983)
pi=acos(-1)
co=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d))/1e6   !系数改



/post26
numvar,200
nsol,2,15983,u,x     !uB(t) m  原点15967
nsol,3,15984,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co         !K1

lines,20000  



pi=acos(-1)


b=17232
a=17214
p=2                     !求解原点16836到16850
q=3
s=4
k=5
*do,m,16836,16850,2             !m原点

    d=distnd(b,m)
    co=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d))/1e6   !系数改
    nsol,p,b,u,x     !uB(t) b  原点14692  变量用p2

   
    nsol,q,a,u,x     !uA(t)  a  q3
    add,s,p,q,,,,,8,-1        !8*uB(t)-uA(t)  s4
    add,k,s,,,,,,co         !K1  k5

    p=p+4
    q=q+4
    s=s+4
    k=k+4
    b=b-1
    a=a-2

*enddo







!pi=acos(-1)
!b=15598
!a=15597
!p=2                     !求解原点17884到17900
!q=3
!s=4
!k=5
*do,m,17884,17900,2             !m原点

    d=distnd(b,m)
    co=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d))/1e6   !系数改
    nsol,p,b,u,x     !uB(t) b  原点14692  变量用p2

   
    nsol,q,a,u,x     !uA(t)  a  q3
    add,s,p,q,,,,,8,-1        !8*uB(t)-uA(t)  s4
    add,k,s,,,,,,co         !K1  k5

    p=p+4
    q=q+4
    s=s+4
    k=k+4
    b=b-1
    a=a-2

*enddo





d=distnd(16834,17233)           !求解16834
!pi=acos(-1)
co=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d))/1e6   !系数改



!/post26
nsol,2,17233,u,x     !uB(t) m  
nsol,3,17234,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co         !K1

lines,20000  





















d61=distnd(15561,15957)     !原点15561
co61=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d61))/1e6   !系数改
nsol,2,15957,u,x     !uB(t)   
nsol,3,15939,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co61         !K1
lines,20000




d63=distnd(15563,15956)     !原点15563
co63=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d63))/1e6   !系数改
nsol,2,15956,u,x     !uB(t)   
nsol,3,15937,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co63         !K1
lines,20000



d65=distnd(15565,15955)     !原点15565
co65=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d65))/1e6   !系数改
nsol,2,15955,u,x     !uB(t)   
nsol,3,15935,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co65         !K1
lines,20000



d67=distnd(15567,15954)     !原点15567
co67=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d67))/1e6   !系数改
nsol,2,15954,u,x     !uB(t)   
nsol,3,15933,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co67         !K1
lines,20000



d69=distnd(15569,15953)     !原点15569
co69=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d69))/1e6   !系数改
nsol,2,15953,u,x     !uB(t)   
nsol,3,15931,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co69         !K1
lines,20000



d71=distnd(15571,15952)     !原点15571
co71=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d71))/1e6   !系数改
nsol,2,15952,u,x     !uB(t)   
nsol,3,15929,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co71         !K1
lines,20000



d73=distnd(15573,15951)     !原点15573
co73=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d73))/1e6   !系数改
nsol,2,15951,u,x     !uB(t)   
nsol,3,15927,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co73         !K1
lines,20000



d75=distnd(15575,15950)     !原点15575
co75=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d75))/1e6   !系数改
nsol,2,15950,u,x     !uB(t)   
nsol,3,15925,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co75         !K1
lines,20000



d09=distnd(16609,15949)     !原点16609
co09=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d09))/1e6   !系数改
nsol,2,15949,u,x     !uB(t)   
nsol,3,15923,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co09         !K1
lines,20000



d11=distnd(16611,15948)     !原点16611
co11=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d11))/1e6   !系数改
nsol,2,15948,u,x     !uB(t)   
nsol,3,15921,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co11         !K1
lines,20000



d13=distnd(16613,15947)     !原点16613
co13=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d13))/1e6   !系数改
nsol,2,15947,u,x     !uB(t)   
nsol,3,15919,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co13        !K1
lines,20000



d15=distnd(16615,15946)     !原点16615
co15=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d15))/1e6   !系数改
nsol,2,15946,u,x     !uB(t)   
nsol,3,15917,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co15        !K1
lines,20000



d17=distnd(16617,15945)     !原点16617
co17=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d17))/1e6   !系数改
nsol,2,15945,u,x     !uB(t)   
nsol,3,15915,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co17        !K1
lines,20000



d19=distnd(16619,15944)     !原点16619
co19=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d19))/1e6   !系数改
nsol,2,15944,u,x     !uB(t)   
nsol,3,15913,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co19        !K1
lines,20000



d21=distnd(16621,15943)     !原点16621
co21=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d21))/1e6   !系数改
nsol,2,15943,u,x     !uB(t)   
nsol,3,15911,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co21        !K1
lines,20000



d23=distnd(16623,15942)     !原点16623
co23=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d23))/1e6   !系数改
nsol,2,15942,u,x     !uB(t)   
nsol,3,15909,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co23        !K1
lines,20000



d25=distnd(16625,15941)     !原点16625
co25=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d25))/1e6   !系数改
nsol,2,15941,u,x     !uB(t)   
nsol,3,15907,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co25        !K1
lines,20000



d59=distnd(15559,15958)     !原点15559
co59=sqrt(2*pi)*17.67e9/(24*(1-0.21*0.21)*sqrt(d59))/1e6   !系数改
nsol,2,15958,u,x     !uB(t)   
nsol,3,15959,u,x     !uA(t)
add,4,2,3,,,,,8,-1        !8*uB(t)-uA(t)
add,5,4,,,K1,,,co59        !K1
lines,20000

/post1

cs,15,0,14692,14707,14807           !i为局部坐标系11的原点
csys,15
RSYS,15
PATH,i,3
PPATH,1,14692
ppath,2,14708
ppath,3,14709               

KCALC,,,1,1
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

在路上
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

凌云1314

金虫 (著名写手)

找本ansys看看就知道了,这是命令流

[ 发自小木虫客户端 ]
朔风凌云,终不离兮
2楼2015-07-02 00:54:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cumtcp

金虫 (初入文坛)

【答案】应助回帖

感谢参与,应助指数 +1
ansys输入运行就大概知道,或者直接学习命令流

[ 发自小木虫客户端 ]
3楼2015-07-02 08:36:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shgao20

专家顾问 (职业作家)

把你不懂的地方标注出来,总不能要别人每一句都进行说明吧。
4楼2015-07-02 21:14:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

独孤神宇

版主 (知名作家)

【答案】应助回帖

感谢参与,应助指数 +1
你这个问题也忒那个吧,难道每一句都要解释。
不懂的命令 可以先百度一下子。。
数值计算
5楼2015-07-03 11:00:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhchgf8

金虫 (小有名气)

最好借一本这方面的书,按照每步操作来对应命令流,多看两次就会了解
6楼2015-07-04 10:15:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Mr-Wind

新虫 (初入文坛)

引用回帖:
6楼: Originally posted by zhchgf8 at 2015-07-04 10:15:13
最好借一本这方面的书,按照每步操作来对应命令流,多看两次就会了解

谢啦
在路上
7楼2015-07-04 11:29:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Mr-Wind

新虫 (初入文坛)

引用回帖:
6楼: Originally posted by zhchgf8 at 2015-07-04 10:15:13
最好借一本这方面的书,按照每步操作来对应命令流,多看两次就会了解

多谢赐教
在路上
8楼2015-07-04 11:38:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

金华岁月

金虫 (著名写手)

【答案】应助回帖

打开帮助文件,一条一条输入,查看意思,结合百度

[ 发自小木虫客户端 ]
金华岁月谁与共?樱花树下,飘雪如梦......
9楼2015-07-04 22:09:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Mr-Wind

新虫 (初入文坛)

引用回帖:
9楼: Originally posted by 金华岁月 at 2015-07-04 22:09:25
打开帮助文件,一条一条输入,查看意思,结合百度

多谢赐教
在路上
10楼2015-07-05 14:52:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 Mr-Wind 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +32 医学老男孩 2026-08-13 74/3700 2026-08-16 21:05 by 医学老男孩
[论文投稿] 岩土工程学报什么时候才能终审完呐 25+3 yeager111 2026-08-10 4/200 2026-08-16 20:42 by tfang
[基金申请] 时间戳又变了8-15 +13 archvillain 2026-08-15 25/1250 2026-08-16 20:13 by zhaosm1982
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +3 Tide man 2026-08-14 3/150 2026-08-16 17:47 by jurkat.1640
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +9 Ldrop2023 2026-08-13 9/450 2026-08-16 13:24 by wukun_007
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[基金申请] 小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊 +12 Tide man 2026-08-10 13/650 2026-08-15 16:34 by 氺木
[基金申请] 是这周出结果还是下周出结果? +4 yuleib84 2026-08-11 4/200 2026-08-14 23:05 by lfy8008
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[基金申请] filecode +15 documentary 2026-08-10 17/850 2026-08-14 10:08 by kissu88
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 帮忙看看fileCode +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 什么时候出结果,有咨询渠道??? +3 Tide man 2026-08-11 3/150 2026-08-11 17:54 by kudofaye
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
信息提示
请填处理意见