auxfilt.m

AFD - Advanced Filter Design using MATLABMiroslav D. Lutovac, Dejan V. Tosicversion 1.00 released 15

function dr = auxfilt(x0,y0,dx,ds,F)
% auxfilt.m  Digital filter realization 
%            generated from the drawing window of the toolbox
%           "Drawing Digital Filter Realizations v1.0 beta"
%            by Miroslav D. Lutovac and Dejan V. Tosic (c) 1999 
%                                       
% Note:      Edit this file by an ASCII text editor and
%            save the new file under a different name.
%                                       
% See also:  Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           "Advanced Filter Design for Signal Processing
%            Using MATLAB and Mathematica"
%            http://galeb.etf.bg.ac.yu/~lutovac
%            http://telekom.etf.bg.ac.yu/~tosic
%                                       
% Contact:   Please, send your comments at
%             [e-mail]
%             [e-mail]
%                                       
%            Your suggestions are appreciated!
%                                       
% call   auxfilt(0,0,4,5,10)
% creation date: 16-Oct-99  time: 18:45
Nx = 7;
Ny = 5;
whitebg(figure(gcf),[1 1 1]);
dc = 'k';
x = zeros(1,4*Nx);
y = zeros(1,4*Ny);
for indx = 1:4*Nx
 x(indx) = x0 + dx*indx/4;
end
for indy = 1:4*Ny
 y(indy) = y0 + dx*indy/4;
end
drawadd(x(2),y(16),2,0,1,1,'',1,ds/3,F,dc);                  
drawadd(x(2),y(12),1,2,0,3,'',1,ds/3,F,dc);                  
drawmult(x(4),y(12),x(7),'a1','',2,ds/3,F,dc);               
drawdel(x(7), y(12), y(16), ' ', '-1' ,11, ds/2, F, dc);     
drawdel(x(7),y(8),y(12),'','-m',11,ds/2,F,dc);               
drawmult(x(4),y(8),x(7),'a2','',2,ds/3,F,dc);                
drawlhv(x(4), y(8),  x(3),  y(11), 0, dc);                   
drawline(x(3), y(13), x(3), y(15), dc);                      
drawadd(x(10),y(12),0,2,1,3,'',1,ds/3,F,dc);                 
drawmult(x(7),y(12),x(10),'b1','',0,ds/3,F,dc);              
drawmult(x(7),y(8),x(10),'b2','',0,ds/3,F,dc);               
drawlhv(x(10), y(8),  x(11),  y(11), 0, dc);                 
drawadd(x(10),y(16),2,0,1,1,'',1,ds/3,F,dc);                 
drawline(x(11), y(13), x(11), y(15), dc);                    
drawline(x(4), y(16), x(7), y(16), dc);                      
drawline(x(7), y(16), x(10), y(16), dc);                     
drawin(x(2), y(16), 'IN', 2, ds, F, dc);                     
drawout(x(12), y(16), 'OUT', 0, ds, F, dc);                  
drawnode(x(7), y(8), ' ', 1, 1, F, dc);                      
drawnode(x(7), y(12), ' ', 1, 1, F, dc);                     
drawnode(x(7), y(16), ' ', 1, 1, F, dc);                     
axis('equal')
axis('off')