Carrot Chasing Alg Feedback v5 3timer
Carrot Chasing Alg Feedback v5 3timer
Carrot Chasing Alg Feedback v5 3timer
clear
close all
%% Parametros iniciales
phi_f = 90
phi_a = 0
theta_f = phi_f*(pi/180); % orientacion final en rads
theta_a = phi_a*(pi/180); % orientacion actual en rads
theta_A = 0
d_theta = theta_f - theta_a; % diferencia de orientacion en grados
Udtheta = (d_theta)/(abs(d_theta)) %direccion de rotacion
if Udtheta == 1
Vmi_a = Vmi_i;
Vmd_a = Vmd_i + velocity;
elseif Udtheta == -1
Vmd_a = Vmd_i;
Vmi_a = Vmi_i + velocity;
end
d_velocity = abs(Vmi_a-Vmd_a); % diferencia de velocidad
if p==0
Err = x - y; % Error
y = y + b*Err; % New output value (velocity)
p = p + 1;
end
if (tend1 > 2)
Err = x - y; % Error
y = y + b*Err; % New output value (velocity)
if (tend2 > 1)
k = k + 1;
if Udtheta == 1
theta_a = theta_a + theta_A; % Distancia recorrida totalmente
elseif Udtheta == -1
theta_a = theta_a - theta_A;
end
Y(k+1) = y;
Yd(k+1) = Vmd_a;
Yi(k+1) = Vmi_a;
T(k+1) = tend;
Z(k+1) = theta_a;
tstart2 = tic
end
tend2 = toc(tstart2);
tend1 = toc(tstart1);
tend = toc(tstart);
end
tend = toc(tstart)
Zd = Z*(180/pi);
plot(T,Y)
%plot(T,Yd)
%plot(T,Yi)
%plot(T,Zd)