偏置移动从动件盘形凸轮设计.doc

********偏置移动从动件盘形凸轮设计********'disp'disp'已知条件:'disp'凸轮作逆时针方向转动,从动件偏置在凸轮轴心的右边'disp'从动件在推程作等加速/等减速运动,在回程作余弦加速度运动'rb=40;rt=10;e=15;h=50;ft=100;fs=60;fh=90;alp=35;fprintf(1,'基圆半径rb=%\n',rb)fprintf(1,'滚子半径rt=%\n',rt)fprintf(1,'推杆偏距e=%\n',e)fprintf(1,'推程升程h=%\n',h)fprintf(1,'推程运动角ft=%\n',ft)fprintf(1,'远休止角fs=%\n',fs)fprintf(1,'回程运动角fh=%\n',fh)fprintf(1,'推程许用压力角alp=%\n',alp)hd=pi/180;du=180/pi;se=sqrt(rb^2-e^2);d1=ft+fs;d2=ft+fs+fh;disp''disp'计算过程和输出结果:'disp'1-计算凸轮理论轮廓的压力角和曲率半径'disp'1-1推程(等加速/等减速运动)'s=zeros(ft);ds=zeros(ft);d2s=zeros(ft);at=zeros(ft);atd=zeros(ft);pt=zeros(ft);forf=1:ftiff<=ft/2s(f)=2*h*f^2/ft^2;s=s(f);ds(f)=4*h*f*hd/(ft*hd)^2;ds=ds(f);d2s(f)=4*h/(ft*hd)^2;d2s=d2s(f);elses(f)=h-2*h*(ft-f)^2/ft^2;s=s(f);ds(f)=4*h*(ft-f)*hd/(ft*hd)^2;ds=ds(f);d2s(f)=-4*h/(ft*hd)^2;d2s=d2s(f);endat(f)=atan(abs(ds-e)/(se+s));atd(f)=at(f)*du;p1=((se+s)^2+(ds-e)^2)^;p2=abs((se+s)*(d2s-se-s)-(ds-e)*(2*ds-e));pt(f)=p1/p2;p=pt(f);endatm=0;forf=1:ftifatd(f)>atmatm=atd(f);endendfprintf(1,'最大压力角atm=%\n',atm)forf=1:ftifabs(atd(f)-atm)<=f;breakendendfprintf(1,'对应的位置角ftm=%\n',ftm)ifatm>alpfprintf(1,'*凸轮推程压力角超过许用值,需要增大基圆!\n')endptn=rb+h;forf=1:ftifpt(f)<ptnptn=pt(f);endendfprintf(1,'轮廓最小曲率半径ptn=%\n',ptn)forf=1:ftifabs(pt(f)-ptn)<=f;breakendendfprintf(1,'对应的位置角ftn=%\n',ftn)ifptn<rt+5fprintf(1,'*凸轮推程轮廓曲率半径小于许用值,需要增大基圆或减小滚子!\n')enddisp'1-2回程(余弦加速度运动)'s=zeros(fh);ds=zeros(fh);d2s=zeros(fh);ah=zeros(fh);ahd=zeros(fh);ph=zeros(fh);forf=d1:d2k=f-d1;s(f)=.5*h*(1+cos(pi*k/fh));s=s(f);ds(f)=-.5*pi*h*sin(pi*k/fh)/(fh*hd);ds=ds(f);d2s(f)=-.5*pi^2*h*cos(pi*k/fh)/(fh*hd)^2;d2s=d2s(f);ah(f)=atan(abs(ds+e)/(se+s));ahd(f)=ah(f)*du;p1=((se+s)^2+(ds-e)^2)^;p2=abs((se+s)*(d2s-se-s)-(ds-e)*(2*ds-e));ph(f)=p1/p2;p=ph(f);endahm=0;forf=d1:d2ifahd(f)>ahm;ahm=ahd(f);endendfprintf(1,'最大压力角ahm=%\n',ahm)forf=d1:d2ifabs(ahd(f)-ahm)<=f;breakendendfprintf(1,'对应的位置角fhm=%\n',fhm)phn=rb+h;forf=d1:d2ifph(f)<phnphn=ph(f);endendf