dfdsbox.m

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

function h = dfdsbox(Xmin,Xmax,Ymin,Ymax,Zmin,Zmax,wirecolor)

% dfdsbox.m  ADFDS solid model cuboid (box)
%
% 12:24  17/2/99
%
%   Authors: Dejan V. Tosic, Miroslav D. Lutovac, 1999.02.16
%                 [e-mail]
%                 [e-mail]
%
%   Copyright (c) 1999 by Tosic & Lutovac
%   $Revision: 1.0 $  $Date: 1999/02/16 21:27:42 $
%
%   References:
%        Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           Advanced Filter Design for Signal Processing
%                   Using MATLAB and Mathematica

if nargin<6
 error('ADFDS ERROR: Inssuficiant data for DFDSBOX.');
elseif nargin==6
 C1 = 'b';
 C2 = 'c';
 C3 = 'r';
 C4 = 'm';
 C5 = 'y';
 C6 = 'g';
else
  % extend the case for 'color' or [r g b] syntax
end

X1 = [Xmin Xmax Xmax Xmin Xmin];
Y1 = [Ymin Ymin Ymax Ymax Ymin];
Z1 = [Zmin Zmin Zmin Zmin Zmin];

X2 = [Xmin Xmax Xmax Xmin Xmin];
Y2 = [Ymin Ymin Ymax Ymax Ymin];
Z2 = [Zmax Zmax Zmax Zmax Zmax];

X3 = [Xmin Xmax Xmax Xmin Xmin];
Y3 = [Ymin Ymin Ymin Ymin Ymin];
Z3 = [Zmin Zmin Zmax Zmax Zmin];

X4 = [Xmin Xmax Xmax Xmin Xmin];
Y4 = [Ymax Ymax Ymax Ymax Ymax];
Z4 = [Zmin Zmin Zmax Zmax Zmin];

X5 = [Xmin Xmin Xmin Xmin Xmin];
Y5 = [Ymin Ymax Ymax Ymin Ymin];
Z5 = [Zmin Zmin Zmax Zmax Zmin];

X6 = [Xmax Xmax Xmax Xmax Xmax];
Y6 = [Ymin Ymax Ymax Ymin Ymin];
Z6 = [Zmin Zmin Zmax Zmax Zmin];

h = fill3(X1,Y1,Z1,C1, X2,Y2,Z2,C2, X3,Y3,Z3,C3, ...
          X4,Y4,Z4,C4, X5,Y5,Z5,C5, X6,Y6,Z6,C6);