www.pudn.com > antennas-and-radio-wave-propagation.rar > 角锥喇叭方向图.m, change:2002-01-01,size:800b


%角锥喇叭 
clc;clear; 
global ah bh t1 t2 s1 s2; 
lmda=1; 
ah=6; 
bh=6; 
ss=[1 0.75 0.5 0.125 0]; 
sita=0:pi/2/90:pi/2; 
t=bh/lmda*sin(sita); 
tt=ah/lmda*sin(sita); 
%喇叭E面方向图,图6-3-3 
for jj=1:5; 
    s1=ss(jj); 
    for ii=1:91;  
        t1=t(ii); 
        f(ii)=quad('elbkjc',-bh/2,bh/2); 
    end; 
    ff=abs(f)/max(abs(f)); 
    ff=20*log10(ff); 
    subplot(1,2,1); 
    plot(t,ff); 
    axis([0 bh/lmda -40 0]); 
    title('6-3-3'); 
    hold on; 
    grid on; 
end; 
%喇叭H面方向图,图6-3-4 
for jj=1:5; 
    s2=ss(jj); 
    for ii=1:91;  
        t2=tt(ii); 
        f(ii)=quad('hlbkjc',-ah/2,ah/2); 
    end; 
    ff=abs(f)/max(abs(f)); 
    ff=20*log10(ff); 
    subplot(1,2,2); 
    plot(tt,ff); 
    axis([0 ah/lmda -40 0]); 
    title('6-3-4'); 
    hold on; 
    grid on; 
end;