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

wz82 2007-08-25 10:02

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

# i nclude<stdio.h> b2m={q(s  
# i nclude<stdio.h> $TI^8 3  
# i nclude<math.h> G,u=ngZ]  
#define PI 3.1415926 7*!7EBb  
void ydgl(); HN7CcE+l  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; v ,8;: sD  
int f; )6OD@<r{  
main() _%w680b'  
{ printf("Determaination the prime circle of cam\n"); v/+ <YU  
  printf("----------------------------\n"); B/twak\  
  printf( "input ro=");scanf("%f",&ro); `2mddx8  
  printf("input h=");scanf("%f",&h); v@ _1V  
  printf("input e=");scanf("%f",&e); C= ~c`V5>r  
  printf("input dt0=");scanf("%f",&dt0); l4bytI{63  
  am=0;p=PI/180; 36 "n7  
  printf("The initial data:ro=%f\n",ro); xE/?ncTK^  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); e97G]XLR  
  do Fc~G*Gz~Z|  
  {ro=ro+5; jm}CrqU  
  for(f=0;f<=dt0;f=f+2) ;8sL  
  {d=PI*f/dt0; B~p%pT S+  
  ydgl(); ON :t"z5  
  } aZFpt/.d  
  } d54iZ`  
  while(am>30*p); Y6` xb`  
  printf("The intermediate results: am=%f\n",am/p); Z>hTL_|]a{  
  printf("ro=%f\n",ro); *_(X$qfoW  
  do tW\yt~q,  
  {ro=ro-1; oz) [ -  
  if(ro<e) <!OBpAq  
  break; LOh2eZ"n  
.WSyL  
  for(f=0;f<=dt0;f=f+2) '!HTE` Aj  
  {d=PI*f/dt0; V ao:9 ~  
  ydgl(); LP2~UVq  
  } #@R0$x  
  } 0U '"@A \  
  while((am>30*p)||(am<=29.5*p)); _D '(R  
  printf("The final results:max alfa=%f\n",am/p); v=U<exM6%  
  printf(" min ro=%f\n",ro); ij" ~]I  
  getch(); 3$|/7(M&DA  
  } 9/ <3mF@E  
  void ydgl() )(iv#;ByL  
  {  d0=dt0*p; G@]3EP  
  s=0.5*h*(1-cos(d)); hZ&KE78?  
  ds=0.5*h*PI*sin(d)/d0; H>~CL  
  r=sqrt(ro*ro-e*e); @\K[WqF$$q  
  if((s+r)==0) c+Q'4E0 |  
  return; R~vGaxZ$  
  al=atan((ds-e)/(s+r)); CIudtY(:  
      if(al>am) UP~28%>X  
      am=al; e4z`:%vy  
      }
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-2026 光行天下 蜀ICP备06003254号-1 网站统计