mscost231.m

这是一个基于matlab/RUNE环境的移动通信网络仿真程序包

function saida = mscost231(distancia, frequencia, hte, hre, ws, wb, hb, zona)

ka = 0;
kd = 0;
kf = 0;
lbsk = 0;
perda = 0;
saida = 0 * distancia;

if hte > hb
  lbsk = -18*log10(1 + hte - hb);
end

if zona == 0
  kf = -4 + 0.7 * (frequencia / 925 - 1);
else
  kf = -4 + 1.5 * (frequencia / 925 - 1);
end

if hte > hb
  kd = 18;
else
  kd = 18 - 15 * (hte - hb) / hb;
end

for n = 1 : length(distancia),
  if hte > hb
    ka = 54;
  elseif hte <= hb
    if distancia(n) >= 0.5
      ka = 54 - 0.8 * (hte - hb);
    else
      ka = 54 - 1.6 * (hte - hb) * distancia(n);
    end
  end
  perda = lbsk + ka + kd*log10(distancia(n)) + kf*log10(frequencia) - 9*log10(wb);
  if perda < 0
     perda = 0;
  end   
  saida(n) = perda;
end