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

				function dr = drawlhv(a,b,c,d,p,dc)
				
				% drawlhv.m  Draw LINE horizontal+vertical
				% 8:06PM  9/18/99
				%
				%            Drawing Filter Realizations
				%
				%   Authors: Miroslav D. Lutovac, Dejan V. Tosic, 1999.02.21
				%                 lutovac@galeb.etf.bg.ac.yu
				%                 tosic@telekom.etf.bg.ac.yu
				%
				%   Copyright (c) 1999 by Lutovac & Tosic
				%   $Revision: 1.0 $  $Date: 1999/08/21 02:17:42 $
				%
				%   References:
				%        Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
				%           Advanced Filter Design for Signal Processing
				%                   Using MATLAB and Mathematica
				%
				
				if p == 0
				 x = [a, c, c];
				 y = [b, b, d];
				 line(x,y,'Color',dc)
				elseif p == 1
				 x = [a, a, c];
				 y = [b, d, d];
				 line(x,y,'Color',dc)
				elseif p == 2
				 x = [a, c, c];
				 y = [b, b, d];
				 line(x,y,'Color',dc)
				else
				 x = [a, a, c];
				 y = [b, d, d];
				 line(x,y,'Color',dc)
				end