機械原理大作業(yè)一連桿機構(gòu)參考例子-在線瀏覽
2024-08-05 19:44本頁面
【正文】 %桿AB的角位移，yy1=yy/180*pi。%點B的x坐標yb=280*sin(yy1)。%桿AB的角速度vxb=w*yb。% 點B的速度在y方向的分量axb=w*w*xb。% 點B的加速度在y方向的分量xd=0。% 點D的y坐標vxd=0。% 點D的速度在y方向的分量axd=0。%點D的加速度在y方向的分量jbcd=ones(1,3601)。%?給角BD賦初值li=350。%桿CD的長度lbd=ones(1,3601)。% 給桿BC的角位移賦初值fj=ones(1,3601)。% 給點Cx坐標賦初值yc=ones(1,3601)。%給中間變量賦初值cj=ones(1,3601)。% 給桿BC的角速度賦初值wj=ones(1,3601)。% 給ss賦初值ffg=ones(1,3601)。%點G的x坐標yg=80。%點G的速度在x方向的分量vyg=0。% 點G的加速度在x方向的分量ayg=0。%給桿GF的角速度賦初值 %求角BCD，角BD for m=1:3601 lbd(1,m)=sqrt((xdxb(1,m))^2+(ydyb(1,m))^2)。amp。 elseif lbd(1,m)==(li+lj) jbcd(1,m)=0。amp。 elseif (lbd(1,m)==abs(ljli)amp。(lilj)) jbcd(1,m)=pi。amp。 elseif (xd==xb(1,m) amp。 ydyb(1,m)) fdb(1,m)=pi/2。amp。 elseif (xd==xb(1,m)amp。ydyb(1,m)) fdb(1,m)=3*pi/2。amp。 elseif (xdxb(1,m)amp。ydyb(1,m)) fdb(1,m)=atan((ydyb(1,m))/(xdxb(1,m)))+pi。% 桿BC的角位移 if fi(1,m)0 fi(1,m)=fi(1,m)+2*pi。 yc=yb+li*sin(fi)。amp。 elseif (xc(1,n)==xd amp。 yc(1,n)yd) fj(1,n)=pi/2。amp。 elseif (xc(1,n)xd amp。 yc(1,n)yd) fj(1,n)=atan((yc(1,n)yd)/(xc(1,n)xd))+pi。amp。 elseif (xc(1,n)xd amp。 yc(1,n)=yd) fj(1,n)=atan((yc(1,n)yd)/(xc(1,n)xd))+2*pi。cj=lj*cos(fj)。sj=lj*sin(fj)。 %求桿BC、CD的角速度wi=(c
語文相關(guān)推薦
鄂ICP備17016276號-1