okumara hata model

% OKUMURA HATA MODEL

clc;

close all;

clear all;

hte = 30:1:100;

hre = input('Enter the receiver antenna height 3m<hre<10m: ');

d = input('Enter the distance from base station 1km<d<100km: ');

f = input('Enter the frequency 150MHz<f<1920MHz: ');

c = 3*10^8;

lambda = c / (f*10^6);

lf = 10*log10((lambda^2)/((4*pi)^2));

amu = 35;

garea = 9;

ghte = 20*log10(hte/200);

if hre > 3

    ghre = 20*log10(hre/3);

else

    ghre = 10*log10(hre/3);

end

l50 = lf + amu - ghte - ghre - garea;

disp('Propagation path loss is:');

disp(l50);

figure;

plot(hte, l50, 'Linewidth', 1.5);

title('Okumura model analysis');

xlabel('transmitter antenna height (m)');

ylabel('propagation path loss (dB) at set d');

grid on;