QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 2364|回复: 3
收起左侧

[求助] 滚齿机计算软件

[复制链接]
发表于 2008-5-7 21:46:22 | 显示全部楼层 |阅读模式 来自: 中国重庆

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
听说滚齿机计算差动机构可以用程序6 M( z( v. V, W3 h
       请指教
 楼主| 发表于 2008-5-7 21:50:24 | 显示全部楼层 来自: 中国重庆

滚齿机计算软件

急急!!!!!!!!!!!
发表于 2008-5-7 22:54:22 | 显示全部楼层 来自: 中国江苏苏州
论坛里有很多,要学会搜索:
6 k& P9 }8 I+ V我发个VB编写的挂轮计算程序
) k9 \' ~5 W9 o% B3 i9 Thttp://www.3dportal.cn/discuz/viewthread.php?tid=1751967 X9 M4 S+ }1 `' k/ e% j
滚齿机挂轮计算器(正式可Crack版)
! Q; B  G" h& U3 H( P# g" u9 Y, Hhttp://www.3dportal.cn/discuz/viewthread.php?tid=175442
7 |" c3 T* h# K1 b& {/ F- @' S; t- m: c现在还不能下载,等附件恢复后就可下载了
发表于 2008-5-8 19:55:27 | 显示全部楼层 来自: 中国江苏南京
这个太简单了,用VB做四重循环就可以了。程序如下:" f6 w; h$ N  o' Y6 G
dim a as long ,b as long ,c as long,d as long / j- U' Q- s. e9 R4 J; B/ ?3 \% f; t
for a=20 to 1006 ^2 }8 h" w$ S4 \
   for b=2o to 100
% W5 ]9 o0 a9 E( e     for c=20 to 100 8 Q! _' }2 T0 ?
       for d=2o to 100+ L5 p/ S* c- J4 A1 M9 S
        if  abs((a*b)/(c*d)-传动比)<自己设定的精度值
) e1 k/ ~, p9 F$ Q   then prin a,b,c,d" X* x& H2 k& `; b2 ]* s
next d
" K6 [6 I* p/ q6 t7 s& y" s- Wnext c' \/ }! x2 A4 g6 j. t" ?( o
next b
5 E- J* Z) B/ @4 K$ z1 F7 |; {next a" U6 }* Q" C5 P: l2 i) V
不过这种算法太慢,你可以自己根据机床的实际情况,将a,b,c,d的组合优化一下,运算速度就很快了。# w" ]5 K7 v+ Q% k6 `
具体的优化方法就不写了~

评分

参与人数 1三维币 +5 收起 理由
hero2006 + 5 应助

查看全部评分

发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表