%-------------------------------------------------------------------
% PSK Modulator - Communication Systems
% By Thiago Ribeiro
% Language: PT-BR.
%-------------------------------------------------------------------

%-------------------------------------------------------------------
% Definicao portadora
%-------------------------------------------------------------------
A = 5;                        % amplitude
t = 0:.001:1;
f1 = 10;                      % frequencia da portadora
x = A.*sin(2*pi*f1*t);        % funcao da portadora (seno)
subplot(3,1,1);
plot(t,x);                    % plotagem do grafico
xlabel('time');
ylabel('Amplitude');
title('Portadora');
grid on;

%-------------------------------------------------------------------
% Definicao da mensagem 
%-------------------------------------------------------------------
f2 = 2;                       % frequencia do sinal de entrada
u=square(2*pi*f2*t);          % sinal a ser transmitido
subplot(3,1,2);
plot(t,u);                    % plotagem do grafico
xlabel('time');
ylabel('Amplitude');
title('Message Signal');
grid on;

%-------------------------------------------------------------------
% Sinal modulado em PSK
%-------------------------------------------------------------------
v=x.*u;                       % Portadora multiplicada por mensagem
subplot(3,1,3);
plot(t,v);                    % Plotagem grafico (PSK)
xlabel('t');
ylabel('v');
title('PSK');
grid on;