afalbut.m

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

% afalbut.m  Album buttons (script)
% 1:41  24/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:
%        Miroslav D. Lutovac, Dejan V. Tosic, Brian L. Evans
%           Advanced Filter Design for Signal Processing
%                   Using MATLAB and Mathematica
%

x0 = 0; y0 = 0; dx = 0.5; ds = 1.25; F  = 8; % LM init

ul1 = uicontrol('String', 'LPLQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.90 0.08 0.05] ...
     , 'CallBack', 'clf;drawlplq(x0,y0,dx,ds,F);afalbut');

ul2 = uicontrol('String', 'LPMQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.84 0.08 0.05] ...
     , 'CallBack', 'clf;drawlpmq(x0,y0,dx,ds,F);afalbut');

ul3 = uicontrol('String', 'LPHQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.78 0.08 0.05] ...
     , 'CallBack', 'clf;drawlphq(x0,y0,dx,ds,F);afalbut');

ul4 = uicontrol('String', 'LPNMQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.70 0.085 0.05] ...
     , 'CallBack', 'clf;drawlnmq(x0,y0,dx,ds,F);afalbut');

ul5 = uicontrol('String', 'LPNHQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.64 0.085 0.05] ...
     , 'CallBack', 'clf;drawlnhq(x0,y0,dx,ds,F);afalbut');

ul6 = uicontrol('String', 'HPLQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.56 0.08 0.05] ...
     , 'CallBack', 'clf;drawhplq(x0,y0,dx,ds,F);afalbut');

ul7 = uicontrol('String', 'HPMQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.50 0.08 0.05] ...
     , 'CallBack', 'clf;drawhpmq(x0,y0,dx,ds,F);afalbut');

ul8 = uicontrol('String', 'HPHQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.44 0.08 0.05] ...
     , 'CallBack', 'clf;drawhphq(x0,y0,dx,ds,F);afalbut');

ul9 = uicontrol('String', 'HPNMQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.36 0.085 0.05] ...
     , 'CallBack', 'clf;drawhnmq(x0,y0,dx,ds,F);afalbut');

ul10 = uicontrol('String', 'HPNHQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.30 0.085 0.05] ...
     , 'CallBack', 'clf;drawhnhq(x0,y0,dx,ds,F);afalbut');


ul11 = uicontrol('String', 'APLQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.22 0.08 0.05] ...
     , 'CallBack', 'clf;drawaplq(x0,y0,dx,ds,F);afalbut');

ul12 = uicontrol('String', 'APMQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.16 0.08 0.05] ...
     , 'CallBack', 'clf;drawapmq(x0,y0,dx,ds,F);afalbut');

ul13 = uicontrol('String', 'APHQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.10 0.08 0.05] ...
     , 'CallBack', 'clf;drawaphq(x0,y0,dx,ds,F);afalbut');

ud1 = uicontrol('String', 'BPLQ', 'Units', 'normalized' ...
     , 'Position', [0.0 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawbplq(x0,y0,dx,ds,F);afalbut');

ud2 = uicontrol('String', 'BPMQ', 'Units', 'normalized' ...
     , 'Position', [0.07 0.01 0.08 0.05] ...
     , 'CallBack', 'clf;drawbpmq(x0,y0,dx,ds,F);afalbut');

ud3 = uicontrol('String', 'BPHQ', 'Units', 'normalized' ...
     , 'Position', [0.15 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawbphq(x0,y0,dx,ds,F);afalbut');

ud4 = uicontrol('String', 'BRLQ', 'Units', 'normalized' ...
     , 'Position', [0.23 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawbrlq(x0,y0,dx,ds,F);afalbut');

ud5 = uicontrol('String', 'BRMQ', 'Units', 'normalized' ...
     , 'Position', [0.30 0.01 0.08 0.05] ...
     , 'CallBack', 'clf;drawbrmq(x0,y0,dx,ds,F);afalbut');

ud6 = uicontrol('String', 'BRHQ', 'Units', 'normalized' ...
     , 'Position', [0.38 0.01 0.08 0.05] ...
     , 'CallBack', 'clf;drawbrhq(x0,y0,dx,ds,F);afalbut');

ud7 = uicontrol('String', 'KHN', 'Units', 'normalized' ...
     , 'Position', [0.47 0.01 0.08 0.05] ...
     , 'CallBack', 'clf;drawkhn(x0,y0,dx,ds,F);afalbut');

ud7p = uicontrol('String', 'SK2B', 'Units', 'normalized' ...
     , 'Position', [0.56 0.01 0.08 0.05] ...
     , 'CallBack', 'clf;drawsk2b;afalbut');

ud8 = uicontrol('String', 'OTA1', 'Units', 'normalized' ...
     , 'Position', [0.65 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawotab(x0,y0,dx,ds,F);afalbut');

ud9 = uicontrol('String', 'OTA2', 'Units', 'normalized' ...
     , 'Position', [0.72 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawotac(x0,y0,dx,ds,F);afalbut');

ud10 = uicontrol('String', 'OTA3', 'Units', 'normalized' ...
     , 'Position', [0.79 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawotad(x0,y0,dx,ds,F);afalbut');

ud11 = uicontrol('String', 'OTA4', 'Units', 'normalized' ...
     , 'Position', [0.86 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawotae(x0,y0,dx,ds,F);afalbut');

ud12 = uicontrol('String', 'OTA5', 'Units', 'normalized' ...
     , 'Position', [0.93 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawotaf(x0,y0,dx,ds,F);afalbut');

rd1  = uicontrol('String', 'RLC4', 'Units', 'normalized' ...
     , 'Position', [0.93 0.09 0.07 0.05] ...
     , 'CallBack', 'clf;drawlc4(x0,y0,dx,ds,F);afalbut');

rd2  = uicontrol('String', 'RLC3', 'Units', 'normalized' ...
     , 'Position', [0.93 0.15 0.07 0.05] ...
     , 'CallBack', 'clf;drawlc3(x0,y0,dx,ds,F);afalbut');

rd3  = uicontrol('String', 'RLC2', 'Units', 'normalized' ...
     , 'Position', [0.93 0.21 0.07 0.05] ...
     , 'CallBack', 'clf;drawlc2(x0,y0,dx,ds,F);afalbut');

rd4  = uicontrol('String', 'RLC1', 'Units', 'normalized' ...
     , 'Position', [0.93 0.27 0.07 0.05] ...
     , 'CallBack', 'clf;drawlc1(x0,y0,dx,ds,F);afalbut');


rd5 = uicontrol('String', 'CCSK', 'Units', 'normalized' ...
     , 'Position', [0.93 0.37 0.07 0.05] ...
     , 'CallBack', 'clf;drawccsk(x0,y0,dx,ds,F);afalbut');

ui0 = uicontrol('String', 'close', 'Units', 'normalized' ...
     , 'Position', [0.92 0.92 0.07 0.06] ...
     , 'CallBack', 'close(gcf)');

ui1 = uicontrol('String', 'info', 'Units', 'normalized' ...
     , 'Position', [0.92 0.82 0.07 0.06] ...
     , 'CallBack', 'afalbum');