% https://www.edaboard.com/showthread.php?379848
% In-which-direction-we-need-to-go-and-read-the-reflection-coefficient-angles.
close all, clear all, clc
set(0, 'language', 'english')
colordef white; % Specify the plot background to be white
set(gcf, 'numbertitle', 'off')
set(gcf, 'MenuBar', 'none')
Rc = 70;
%S0 = 0.228 * exp(j*pi*300/180)
S0 = 0.228 * exp(j*pi*(-60)/180) % Point P
z0 = (1+S0) / (1-S0)
Z0 = Rc * z0
%beta = 2*pi/lambda
%L = 0.6*lambda
%S1 = S0 * exp(-j*2*beta*L)
%S1 = S0 * exp(-j*pi*432/180)
%S1 = 0.228 * exp(j*pi*(-492)/180)
S1 = 0.228 * exp(j*pi*(-132)/180) % Point R
z1 = (1+S1) / (1-S1)
Z1 = Rc * z1
S0_hid = smithchart(S0);
hold on
S1_hid = smithchart(S1);
legend('P', 'Q')
set(S0_hid, 'Marker', 'o')
set(S0_hid, 'MarkerSize', 6)
set(S0_hid, 'LineStyle', 'none')
set(S0_hid, 'MarkerFaceColor', 'r')
set(S0_hid, 'MarkerEdgeColor', 'r')
set(S1_hid, 'Marker', 'o')
set(S1_hid, 'MarkerSize', 6)
set(S1_hid, 'LineStyle', 'none')
set(S1_hid, 'MarkerFaceColor', 'b')
set(S1_hid, 'MarkerEdgeColor', 'b')
colordef black; % Specify the plot background to be black