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

wz82 2007-08-25 10:02

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

# i nclude<stdio.h> CZv.$H"lW  
# i nclude<stdio.h> .Ya]N+r*  
# i nclude<math.h> #Yi,EwD  
#define PI 3.1415926 RG|]Kt8  
void ydgl(); .asHFT7]9  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; MCU{@ \?Xf  
int f; ?J,hv'L]  
main() -Y%#z'^-  
{ printf("Determaination the prime circle of cam\n"); O.CRF-` t  
  printf("----------------------------\n"); K~OfC  
  printf( "input ro=");scanf("%f",&ro); P9v N5|"M  
  printf("input h=");scanf("%f",&h); P 0,) Gw  
  printf("input e=");scanf("%f",&e); JX(JZ/8B^  
  printf("input dt0=");scanf("%f",&dt0); q05_5  
  am=0;p=PI/180; >l{<p(  
  printf("The initial data:ro=%f\n",ro); ufm`h)N  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); 0l!%}E  
  do 4]RGLN  
  {ro=ro+5; \k_0wt2x1  
  for(f=0;f<=dt0;f=f+2) RekTWIspT/  
  {d=PI*f/dt0; nk9Kq\2f:  
  ydgl(); 1tU}}l  
  } ;AK;%  
  } C"_f3[Z  
  while(am>30*p); bvzeU n  
  printf("The intermediate results: am=%f\n",am/p); $A,fO~  
  printf("ro=%f\n",ro); X*VHi  
  do Q[`J=  
  {ro=ro-1; &Al9%W  
  if(ro<e) > tXn9'S  
  break; ww82)m8  
$/5<f<%u&)  
  for(f=0;f<=dt0;f=f+2) cZT;VmC  
  {d=PI*f/dt0; l j*ELy  
  ydgl(); S3]Cz$  
  } YG$2ySkDhE  
  } tJo,^fdfv  
  while((am>30*p)||(am<=29.5*p)); 8v"tOa4D7  
  printf("The final results:max alfa=%f\n",am/p); saQA:W;  
  printf(" min ro=%f\n",ro); R4GmUCKB=  
  getch(); WJCEiH  
  } z.n`0`^  
  void ydgl() Ac!,#Fq  
  {  d0=dt0*p; jC> l<d_  
  s=0.5*h*(1-cos(d)); xiuAW  
  ds=0.5*h*PI*sin(d)/d0; 3UgusH3  
  r=sqrt(ro*ro-e*e); Z<6xQTx  
  if((s+r)==0) lob{{AB,!  
  return; LyO, ]  
  al=atan((ds-e)/(s+r)); cy8+@77  
      if(al>am) #<|5<U  
      am=al; j$<uE{c  
      }
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 网站统计