% plot_MSKTrajectory - complex plane signal trajectory for MSK

%% Parameters:
fsT      = 20;
L        = 10;
Alphabet = [1,-1];                          % 2-PAM
Priors   = ones( size( Alphabet) ) / length(Alphabet);
Ns       = 100;                             % number of symbols
Pulse    = RectPulse( fsT);                 % Rectangular pulse
A        = 1;                               % amplitude
h        = 0.5;                            % modulation index

%% symbols and Signal using our functions
Symbols = RandomSymbols(Ns, Alphabet, Priors);
Signal  = CPM(Symbols, A, h, Pulse,fsT);
%% plot

plot( real( Signal(L/2*fsT+1:end-L/2*fsT) ), imag( Signal(L/2*fsT+1:end-L/2*fsT) ), ...
    real( Signal(fsT:fsT:end) ), imag( Signal(fsT:fsT:end) ), 'ro')
grid
xlabel('Real')
ylabel('Imaginary')
axis('equal')

%% Store name of script for automated figure generation
ScriptName = mfilename;