首页 -> 登录 -> 注册 -> 回复主题 -> 发表主题
光行天下 -> 机械设计,制造及其自动化 -> 机械原理课程设计程序 - 凸轮设计部分 [点此返回论坛查看本帖完整版本] [打印本页]

wz82 2007-08-25 10:02

机械原理课程设计程序 - 凸轮设计部分

# i nclude<stdio.h> Gt9&)/#  
# i nclude<stdio.h>  hi g2  
# i nclude<math.h> +`?Y?L^ J  
#define PI 3.1415926 C9p"?vX  
void ydgl(); [O: !(G je  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; l5L.5 $N  
int f; !i=nSqW  
main() =zwOq(Bh W  
{ printf("Determaination the prime circle of cam\n"); ^CwR!I.D}4  
  printf("----------------------------\n"); %Uz(Vd#K  
  printf( "input ro=");scanf("%f",&ro); R|i/lEq  
  printf("input h=");scanf("%f",&h); C8F7bG8c  
  printf("input e=");scanf("%f",&e); C6rg<tCH  
  printf("input dt0=");scanf("%f",&dt0); bWOS `5  
  am=0;p=PI/180; 1q;#VS/D;H  
  printf("The initial data:ro=%f\n",ro); 1S@vGq}  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); l<M'=-Y  
  do 5dZ|!  
  {ro=ro+5; r|,i'T  
  for(f=0;f<=dt0;f=f+2) ca+[0w@S  
  {d=PI*f/dt0; ;WldHaZ9r  
  ydgl(); OyqNLR  
  } IIq1\khh  
  } Ivb 4P`{  
  while(am>30*p); eb*#'\~'  
  printf("The intermediate results: am=%f\n",am/p); Y!;|ld  
  printf("ro=%f\n",ro); L~s3b  
  do ZJlEKib%2  
  {ro=ro-1; W_0>y9?  
  if(ro<e) ZyEHzM{$  
  break; EUIIr4]  
MxBTX4ES  
  for(f=0;f<=dt0;f=f+2) 4lZ$;:Jg  
  {d=PI*f/dt0; >0l"P"]  
  ydgl(); 7'OtruJ   
  } I$8" N]/C  
  } L\;6y*K  
  while((am>30*p)||(am<=29.5*p)); ;'-olW~  
  printf("The final results:max alfa=%f\n",am/p); Q,80Hor#J  
  printf(" min ro=%f\n",ro); a')|1DnR  
  getch();  C:G8c[  
  } `U2DkY&n  
  void ydgl() u :F~K  
  {  d0=dt0*p; 7.j[a*^  
  s=0.5*h*(1-cos(d)); [d* ~@P  
  ds=0.5*h*PI*sin(d)/d0; Hk|0HL  
  r=sqrt(ro*ro-e*e); cW+t#>' r  
  if((s+r)==0) *28pRvY:b  
  return; t!I aUW  
  al=atan((ds-e)/(s+r)); Yq/.-4 y  
      if(al>am) X6^},C'E.:  
      am=al; }MlwC;ot  
      }
2iso 2008-04-13 06:19
Thanks
lengyuquan 2008-05-29 11:14
你好 还有没关于机械原理程序设计的代码啊! 课程设计老师让我们用编程作,帮帮忙!!能发到我邮箱吗?lengyu.nan@163.com
ziqiangbux 2009-06-26 10:59
不对吧?????????????????
查看本帖完整版本: [-- 机械原理课程设计程序 - 凸轮设计部分 --] [-- top --]

Copyright © 2005-2025 光行天下 蜀ICP备06003254号-1 网站统计