24小时热门版块排行榜    

查看: 513  |  回复: 0

detective604

新虫 (初入文坛)

[求助] 求大神如何对单齿齿轮划分网格,要求使用命令流。。。

/PREP7
M=4E-3                    
PI=3.1415926              
Z=16                     
ALFA=20/180*PI            
Ha=1                     
C=0.25                     
D=M*Z                     
Db=M*Z*COS(ALFA)           
Rb=Db/2                    
Df=D-2*(Ha+C)*M            
Rf=Df/2                    
Da=D+2*Ha*M               
Ra=Da/2                    
ALFA_Ding=ACOS(Rb/Ra)  
SITA_Ding=(TAN(ALFA_Ding)-ALFA_Ding)*180/PI
SITA=(tan(ALFA)-ALFA)*180/PI  
              
ET,1,PLANE42
ET,2,SOLID95
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,2.06E11
MPDATA,PRXY,1,,0.3  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,7850

ALFA_Dingn=alfa_ding/10   
*DIM,AL,ARRAY,10,1         
*DIM,SI,ARRAY,9,1         
*DIM,R,ARRAY,9,1         
CSYS,1                    
AL(1,1)=0               

K,100,Rb,0,0            
*DO,i,1,9,1               
AL(i+1,1)=AL(i,1)+ALFA_Dingn
SI(i,1)=(tan(AL(i+1,1))-AL(i+1,1))*180/PI
R(i,1)=Rb/cos(AL(i+1,1))
/prep7
K,i+100,R(i,1),si(i,1)
*enddo                          
k,110,ra,sita_ding           
bsplin,all                     

FLST,2,2,8  
FITEM,2,0,0,0   
FITEM,2,Rf,0,0  
CIRCLE,P51X, , , ,360, ,

L,100,1

LCOMB,1,6

LFILLT,1,5,0.38*m, ,
LDELE,2, 5,1 ,1

LCOMB,1,6

LOCAL,11,0,0,0,0,SITA+90/Z, , ,1,1,  
CSYS,11,
LSYMM,Y,1,  

FLST,2,2,8  
FITEM,2,0,0,0   
FITEM,2,RF,0,0  
CIRCLE,P51X

FLST,2,2,8  
FITEM,2,0,0,0   
FITEM,2,RA,0,0  
CIRCLE,P51X

ldele,7,10
numcmp,kp
k,1000,0,0,0
larc,1,21,1000,ra
lcomb,3,6
larc,2,6,1000,rf
lsbl,3,6

CSYS,1
flst,2,7,4
fitem,2,1
fitem,2,7
fitem,2,2
fitem,2,8
fitem,2,4
fitem,2,5
fitem,2,9
AL,P51X

PCIRC,0.4*RA, ,0,360,  
ASBA,       1,       2  

TYPE,1
LESIZE,1,,,15,,,,,1
LESIZE,7,,,8,,,,,1
LESIZE,2,,,15,,,,,1
LESIZE,8,,,30,,,,,1
LESIZE,4,,,30,,,,,1
LESIZE,5,,,30,,,,,1
LESIZE,9,,,30,,,,,1
LESIZE,3,,,15,,,,,1
LESIZE,11,,,15,,,,,1
LESIZE,10,,,15,,,,,1
LESIZE,6,,,15,,,,,1
LESIZE,14,,,15,,,,,1
LESIZE,15,,,15,,,,,1
LESIZE,12,,,15,,,,,1
LESIZE,13,,,15,,,,,1

MSHAPE,0,2D
MSHKEY,0
AMESH,3

VOFFST,3,1.5E-2, ,


finish

求大神如何对单齿齿轮划分网格,要求使用命令流。。。
单齿.JPG
回复此楼

» 猜你喜欢

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

智能机器人

Robot (super robot)

我们都爱小木虫

相关版块跳转 我要订阅楼主 detective604 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿郑大材料学硕298分,求调剂 +5 wsl111 2026-03-01 5/250 2026-03-01 23:45 by 暮雨星晴
[考研] 材料化工调剂 +12 今夏不夏 2026-03-01 13/650 2026-03-01 23:32 by L135790
[考研] 0856材料与化工,270求调剂 +6 YXCT 2026-03-01 6/300 2026-03-01 23:21 by 向上的胖东
[考研] 0856求调剂285 +10 吕仔龙 2026-02-28 10/500 2026-03-01 21:37 by 公瑾逍遥
[考研] 0805总分292,求调剂 +7 幻想之殇 2026-03-01 7/350 2026-03-01 21:22 by 公瑾逍遥
[考研] 0856材料求调剂 +11 hyf hyf hyf 2026-02-28 12/600 2026-03-01 18:57 by 18137688336
[考研] 295求调剂 +7 19171856320 2026-02-28 7/350 2026-03-01 18:54 by 18137688336
[考博] 26申博 +4 想申博! 2026-02-26 6/300 2026-03-01 17:32 by 想申博!
[考研] 328求调剂 +3 aaadim 2026-03-01 5/250 2026-03-01 17:29 by njzyff
[考研] 化工专硕348,一志愿985求调剂 +5 弗格个 2026-02-28 8/400 2026-03-01 17:25 by sunny81
[考研] 化工专硕342,一志愿大连理工大学,求调剂 +3 kyf化工 2026-02-28 4/200 2026-03-01 16:49 by yywzz
[考研] 285求调剂 +8 满头大汗的学生 2026-02-28 8/400 2026-03-01 16:47 by caszguilin
[基金申请] 刚录用,没有期刊号,但是在线可看的论文可以放为代表作吗 10+3 arang1 2026-03-01 3/150 2026-03-01 16:43 by babero
[考研] 313求调剂 +3 水流年lc 2026-02-28 3/150 2026-03-01 16:01 by 新能源达人
[考研] 课题组接收材料类调剂研究生 +3 gaoxiaoniuma 2026-02-28 4/200 2026-03-01 14:30 by jjj三跨
[考研] 调剂 +3 简木ChuFront 2026-02-28 3/150 2026-03-01 11:46 by 王伟要上岸啊
[考博] 博士自荐 +4 kkluvs 2026-02-28 4/200 2026-03-01 10:19 by 馥安馥安
[硕博家园] 2025届双非化工硕士毕业,申博 +3 更多的是 2026-02-27 4/200 2026-03-01 10:04 by ztg729
[考研] 材料调剂 +4 爱擦汗的可乐冰 2026-02-28 4/200 2026-03-01 00:38 by 猫猫球alter
[考研] 264求调剂 +3 巴拉巴拉根556 2026-02-28 3/150 2026-02-28 21:31 by gaoxiaoniuma
信息提示
请填处理意见