RCAV5.m

% Build a cascade (row vector) of RF elements
elements(1) = seriesRLC( ...
    'R',18, ...
    'C',1.0001e-06);
elements(2) = amplifier( ...
    Name='ADL5611', ...
    FileName='C:\Users\jonel\OneDrive\Desktop\FFS RA6500\RA6500 RF Countermeasure\ADL5611_20240919T171128.s2p', ...
    UseNetworkData=true);
elements(3) = seriesRLC('C',1e-06);
elements(4) = nport('C:\Users\jonel\OneDrive\Desktop\FFS RA6500\RA6500 RF Countermeasure\GP2X.s2p');
elements(5) = seriesRLC('C',1e-06);
elements(6) = rfelement( ...
    Name='GP2X', ...
    OIP3=40);
elements(7) = amplifier( ...
    Name='HMC326', ...
    FileName='C:\Users\jonel\OneDrive\Desktop\FFS RA6500\RA6500 RF Countermeasure\HMC326_20240919T171905.s2p', ...
    UseNetworkData=true);
elements(8) = shuntRLC;
elements(9) = seriesRLC('C',3e-12);
elements(10) = shuntRLC('L',5.6e-08);

% Construct an rfbudget object
b = rfbudget( ...
    Elements=elements, ...
    InputFrequency=4.4e9, ...
    AvailableInputPower=-30, ...
    SignalBandwidth=45e6, ...
    Solver='Friis', ...
    AutoUpdate=false);


% Plot S-parameters for amp1
figure;
rfplot(s_params_amp1);
title('S-parameters of ADL5611 Amplifier');

% Plot S-parameters for driver
figure;
rfplot(s_params_amp2);
title('S-parameters of HMC326 Amplifier');

% Calculate and display impedance for each element
z_amp1 = s2z(s_params_amp1.Parameters);
z_driver = s2z(s_params_amp2.Parameters);

% Find the closest frequency index
[~, freq_index_amp1] = min(abs(s_params_amp1.Frequencies - freq));
[~, freq_index_driver] = min(abs(s_params_amp2.Frequencies - freq));

% Extract impedance at the closest frequency
z_amp1_at_freq = z_amp1(:,:,freq_index_amp1);
z_driver_at_freq = z_driver(:,:,freq_index_driver);

% Display impedance values
fprintf('Impedance of ADL5611 at %.2f GHz: %.2f + %.2fj Ohms\n', freq/1e9, real(z_amp1_at_freq(1,1)), imag(z_amp1_at_freq(1,1)));
fprintf('Impedance of HMC326 at %.2f GHz: %.2f + %.2fj Ohms\n', freq/1e9, real(z_driver_at_freq(1,1)), imag(z_driver_at_freq(1,1)));