bdrwin.m

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

function [xs,matrixE] = bdrwin(matrixE,x,y,ds,F,dc)

% bdrwin.m  Draw input
% 5:48PM  9/18/99
%
%            Drawing Filter Realizations
%
%   Authors: Miroslav D. Lutovac, Dejan V. Tosic, 1999.02.21
%                 [e-mail]
%                 [e-mail]
%
%   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
%

XS = ['                                                             '];
title('INPUT ')
  [xe1,ye1]=ginput(1);   xe1 = round(xe1); ye1 =round(ye1);

xs = ['drawin(x(' num2str(xe1) '), y(' num2str(ye1) '), ''IN'', 2, ds, F, dc);'];
  title(' ')

XS(1:max(size(xs)))=xs;
eval(xs);
matrixE=[matrixE;XS];