drawoutp.m

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

function dr = drawoutp(a,b,t,p,s,F)

% drawoutp.m  Draw output
% 3:45  22/2/99
%
%            Album of Analog Filter Realizations
%
%   Authors: Dejan V. Tosic, Miroslav D. Lutovac, 1999.02.21
%                 [e-mail]
%                 [e-mail]
%
%   Copyright (c) 1999 by Tosic & Lutovac
%   $Revision: 1.0 $  $Date: 1999/02/21 02:17:42 $
%
%   References:
%        Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           Advanced Filter Design for Signal Processing
%                   Using MATLAB and Mathematica
%

xy = 0:0.05:1;

if p == 0
 x = [a,a+s*0.3];   y = [b,b];
 line(x,y)
 x1 = a+s*0.35 + s*0.05*sin(2*pi*xy);
 y1 = b + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 x2 = a + [0.1,0.2,0.1];   y2 = b + [-0.05,0,0.05];
 line(x2,y2)
 text(a+s*0.45,b,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','left','VerticalAlignment','middle')
elseif p == 1
 x = [a,a];   y = [b,b+s*0.3];
 line(x,y)
 x1 = a + s*0.05*sin(2*pi*xy);
 y1 = b+s*0.35 + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 x2 = a + [0.05,0,-0.05];   y2 = b + [0.1,0.2,0.1];
 line(x2,y2)
 text(a,b+s*0.45,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','center','VerticalAlignment','bottom')
elseif p == 2
 x = [a,a-s*0.3];   y = [b,b];
 line(x,y)
 x1 = a - s*0.35 + s*0.05*sin(2*pi*xy);
 y1 = b + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 x2 = a - [0.1,0.2,0.1];   y2 = b + [0.05,0,-0.05];
 line(x2,y2)
 text(a-s*0.45,b,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','right','VerticalAlignment','middle')
elseif p == 3
 x = [a,a];   y = [b,b-s*0.3];
 line(x,y)
 x1 = a + s*0.05*sin(2*pi*xy);
 y1 = b-s*0.35 + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 x2 = a + [0.05,0,-0.05];   y2 = b - [0.1,0.2,0.1];
 line(x2,y2)
 text(a,b-s*0.45,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','center','VerticalAlignment','top')
elseif p == 4
 x = [a,a+s*0.3];   y = [b,b];
 line(x,y)
 x1 = a+s*0.35 + s*0.05*sin(2*pi*xy);
 y1 = b + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 text(a+s*0.45,b,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','left','VerticalAlignment','middle')
elseif p == 5
 x = [a,a];   y = [b,b+s*0.3];
 line(x,y)
 x1 = a + s*0.05*sin(2*pi*xy);
 y1 = b+s*0.35 + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 text(a,b+s*0.45,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','center','VerticalAlignment','bottom')
elseif p == 6
 x = [a,a-s*0.3];   y = [b,b];
 line(x,y)
 x1 = a - s*0.35 + s*0.05*sin(2*pi*xy);
 y1 = b + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 text(a-s*0.45,b,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','right','VerticalAlignment','middle')
elseif p == 7
 x = [a,a];   y = [b,b-s*0.3];
 line(x,y)
 x1 = a + s*0.05*sin(2*pi*xy);
 y1 = b-s*0.35 + s*0.05*cos(2*pi*xy);
 line(x1,y1)
 text(a,b-s*0.45,t,'FontName','Times','FontSize',F,...
   'HorizontalAlignment','center','VerticalAlignment','top')
end