% plot_ConstellationBPSK - plot BPSK constellation

Alphabet = [ 1 -1 ];

%% unit circle for reference
Nphi = 200;
phi = ( 0 : Nphi ) * 2*pi/Nphi;
plot( exp(j*phi),'b--')

%% plot constellation
hold on
hp = plot( complex(Alphabet), 'ro');
hold off
xlabel( 'Real' )
ylabel( 'Imaginary' )
grid

%% tweaks
axis( 'equal' )
set( gca, 'YTick', [-1 0 1] );
set( gca, 'YTickLabel', ['-A'; '0 '; 'A '] );
set( gca, 'XTick', [-1 0 1] );
set( gca, 'XTickLabel', ['-A'; '0 '; 'A '] );
set( hp, 'MarkerSize', 10, 'LineWidth', 1 );

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