%========================================================================
% Análise de cames com seguidor oscilante de face plana.
% Criado em: 02/04/2014
%========================================================================

clear all
close all
clc

P=50;
Rc=25;
C1=125;
C2=75;
C3=25;
NP=361;

for i=1:NP
    A(i)=2*pi*(i-1)/(NP-1);
    E(i)=ATAN2((C1-Rc*sin(A(i))),(C2+Rc*cos(A(i))));
    W(i)=sqrt((C1-Rc*sin(A(i)))^2+(C2+Rc*cos(A(i)))^2);
    B(i)=-acos((P+C3)/W(i))+E(i);
    D(i)=W(i)*sin(E(i)-B(i));
    fL(i)=Rc*sin(A(i)+B(i));
    fLL(i)=Rc*(1+fL(i))*cos(A(i)+B(i));
end

figure('name','Oscilante de face plana')
subplot(3,1,1)
plot(A*180/pi,B*180/pi)
xlim([0 360])
xlabel('A (grau)')
ylabel('B (grau)')
grid on
subplot(3,1,2)
plot(A*180/pi,fL)
xlim([0 360])
xlabel('A (grau)')
ylabel('fL ')
grid on
subplot(3,1,3)
plot(A*180/pi,fLL)
xlim([0 360])
xlabel('A (grau)')
ylabel('fLL ')
grid on

