drawhphq.m

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

function drhphq = drawhphq(x0,y0,dx,ds,F)

% drawhphq.m  Draw highpass high Q-factor OpAmp RC biquad
% 1:38  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:
%   [1]  Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           Advanced Filter Design for Signal Processing
%                   Using MATLAB and Mathematica
%
%   [2]                G. S. Moschytz, P. Horn
%                   Active Filter Design Handbook
%                    John Wiley, New York, 1981
%

x4a = x0-2.95*dx; xV1 = x0-1.5*dx; xV5 = x0; x3a = x0+1.75*dx;
xV6 = x0+2.5*dx; xV4 = x0+4*dx; yV1 = y0-1.5*dx; y4a = y0;
y4b = y0+dx; y4c = y0+2.5*dx; y4d = y0+2.0*dx;
yA1 = y0+dx/2; yV4 = y0+0.5*dx; ytxt = y0+3*dx;

 drawtext(xV1, ytxt, 'HP-HQ',F+2)
  drawopam(xV1, yA1, xV5, 'A1', 0, ds, F)
  drawopam(xV6, yA1, xV4, 'A2', 0, ds, F)
  drawin(x3a, yV1, 'V1', 3, ds, F)
  drawr(x4a, y4b, xV1, 'R1', 0, ds/2, F)
  drawc(xV5, y4b, x3a, 'C3', 0, ds/2, F)
  drawr(xV5, y4a, x3a, 'R4', 0, ds/2, F)
  drawr(xV1, yV1, y4a, 'R6',  3, ds/2, F)
  drawr(xV6, yV1, y4a, 'R8',  3, ds/2, F)
  drawr(x4a, y4a, xV1, 'R2',  0, ds/2, F)
  drawc(x3a, yV1, y4a, 'C7',  1, ds/2, F)
  drawjunc(x3a, y4a, 'V6', 2, 1, F)
  drawjunc(xV1, y4a, 'V2', 2, 1, F)
  drawjunc(x3a, y4b, 'V3', 1, 1, F)
  drawjunc(xV4, yV4, 'V4', 0, 1, F)
  drawjunc(xV1, y4b, '', 0, 1, F)
  drawjunc(x4a, y4b, '', 0, 1, F)
  drawjunc(xV6, y4a, '', 0, 1, F)
  drawjunc(xV5, yV4, 'V5', 0, 1, F)
  drawgrnd(xV1, yV1, 0, ds/2)
  drawgrnd(xV6, yV1, 0, ds/2)
  drawj(xV5, y4a, xV5, y4b, 1)
  drawj(x3a, y4a, xV6, y4a, 0)
  drawj(x3a, y4b, xV6, y4b, 0)
  drawj(x4a, y4a, xV4, y4c, 1)
  drawj(xV4, yV4, xV4, y4c, 0)
  drawj(xV1, y4b, x3a, y4d, 1)
  drawj(x3a, y4b, x3a, y4d, 1)  
axis('equal')
axis('off')