bdrwline.m

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

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

% bdrwline.m  Draw LINE
% 5:50PM  9/18/99
%
%            Drawing Filter Realizations
%
%   Authors: Miroslav D. Lutovac, Dejan V. Tosic, 8/23/99
%                 [e-mail]
%                 [e-mail]
%
%   Copyright (c) 1999 by Lutovac & Tosic
%   $Revision: 1.0 $  $Date: 4:51PM  8/23/99 $
%
%   References:
%        Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           Advanced Filter Design for Signal Processing
%                   Using MATLAB and Mathematica
%

XS = ['                                                             '];
  title('LINE 1st point')
  [xe1,ye1]=ginput(1);   xe1 = round(xe1); ye1 =round(ye1);
  title('LINE 2nd point')
  [xe2,ye2]=ginput(1);   xe2 = round(xe2); ye2 =round(ye2);

% drawline(x1,y1,x2,y2)
xs = ['drawline(x(' num2str(xe1) '), y(' num2str(ye1) '), x(' num2str(xe2) ...
     '), y(' num2str(ye2) '), dc);'];
  title(' ')

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