【正文】 [10],w[10],e[10],pdraw[370],vpdraw[370],apdraw[370]。 double gam4,gam5。 FILE *fp。 r25=。 gam3=atan(2/5)。 e[1]=。 東北大學機械原理課程設計 牛頭刨床機構(gòu)方案分析 4 w[1]=2*pi。 p[1][2]=。 p[6][2]=。 if((fp=fopen(MA 運動 ,w))==NULL) { printf( Can39。 fprintf(fp,No THETA1 S7 V7 A7\n)。i=ic。r2,amp。 bark(2,0,5,3,r25,t,w,e,p,vp,ap)。ar2,amp。 bark(7,0,8,5,r78,gam4,t,w,e,p,vp,ap)。 pdraw[i]=p[7][1]。} } fclose(fp)。tb 源程序 include include include include static double sm[10],sj[10]。 static double fr[20][2],fe[20][2],fk[20][2],pk[20][2],fr1,bt1,fr2,bt2,tb1,tb。 double gam4,gam5。 FILE *fp。 sj[3]=。 r78=。 t[6]=。 del=。 t[6]=t[6]*dr。 p[1][2]=。 p[6][2]=。 if((fp=fopen(MA 靜力 ,w))==NULL) { printf(Can39。 fprintf(fp, NO THETA1 FR1 BT1 FR2 BT2 TB TB1\n)。i=ic。r2,amp。 bark(2,0,5,3,r25,t,w,e,p,vp,ap)。ar2,amp。 bark(7,0,8,5,r78,gam4,t,w,e,p,vp,ap)。 barf(1,0,3,1,p,ap,e,fr,amp。 fr2=sqrt(fr[2][1]*fr[2][1]+fr[2][2]*fr[2][2])。 we5=ap[8][1]*vp[8][1]*sm[5]+fe[9][1]*vp[9][1]。 tbdraw[i]=tb。 fr2draw[i]=fr2。 if(i%24==0) getch()。 draw3(del,sita1,fr1draw,sita2,fr2draw,sita3,fr3draw,ic)。 if(vp[nexf][1]=0) { fe[nexf][1]=。amp。 int nexf。amp。} else {fe[nexf][1]=。 static int ic。 double gam4,gam5。 FILE *fp。 q=。 r13= 。 r79=。 w[6]=。 pi=*atan()。 gam4=gam2*dr。 p[2][1]=。 printf(\n The Kiostatia Analysis of Ntbc\n)。t open this file./n)。 fprintf(fp, deg 1/s\n)。i++) { t[1]=(double)(270*dracos()(i)*del*dr)。vr2,amp。 rppk(4,6,4,7,4,5,6,gam4,amp。r3,amp。 bark(7,0,9,5,r79,gam5,t,w,e,p,vp,ap)。tb)。j=ic。j=ic。j++) { if(Max=E[j]) Max=E[j]。j=ic。 } printf(\n Jf=% Td=%,Jf,Td)。 } 運行結(jié)果 The Kiostatia Analysis of Ntbc No Theta1 Tr E 東北大學機械原理課程設計 牛頭刨床機構(gòu)方案分析 15 deg 1/s 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 Jf= Td= 八、 主要的收獲和建議 1通過本次課程設計，我對題目中的這種牛頭刨床如何運動、受力如何有了更加深刻的了解，并且學會了借助計算機對構(gòu)件進行運動分析和受力分析以及飛輪轉(zhuǎn)動慣量的計算，從而對機械原理課程有了共深刻的認識。 九、參考文獻 ［ 1］李樹軍 . 機械原理 . 科學出版社 ， 2021： 8 ［ 2］王淑仁 . 機械原理課程設計 . 科學出版社 ， 2021： 9 。 建議： 1 希望能有兼容 WIN7 的程序軟件，這樣就可以在課下調(diào)試。 fclose(fp)。 fprintf(fp,\n%3d%%%\n,j,D[j]/dr,Tr[j],E[j])。 } Jf=(MaxMin)/(w[1]*w[1]*q)。 for(j=1。 Td=sum1/ic。 D[i]=t[1]。 rprf(2,3,5,0,4,0,0,3,2,p,vp,ap,t,w,e,fr,fk,pk)。ar3,t,w,e,p,vp,ap)。vr2,amp。 bark(2,0