%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                       INGENIERÍA EN COMPUTACIÓN
%   SEÑALES Y SYSTEMAS
%                                                   Moya, Nelli, Bernhardt
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%El presente script pretende ser una ayuda para fijar los conceptos sobre
%modificaciones en la variable independiente de una señal, en este caso el
%tiempo; como se sabe, el tiempo puede sufrir escalamientos, inversiones y
%desplazamientos (adelantos o atrasos); la idea entonces es poder observar
%de manera gráfica qué ocurre con la señal. Este script está concebido para
%que pueda ser manipulado, para observar lo que sucede cuando se aplican
%estas modificaciones a la variable independiente en forma separada y en
%forma conjunta.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
clc
close all
clear all
%**********************************************
% definimos el vector de tiempo t
%**********************************************
t = -5:.001:10;         %la extensión desde menos cinco hasta diez segundos será suficiente para este caso; asimismo resolver con una milésima
%**********************************************
% componemos la señal x
%**********************************************
x1 = rectpuls(t+0.5,1); %un pulso cuadrado de un segundo de duración, que inicia en t = -1
x2 = t+1;               %una rampa con una pendiente igual a uno, cuyo valor en t = 0 es uno
x3 = rectpuls(t-0.5,1); %un pulso cuadrado de un segundo de duración, que inicia en t = 0
x4 = -t+1;              %una rampa con una pendiente igual a menos uno, cuyo valor en t = 0 es uno
x = x1.*x2 + x3.*x4;    %los pulsos cuadrados multiplican a las rampas haciendo así un ventaneo de las señales
%**********************************************
% componemos la señal g(t)
%**********************************************
g1 = rectpuls(t-0.5,1); %un pulso cuadrado de un segundo de duración, que inicia en t = 0
g2 = -2*t+3;            %una rampa con una pendiente igual a menos dos, que se anula en t = 1,5
g3 = rectpuls(t-1.25,0.5);  %un pulso cuadrado de medio segundo de duración, que inicia en t = 1
g =  g1 + g2.*g3;       %el pulso representado en g3 ventanea la señal de la rampa, y luego se suma al pulso de g1

%Ejercicio 3-a)
%**********************************************
figure, plot(t,x), title('Señal original x(t)')
figure, plot(t,x_t(t,1,-2)), title('Señal modificada x(t-2)')

%Ejercicio 3-b)
%**********************************************
figure, plot(t,g), title('Señal original g(t)'), axis([-2 3 -1 3])
figure, plot(t,g_t(t,-1,1)), title('Señal modificada g(1-t)'), axis([-2 3 -1 3])

%Ejercicio 3-c)
%**********************************************
figure, plot(t,x), title('Señal original x(t)')
figure, plot(t,x_t(t,-1/3,2)), title('Señal modificada x(2-t/3)')

%Ejercicio 3-d)
%**********************************************
x_g_u = (x_t(t,1,0) + g_t(t,-1,2)).*heaviside(-t+1);
figure, plot(t,x_g_u), title('Señal ejercicio 3-d)'),  axis([-3 3 -3 3])