% plot_OQPSKHalfSineTrajectory - complex plane signal trajectory

%% Parameters:
fsT      = 20;
Alphabet = [1,-1];                          % BPSK
Priors   = ones( size( Alphabet) ) / length(Alphabet);
Ns       = 200;                             % number of symbols
Pulse    = HalfSinePulse( fsT );            % half sine pulse

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

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

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