24小时热门版块排行榜    

查看: 684  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料学求调剂 +5 Stella_Yao 2026-03-20 5/250 2026-03-24 23:44 by a496806998
[考研] 材料专硕找调剂 +5 哈哈哈吼吼吼哈 2026-03-23 5/250 2026-03-24 19:07 by 了了了了。。
[考研] 307求调剂 +5 超级伊昂大王 2026-03-24 5/250 2026-03-24 15:46 by 星空星月
[考研] 344求调剂 +3 desto 2026-03-24 3/150 2026-03-24 10:09 by 搏击518
[考研] 276求调剂。有半年电池和半年高分子实习经历 +9 材料学257求调剂 2026-03-23 10/500 2026-03-24 07:36 by wangy0907
[考研] 生物学一志愿985,分数349求调剂 +6 zxts12 2026-03-21 9/450 2026-03-23 18:37 by macy2011
[考研] 一志愿南京理工大学085701资源与环境302分求调剂 +5 葵梓卫队 2026-03-18 7/350 2026-03-23 16:26 by lingjue
[考研] 北科281学硕材料求调剂 +8 tcxiaoxx 2026-03-20 9/450 2026-03-23 12:16 by tcxiaoxx
[考研] 289材料与化工(085600)B区求调剂 +3 这么名字咋样 2026-03-22 4/200 2026-03-22 17:56 by 云民大李老师
[考研] 一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。 +3 晨昏线与星海 2026-03-20 3/150 2026-03-22 16:00 by ColorlessPI
[考研] 298求调剂一志愿211 +3 上岸6666@ 2026-03-20 3/150 2026-03-22 15:50 by ColorlessPI
[考博] 招收博士1-2人 +3 QGZDSYS 2026-03-18 4/200 2026-03-22 10:25 by QGZDSYS
[考研] 一志愿南大,0703化学,分数336,求调剂 +3 收到VS 2026-03-21 3/150 2026-03-21 18:42 by 学员8dgXkO
[考研] 材料学硕333求调剂 +3 北道巷 2026-03-18 3/150 2026-03-21 18:17 by 学员8dgXkO
[考研] 一志愿武理材料305分求调剂 +6 想上岸的鲤鱼 2026-03-18 7/350 2026-03-21 01:03 by JourneyLucky
[考研] 296求调剂 +6 www_q 2026-03-18 10/500 2026-03-20 23:56 by JourneyLucky
[考研] 一志愿武汉理工材料工程专硕调剂 +9 Doleres 2026-03-19 9/450 2026-03-20 22:36 by JourneyLucky
[考研] 329求调剂 +9 想上学吖吖 2026-03-19 9/450 2026-03-20 22:01 by luoyongfeng
[考研] A区线材料学调剂 +5 周周无极 2026-03-20 5/250 2026-03-20 21:33 by laoshidan
[考研] 材料考研调剂 +3 xwt。 2026-03-19 3/150 2026-03-19 11:22 by w沐阳w
信息提示
请填处理意见