image thumbnail

Antenna's Array Synthesis

by

 

12 Jul 2004 (Updated )

Simple and didactical program for undertanding 3D radiation pattern of arrays.

Info.m
% Funcin que pinta un frame con la informacin referente a lo que 
% estamos viendo
%----------------------------------------------------------------

     
%Texto informativo acerca de lo que estamos viendo
%-------------------------------------------------
function [men] = Info(figura,sel,INCRE,BAS,N,D,FASE,NLPS1,CEROS,A_HAZ,N_Theta,N_Phi,men)

   if ~isempty(men) delete(men); clear men; end;
   infor = uimenu(figura,'Label','Array Particulars');
   switch sel
   case 1, % Visualizacin de un dipolo
    uimenu(infor,'Label','ELEMENTAL DIPOLE');
    if BAS<0 BAS=0; end;
    Texto    =sprintf('Length:................%0.5g',BAS);
    uimenu(infor,'Label',Texto);
    Texto    =sprintf('Samples over Theta:....%0.5g',N_Theta);
    uimenu(infor,'Label',Texto);
    Texto    =sprintf('Samples over Phi:......%0.5g',N_Phi);   
    uimenu(infor,'Label',Texto);
case 2,
    uimenu(infor,'label','Synthesis:       UNIFORM'); 
    if INCRE
     Texto = 'Hansen-Woodyard';
     uimenu(infor,'Label',Texto);
    end;
    Texto    = sprintf('N Antennas:.............%d',N);
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('Length:..................%0.5g',BAS);
    uimenu(infor,'Label',Texto);   
    D=fix(D*100)/100;
    Texto    = sprintf('Space Step:..............%0.5g',D);
    uimenu(infor,'Label',Texto); 
    Texto    = sprintf('Phase Step:..............%0.5g ',FASE);
    uimenu(infor,'Label',Texto);  
    Texto    =sprintf('Samples over Theta:....%0.5g',N_Theta);
    uimenu(infor,'Label',Texto);
    Texto    =sprintf('Samples over Phi:......%0.5g',N_Phi);   
    uimenu(infor,'Label',Texto);
case 3
    uimenu(infor,'Label','Synthesis: FOURIER (boxcar window)'); 
    Texto    = sprintf('N Antennas:.............%d',N);
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('Length:..................%0.5g',BAS);
    uimenu(infor,'Label',Texto);   
    Texto = sprintf('Beam Width:..............%0.5g ',A_HAZ);
    uimenu(infor,'Label',Texto);   
    D=fix(D*100)/100;
    Texto    = sprintf('Space Step:..............%0.5g',D);
    uimenu(infor,'Label',Texto); 
    Texto    = sprintf('Phase Step:..............%0.5g ',FASE);
    uimenu(infor,'Label',Texto);
    Texto    =sprintf('Samples over Theta:.......%0.5g',N_Theta);
    uimenu(infor,'Label',Texto);
    Texto     =sprintf('Samples over Phi:........%0.5g',N_Phi);   
    uimenu(infor,'Label',Texto);

case 4
    uimenu(infor,'Label','Sntesis: SCHELKUNOFF'); 
    Texto   = sprintf('N Antennas:..............%d',N);
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('Length:..................%0.5g',BAS);
    uimenu(infor,'Label',Texto);     
    D=fix(D*100)/100;
    Texto    = sprintf('Space Step:..............%0.5g',D);
    uimenu(infor,'Label',Texto); 
    Texto    = sprintf('Phase Step:..............%0.5g ',FASE);
    uimenu(infor,'Label',Texto); 
    Texto    = sprintf('Samples over Theta:......%0.5g',N_Theta);
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('Samples over Phi:........%0.5g',N_Phi);   
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('%g,',CEROS);
    Texto = ['Nulls():      ' Texto];
    uimenu(infor,'Label',Texto);
  case 5
    uimenu(infor,'Label','Sntesis:  DOLPH-TCHEBYSHEV'); 
    Texto    = sprintf('N Antennas:...............%d',N);
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('Length:....................%0.5g',BAS);
    uimenu(infor,'Label',Texto); 
    Texto    = sprintf('Main/Sec. Lob. Ratio:......%0.5g dB',NLPS1); 
    uimenu(infor,'Label',Texto); 
    D=fix(D*100)/100;
    Texto    = sprintf('Space Step:................%0.5g',D);
    uimenu(infor,'Label',Texto); 
    Texto    = sprintf('Phase Step:................%0.5g ',FASE);
    uimenu(infor,'Label',Texto);   
    Texto    = sprintf('Samples over Theta:........%0.5g',N_Theta);
    uimenu(infor,'Label',Texto);
    Texto    = sprintf('Samples over Phi:..........%0.5g',N_Phi);   
    uimenu(infor,'Label',Texto);
  end;
men = infor;
  
%Autor: Csar Delgado Gonzlez
%Estudiante de 3 de Telecomunicaciones 
%Universidad  Politcnica de Madrid
 
  
 
     
     

 
    
     

Contact us