clear;
d=[1:20]; %频率变量
ht=30; %基站天线高度
hr=1.5; %接收天线高度
f1=600;f2=1200;
L1=69.55+26.16*log10(f1)-13.82*log10(ht)-3.2*(log10(11.75*hr)).^2+4.97+(44.9-6.55*log10(ht))*log10(d); %城市600MHZ
L2=69.55+26.16*log10(f2)-13.82*log10(ht)-3.2*(log10(11.75*hr)).^2+4.97+(44.9-6.55*log10(ht))*log10(d); %城市1200MHZ
c1=(-2)*[log10(f1/28)].^2-5.4; %郊区600MHZ校正因子
c2=(-2)*[log10(f2/28)].^2-5.4; %郊区1200MHZ校正因子
c3=(-4.78)*[log10(f1)].^2+18.33*log10(f1)-40.98; %乡村600MHZ校正因子
c4=(-4.78)*[log10(f2)].^2+18.33*log10(f2)-40.98; %乡村1200MHZ校正因子
L3=L1+c1; %郊区600MHZ
L4=L2+c2; %郊区1200MHZ
L5=L1+c3; %乡村600MHZ
L6=L2+c4; %乡村1200MHZ
grid on;
hold on;
plot(d,L1,'b-o');
plot(d,L2,'b:o');
plot(d,L3,'b-*');
plot(d,L4,'b:*');
plot(d,L5,'b-s');
plot(d,L6,'b:s');
legend('城市:f=600MHZ','城市:f=1200MHZ','郊区:f=600MHZ','郊区:f=1200MHZ','乡村:f=600MHZ','乡村:f=1200MHZ'); %注释
%axis([0 2000 90 160]);
title('姓名:班级: 学号:');
xlabel('距离(km)');
ylabel('损耗中值(dB)');