24小时热门版块排行榜    

查看: 2111  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

leo545

金虫 (小有名气)

[求助] 焊接热源的施加问题? 已有1人参与

如何修改以下程序,使焊接热源的起始点不位于坐标原点而在某一坐标值?
*DIM,FLUX2,TABLE,MAX_X,MAX_Y,MAX_TIME,X,Y,TIME

*DO,K,1,MAX_TIME,1

*DO,I,1,MAX_X,1
FLUX2(I,0,K)=(I-1)*LSIZE
*ENDDO

*DO,J,1,MAX_Y,1
FLUX2(0,J,K)=(J-1)*LSIZE
*ENDDO

*DO,I,1,MAX_X,1
*DO,J,1,MAX_Y,1
XCENTER=0
YCENTER=v*(K-1)*TINC

LL=sqrt(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE-YCENTER)**2)
Q=200000!热流密度

*IF,LL,LE,R,THEN
FLUX2(I,J,K)=Q
*ELSE
FLUX2(I,J,K)=0
*ENDIF
*ENDDO

*ENDDO

FLUX2(0,0,K)=(K-1)*TINC

*ENDDO
回复此楼

» 猜你喜欢

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

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

翔云之鹏

银虫 (初入文坛)

这个真专业
5楼2012-03-26 10:52:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

heziling27

金虫 (正式写手)

【答案】应助回帖

xiegangmai: 讨论请勿选“应助回帖” 2011-07-16 11:28:01
我是做工艺的,这个还真的不清楚
2楼2011-07-16 10:04:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ketty008

新虫 (初入文坛)

【答案】应助回帖

★
感谢参与,应助指数 +1
xiegangmai(金币+1): 谢谢应助! 2011-12-20 23:27:20
使用局部坐标,将坐标原点设在自己特定的位置即可。命令为
local,11,x,y,z,,,1,1具体格式参考帮助文件
4楼2011-12-20 14:59:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

rizen

金虫 (著名写手)

【答案】应助回帖

LL=sqrt(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE-YCENTER)**2)
改为

LL=sqrt(((I-1)*LSIZE-XCENTER-X0)**2+((J-1)*LSIZE-YCENTER-Y0)**2)
(X0,Y0)为你的起始点坐标
6楼2014-01-08 04:22:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 FChKX8meu1ds 2026-11-09 9/450 2026-11-11 04:54 by Z7qfCsdIiD1T
[考博] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 FChKX8meu1ds 2026-11-09 5/250 2026-11-11 04:40 by Z7qfCsdIiD1T
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 cqv1zKnzd7hr 2026-11-09 7/350 2026-11-11 04:21 by Z7qfCsdIiD1T
[考研] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 cqv1zKnzd7hr 2026-11-09 6/300 2026-11-11 04:12 by Z7qfCsdIiD1T
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 0TEMgxdT1eIw 2026-11-09 6/300 2026-11-11 04:10 by Z7qfCsdIiD1T
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 FChKX8meu1ds 2026-11-09 6/300 2026-11-11 01:54 by Z7qfCsdIiD1T
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 0TEMgxdT1eIw 2026-11-09 6/300 2026-11-11 01:13 by Z7qfCsdIiD1T
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 zSbvVX9JFl9J 2026-11-09 5/250 2026-11-11 00:59 by Z7qfCsdIiD1T
[教师之家] 延安大学回应“副教授留绝笔信”:确已离世,正核实举报内容 +4 yexuqing 2026-11-04 6/300 2026-11-10 11:13 by susizheng
[文学芳草园] 厉娜 +3 张丹枫1991 2026-11-09 5/250 2026-11-09 16:53 by 张丹枫1991
[考研] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 15/750 2026-11-09 13:19 by Equinoxhua
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +6 5sJFDKp2kwuI 2026-11-06 14/700 2026-11-09 11:52 by GwrQVVR6Oenx
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 5sJFDKp2kwuI 2026-11-06 15/750 2026-11-09 11:41 by GwrQVVR6Oenx
[考研] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 5sJFDKp2kwuI 2026-11-06 12/600 2026-11-09 06:32 by l48hFd8Nwae2
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 5sJFDKp2kwuI 2026-11-06 8/400 2026-11-08 23:01 by l48hFd8Nwae2
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 16:12 by 5sJFDKp2kwuI
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +4 ttH3f1oA6ace 2026-11-04 11/550 2026-11-06 16:10 by 5sJFDKp2kwuI
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 16/800 2026-11-06 05:00 by qL1cU46YIdK0
[考博] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 7/350 2026-11-06 02:13 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 hNpp4Y2CGvSC 2026-11-04 12/600 2026-11-06 01:53 by qL1cU46YIdK0
信息提示
请填处理意见