Nama : Anton Bondan Prakoso
Nim : 201202019252812
Matkul : UAS -Antena Dan Propagansi
BAB 1
Port Analysis
d = dipole;
impedance(d,20e6:1e6:120e6)
S =
sparameters(d,20e6:1e6:120e6,72)
rfplot(S)
d = dipole;
vswr(d,20e6:1e6:120e6,72)
axis([20 120 1 20])
Surface Analysis
m = monopole
impedance(m,20e6:1e6:120e6)
mt = monopoleTopHat
impedance(mt,20e6:1e6:120e6)
end:
d =
dipole;
current(d,70e6)
-1
s =
spiralEquiangular;
current(s,4e9)
pm =
patchMicrostrip;
current(pm,1.75e9)
Meshing
d = dipole;
impedance(d,75e6);
mesh(d)
d = dipole;
impedance(d,75e6:1e6;85e6);
mesh(d)
sp =
spiralArchimedean; freq =
0.8e9:100e6:2.5e9; lambda =
3e8/freq(end);
mesh (sp,'MaxEdgeLength',lambda/10);
sp =
spiralArchimedean; freq =
0.8e9:100e6:2.5e9;
temp = axialRatio(sp,freq(end), 0, 90);
meshdata = mesh(sp);
mesh(sp,'MaxEdgeLength',[Link]);
Field Analysis
h =
helix;
[Link] = 13;
-2
[Link] =
0.025;
pattern(h,2.1e9)
h =
helix;
[Link] = 13;
[Link] = 0.025;
patternElevation(h,2.1e9)
d = dipole;
patternElevation(d,70e6)
d = dipole;
patternAzimuth(d,70e6)
d = dipole;
pattern(d,70e6,'Polarization','H')
d = dipole;
pattern(d,70e6,'Polarization','V')
h =
helix;
[Link] = 13;
[Link] = 0.025;
pattern(h,1.8e9,'Polarization','RHCP')
h =
helix;
[Link] = 13;
[Link] = 0.025;
pattern(h,1.8e9,'Polarization','LHCP')
-3
Rotate Antenna and Arrays
patch =
patchMicrostrip;
show(patch)
[Link]
s ='Y'; [Link] =
90; show(patch)
[Link] = [0
-1 0]; show(patch)
d = dipole('Tilt',[90 90],'TiltAxis', [0 1 0;
0 1 1]) dipole with properties:
Length: 2
Width: 0.1000
FeedOffset: 0
Tilt: [90 90]
TiltAxis: [2x3 double]
show(d)
r =
reflector;
show(r)
-4
[Link];
dipole with properties:
Length: 0.1500
Width: 0.0050
FeedOffset: 0
Tilt: 90
TiltAxis: [0 1 0]
[Link]
lt = 0; show (r)
r =
reflector;
[Link] = 90;
show(r)
s = spiralArchimedean;
l = linearArray('Element',s,'ElementSpacing',0.1,...
...'NumElements',3,'Ti
lt',... 30,'TiltAxis',[1 1
0]);
show(l)
-5
Model Infinite Ground Plane for Balanced Antennas
r = reflector
('GroundPlaneLength', inf) r =
reflector with properties:
Exciter: [1x1 dipole]
Substrate: [1x1 dielectric]
GroundPlaneLength: Inf
GroundPlaneWidth: 0.2000
Spacing: 0.0750
EnableProbeFeed: 0
Tilt: 0
TiltAxis: [1 0 0]
Load: [1x1 lumpedElement]
figure;show(r);
figure;impedance(r,800e6:5e6:1e9);
figure;pattern(r,900e6);
figure; mesh(r);
-6
Model Infinite Ground Plane for Unbalanced Antennas
p =
patchMicrostrip('GroundPlaneLength', inf) p =
patchMicrostrip with properties:
Length: 0.0750
Width: 0.0375
Height: 0.0060
Substrate: [1x1 dielectric]
GroundPlaneLength: Inf
GroundPlaneWidth: 0.0750
PatchCenterOffset: [0 0]
FeedOffset: [-0.0187 0]
Tilt: 0
TiltAxis: [1 0 0]
Load: [1x1 lumpedElement]
f
igure;
show(p);
figure;
impedance(p,1.60e9:5e6:1.70e9);
figure;
pattern(p,1.67e9);
f
igure;
mesh(p);
BAB II
-7
Mutual Coupling
fc = 1e9;
lambda =
physconst('lightspeed')/fc; az = -
180:0.1:180;
el = -90:0.1:90;
%% Element
d =
design(dipole,1e9);
[Link] = 90;
[Link] = [0 1 0];
%% Array
r =
rectangularArray; [Link]
= d;
[Link] = lambda/2;
[Link] = lambda/2;
figure; show(r) ;
figure; patternMultiply(r, fc, az, el);
Infinite Arrays
-8
infarray =
infiniteArray;
layout(infarray)
r = reflector
reflector with properties:
Exciter: [1x1 dipole]
GroundPlaneLength: 0.2000
GroundPlaneWidth: 0.2000
Spacing: 0.0750
Tilt: 0
TiltAxis: [1 0 0]
infarray = infiniteArray
infiniteArray with properties:
Element: [1x1 reflector]
ScanAzimuth: 0
ScanElevation: 90
show (infarray)
infarray = infiniteArray('Element',
patchMicrostrip) infarray =
infiniteArray with properties:
Element: [1x1 patchMicrostrip]
ScanAzimuth: 0
ScanElevation: 90
show(infarray)
-9
infarray = infiniteArray
infiniteArray with properties:
Element: [1x1 reflector]
ScanAzimuth: 0
ScanElevation: 90
Manipulate Array Elements
d =
dipole;
N =
5;
df = repmat(d,N)
r =
rectangularArray('Element',df);
show(r)
df =
5x5 dipole array with properties:
Length: {25x1 cell}
Width: {25x1 cell}
FeedOffset: {25x1 cell}
Tilt: {25x1 cell}
TiltAxis: {25x1 cell}
Load: {25x1 cell}
S = [1:2:N*N];
for i = 1:25
if any(S==i)
[Link](i).Tilt = 90;
-10
[Link](i).TiltAxis = [0 1 0];
end
e
nd
show(r)
pattern(r,75e6)
Vfeed = ones(1,N*N)
Vfeed =
Columns 1 through 13
1 1 1 1 1 1 1 1 1 1 1 1 1
-11
Columns 14 through 25
1 1 1 1 1 1 1 1 1 1 1 1
Vfeed(S) = 0
[Link] = Vfeed
Vfeed =
Columns 1 through 13
0 1 0 1 0 1 0 1 0 1 0 1 0
Columns 14 through 25
1 0 1 0 1 0 1 0 1 0 1 0
r =
rectangularArray with properties:
Element: [5x5 dipole]
Size: [5 5]
RowSpacing: 2
-12
ColumnSpacing: 2
Lattice: 'Rectangular'
AmplitudeTaper: [0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0]
PhaseShift: 0
Tilt: 0
TiltAxis: [1 0 0]
figure
pattern(r,75e6)
-13