24小时热门版块排行榜    

查看: 798  |  回复: 3

521majie

铁虫 (小有名气)

[求助] 焊接命令流  多层  可用 求教一些问题

下面是焊接的一段命令流,有些不懂的地方,请各位大神指导一下:cry::cry::cry::cry:问题:cry::cry::cry::cry:该命令可用。另附件命令流一份
/PREP7                                                                       
ET, 1, PLANE77                                                               
ET, 2, SOLID90                                                               
V=0.005                                                                       
LENGTH=0.05                                                               
L_NUMBER=LENGTH/V                                               
MPTEMP, 1, 0, 300, 600, 1000, 1300, 2000                       
MPDATA, DENS, 1, 1, 7859, 7770, 7659, 7600, 6750, 6750
MPDATA, DENS, 2, 1, 7859, 7770, 7659, 7600, 6750, 6750
MPDATA, C, 1, 1, 450, 514, 967, 1370, 2800, 2000               
MPDATA, C, 2, 1, 450, 514, 967, 1370, 2800, 2000
MPDATA, KXX, 1, 1, 67, 53, 39, 31, 20, 20                       
MPDATA, KXX, 2, 1, 67, 53, 39, 31, 20, 20
RECT, 0, 0.10, 0, 0.01                                                       
K, 5, 0.002
K, 6, 0.002, 0.002
K, 7, 0.00662, 0.01
K, 8, 0.00339, 0.01112
K, 9, 0, 0.0115
LARC, 7, 9, 8
A, 1, 5, 6, 7, 9
AGEN, 2, 2
ASBA, 1, 2
AGLUE, ALL
K, 20, 0, -0.00385
CIRCLE, 20, 0.008,,,90
CIRCLE, 20, 0.012,,,90
ASBL, 3, 4
ASBL, 2, 5
ESIZE, 0.00075
SMRTSIZE, 7
MSHAPE, 1
AMESH, 3, 5, 1
ESIZE, 0.003
AMESH, 1                                                                       
EXTOPT, ESIZE, L_NUMBER
EXTOPT, ACLEAR, 1
MAT, 1
VEXT, 3, 5, 1,,,LENGTH                                               
MAT, 2
VEXT, 1,,,,,LENGTH
NUMMRG, NODE                                                       
ALLS
FINISH
/SOLU                                                                               
AUTOTS, ON                                                               
OUTPR, NSOL, ALL                                                       
OUTRES, NSOL, ALL
KBC, 1                                                                          
ANTYPE, TRANS                                                       
TIMINT, OFF                                                               
NSUBST, 4                                                                       
D, ALL, TEMP, 20                                                       
TIME, 0.01                                                                       
SOLVE                                                                       
ESEL, S, MAT,,1                                                               
EKILL, ALL        :cry::cry::cry:        焊缝区杀死之后,又进行的”ESEL,ALL“选取的是哪?:cry::cry::cry:                                                       
ESEL, ALL
TIME, 0.02
SOLVE
TIMINT, ON, THER                                                       
DDELE, ALL, TEMP                                                       
TIME=0.02                                                                       
*DIM, QQ, ARRAY, 8          :cry::cry::cry:        8是怎么来的??:cry::cry::cry:                                       
*DIM, E_NODE, ARRAY, 20                                               
*GET, ELEM_MAX, ELEM, 0, NUM, MAX  :cry::cry::cry:        所有的GET命令是针对的焊缝区吗??:cry::cry::cry:               
*GET, ELEM_MIN, ELEM, 0, NUM, MIN                       
*GET, NODE_MAX, NODE, 0, NUM, MAX                       
*GET, NODE_MIN, NODE, 0, NUM, MIN                       
*DIM, NODE_AVE, ARRAY, NODE_MAX                       
*DO, J, NODE_MIN, NODE_MAX                                       
         ALLS
         *IF, NSEL(J), EQ, 1, THEN
         NSEL, S,,,J                                                               
         ESLN, S                                                                       
         *GET, NODE_AVE(J), ELEM, 0, COUNT                       
         *ENDIF
*ENDDO                                                                       
ALLS
*DO, KK, 1, 3                                                               
R=0.02                                                                               
*IF, KK, EQ, 1, THEN                                                       
         Q=3200*0.7                                                               
         QMAX=3*Q/3.1415926/R/R                                       
         XC= 0.11190E-02                                                       
         YC= 0.21451E-02                                                        
         V_NUM=2                                                                
         TIME_INC=LENGTH/L_NUMBER/V                       
*ENDIF
*IF, KK, EQ, 2, THEN                                                       
         Q=4500*0.7
         QMAX=3*Q/3.1415926/R/R
         XC= 0.20373E-02
         YC= 0.60454E-02
         V_NUM=1
         TIME_INC=LENGTH/L_NUMBER/1.5/V
