scalbut.m

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

% scalbut.m  Album buttons (script)
% 20:28  24/2/99
%
%            Album of SC 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', 'SC1', 'Units', 'normalized' ...
     , 'Position', [0.01 0.90 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc1(x0,y0,dx,ds,F);scalbut');

ul2 = uicontrol('String', 'SC1a', 'Units', 'normalized' ...
     , 'Position', [0.01 0.84 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc1a(x0,y0,dx,ds,F);scalbut');

ul3 = uicontrol('String', 'SC1b', 'Units', 'normalized' ...
     , 'Position', [0.01 0.78 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc1b(x0,y0,dx,ds,F);scalbut');

ul4 = uicontrol('String', 'SC1c', 'Units', 'normalized' ...
     , 'Position', [0.01 0.72 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc1c(x0,y0,dx,ds,F);scalbut');

ul5 = uicontrol('String', 'SC1d', 'Units', 'normalized' ...
     , 'Position', [0.01 0.66 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc1d(x0,y0,dx,ds,F);scalbut');

ul6 = uicontrol('String', 'SC2', 'Units', 'normalized' ...
     , 'Position', [0.01 0.58 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc2(x0,y0,dx,ds,F);scalbut');

ul7 = uicontrol('String', 'SC2a', 'Units', 'normalized' ...
     , 'Position', [0.01 0.52 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc2a(x0,y0,dx,ds,F);scalbut');

ul8 = uicontrol('String', 'SC2b', 'Units', 'normalized' ...
     , 'Position', [0.01 0.46 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc2b(x0,y0,dx,ds,F);scalbut');

ul9 = uicontrol('String', 'SC3', 'Units', 'normalized' ...
     , 'Position', [0.01 0.38 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc3(x0,y0,dx,ds,F);scalbut');

ul10 = uicontrol('String', 'SC3a', 'Units', 'normalized' ...
     , 'Position', [0.01 0.32 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc3a(x0,y0,dx,ds,F);scalbut');

ul11 = uicontrol('String', 'SC4', 'Units', 'normalized' ...
     , 'Position', [0.01 0.24 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc4(x0,y0,dx,ds,F);scalbut');

ul12 = uicontrol('String', 'SC4a', 'Units', 'normalized' ...
     , 'Position', [0.01 0.18 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc4a(x0,y0,dx,ds,F);scalbut');

ul13 = uicontrol('String', 'SC5', 'Units', 'normalized' ...
     , 'Position', [0.01 0.10 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc5(x0,y0,dx,ds,F);scalbut');

ud1 = uicontrol('String', 'SC6a', 'Units', 'normalized' ...
     , 'Position', [0.01 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc6a(x0,y0,dx,ds,F);scalbut');

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

ud3 = uicontrol('String', 'SC7', 'Units', 'normalized' ...
     , 'Position', [0.17 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawsc7(x0,y0,dx,ds,F);scalbut');

ud4 = uicontrol('String', 'SCu1', 'Units', 'normalized' ...
     , 'Position', [0.26 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawscu1(x0,y0,dx,ds,F);scalbut');

ud5 = uicontrol('String', 'SCu2', 'Units', 'normalized' ...
     , 'Position', [0.33 0.01 0.07 0.05] ...
     , 'CallBack', 'clf;drawscu2(x0,y0,dx,ds,F);scalbut');

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

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