1  %This Code was Written By Nemeen Shah
 2  %Subscribe to My YouTube Channel: https://Youtube.com/NematicsLab
 3  %Size of PCB
 4  pcbThickness = 1.6e-3;  %1.6mm
 5  pcbLength = 152.4e-3;   %152.4mm or 6inch
 6  pcbWidth = 101.6e-3;    %101.6mm 0r 4inch
 7  %Specifying Material of PCB
 8  pcbMaterial = 'FR4';
 9  pcbEpsilonR = 4.4;
10  %Creating dielectic Material
11  d = dielectric(pcbMaterial); 
12  d.EpsilonR = pcbEpsilonR;
13  d.Thickness = pcbThickness;
14  AntennaPlane=antenna.Rectangle('Length',0.5e-2,'Width',5e-2,'Center',[0, 0]); %Creating Feed Plane of Antenna 
15  GndPlane = antenna.Rectangle('Length',pcbLength,'Width',pcbWidth); %Creating Ground Plane of Antenna
16  %Creating Different Shapes of antenna
17  Rec = antenna.Rectangle('Length',10e-2,'Width',2e-2,'Center',[0,-20e-3]);
18  Rec1 = antenna.Rectangle('Length',6e-2,'Width',2e-2,'Center',[0,20e-3]);
19  %%Creating PCB Stack
20  p = pcbStack;
21  p.Name = 'Strip-fed slot';
22  p.BoardShape = GndPlane;
23  p.BoardThickness = pcbThickness;
24  p.Layers = {AntennaPlane,d,GndPlane}; %[x Cordinate,y Cordinate,startLayer stopLayer]
25  p.FeedLocations = [0,(-pcbWidth/2)+6e-2,1,3];
26   
27  %Adding all different shapes of antenna
28  AntennaPlane = AntennaPlane + Rec + Rec1;
29  p.Layers = {AntennaPlane,d,GndPlane};
30  %Plotting Different patterns and graphs
31  figure(1);
32  show(p); %Display Antenna 
33  figure(2);
34  pattern(p,1.943e9); %Display Radiation Pattern at 1.943GHZ
35  figure(3);
36  impedance(p,1.6e9:2e7:2.2e9); %Display Impedance Graph from 1.6GHz to 2.2GHz
37  freq = linspace(1.6e9, 2.2e9, 50);  % Creating Frequency Vector
38  s = sparameters(p,freq,50);     % Calalculate S11 for all frequencys
39  figure(4);
40  rfplot(s);%Diplay S11 Plot