*ENDIF
*IF, KK, EQ, 3, THEN                                                       
         Q=5800*0.7
         QMAX=3*Q/3.1415926/R/R
         XC= 0.29574E-02
         YC= 0.94733E-02
         V_NUM=3
         TIME_INC=LENGTH/L_NUMBER/2/V
*ENDIF
*DO, J, 1, L_NUMBER                                                       
         SFEDELE, ALL, ALL, HFLUX                                       
         VSEL, S,,,V_NUM                                                       
         ESLV, S, 1                                                               
         NSEL, R, LOC, Z, (J-1)*LENGTH/L_NUMBER+0.001, J*LENGTH/L_NUMBER-0.001
                                                                                       
ESLN, R                                                                       
EALIVE, ALL                                                               
ALLS
ZC=(J-0.5)*LENGTH/L_NUMBER                                       
*DO, I, ELEM_MIN, ELEM_MAX                                       
         *IF, ESEL(I), EQ, 1, THEN
          ESEL, S,,,I                                                               
         *DO, K, 1, 8                                                               
          *GET, E_NODE(K), ELEM, I, NODE, K                        !
         SS=E_NODE(K)
DISP=SQRT((NX(SS)-XC)*(NX(SS)-XC)+(NY(SS)-YC)*(NY(SS)-YC)+(NZ(SS)-ZC)*(NZ(SS)-ZC))                                                                                        
EEE=3*DISP*DISP/R/R                                                
*IF, EEE, LT, 25, THEN
         QQ(K)=QMAX*EXP(-EEE)/NODE_AVE(E_NODE(K))
*ELSE
         QQ(K)=0
*ENDIF
*ENDDO
*IF, QQ(1)+QQ(2)+QQ(3)+QQ(4), NE, 0, THEN    :cry::cry::cry::cry:从这开始*IF, QQ是什么意思:cry::cry::cry:
         SFE, I, 1, HFLUX,,QQ(1), QQ(2), QQ(3), QQ(4)               
*ENDIF
*IF, QQ(1)+QQ(2)+QQ(5)+QQ(6), NE, 0, THEN
         SFE, I, 2, HFLUX,,QQ(1), QQ(2), QQ(6), QQ(5)                
*ENDIF
*IF, QQ(6)+QQ(2)+QQ(3)+QQ(7), NE, 0, THEN
         SFE, I, 3, HFLUX,,QQ(2), QQ(3), QQ(7), QQ(6)                
*ENDIF
*IF, QQ(1)+QQ(4)+QQ(5)+QQ(7), NE, 0, THEN
         SFE, I, 5, HFLUX,,QQ(1), QQ(4), QQ(7), QQ(5)                
*ENDIF
*IF, QQ(5)+QQ(6)+QQ(7)+QQ(8), NE, 0, THEN
         SFE, I, 6, HFLUX,,QQ(5), QQ(6), QQ(7), QQ(8)                
*ENDIF
         ALLS
*ENDIF
*ENDDO                                                                       
ALLS
ASEL, S, LOC, Z, 0                                                       
ASEL, A, LOC, Z, LENGTH
ASEL, A,,,20, 22, 1
ASEL, A,,,17
SFA, ALL, 1, CONV, 30, 20                                               
ALLS
TIME=TIME+TIME_INC                                               
NSUBST, 5, 10, 3                                                               
LNSRCH, ON                                                               
TIME, TIME                                                               
SOLVE
*ENDDO                                                                       
TIME=TIME+3600                                                       
TIME, TIME
SFEDELE, ALL, ALL, HFLUX                                       
SOLVE                                                                       
*ENDDO                                                                       
SAVE                                                                               
FINI
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

521majie

铁虫 (小有名气)

各位大神,来看看吧
2楼2014-04-27 20:47:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

521majie

铁虫 (小有名气)

各位大神,来看看吧
3楼2014-04-28 15:18:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

521majie

铁虫 (小有名气)

4楼2014-04-29 08:39:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 521majie 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +4 Ldrop2023 2026-08-13 4/200 2026-08-14 14:50 by Tide man
[基金申请] 好奇怪的filecode +6 布布和一二 2026-08-08 7/350 2026-08-14 13:38 by Equinoxhua
[基金申请] filecode +5 cratir 2026-08-14 9/450 2026-08-14 12:25 by 医学老男孩
[论文投稿] 职称评审,求友友推荐见刊最快的期刊 +5 工厂打螺丝 2026-08-08 5/250 2026-08-14 11:03 by 玖戈弋
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +5 启萌科技 2026-08-12 13/650 2026-08-14 10:53 by lnjx2024
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] 关于Filecode分析方法 +9 majunge000 2026-08-10 12/600 2026-08-13 23:20 by iwuli
[文学芳草园] 阿姨 +4 汪汪锅 2026-08-09 4/200 2026-08-13 19:43 by arzu_hma
[基金申请] 重要来源:本周末出结果 +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
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 分享一下我之前已中青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 布布和一二 2026-08-10 10/500 2026-08-12 09:12 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
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
信息提示
请填处理意见