• Diseñar por medio una herramienta de Matlab una interfaz grafica
• Realizar un software que me permita facilitar el acceso a la información y adquirir conocimientos acerca de la señal.
• Por medio de esta herramienta analizar de una forma practica la señal adquirida por el circuito.

PROGRAMAS PARA LA REALIZACION DE LA INTERFAZ GRAFICA

function varargout = cardio(varargin)

% CARDIO Application M-file for cardio.fig

% FIG = CARDIO launch cardio GUI.

% CARDIO('callback_name', ...) invoke the named callback.

% Last Modified by GUIDE v2.0 01-Dec-2003 17:53:59

if nargin == 0 % LAUNCH GUI

fig = openfig(mfilename,'reuse');

% Generate a structure of handles to pass to callbacks, and store it.

handles = guihandles(fig);

guidata(fig, handles);

if nargout > 0

varargout{1} = fig;

end

elseif ischar(varargin{1}) % INVOKE NAMED SUBFUNCTION OR CALLBACK

try

[varargout{1:nargout}] = feval(varargin{:}); % FEVAL switchyard

catch

disp(lasterr);

end

end

%| ABOUT CALLBACKS:

%| GUIDE automatically appends subfunction prototypes to this file, and

%| sets objects' callback properties to call them through the FEVAL

%| switchyard above. This comment describes that mechanism.

%|

%| Each callback subfunction declaration has the following form:

%| <SUBFUNCTION_NAME>(H, EVENTDATA, HANDLES, VARARGIN)

%|

%| The subfunction name is composed using the object's Tag and the

%| callback type separated by '_', e.g. 'slider2_Callback',

%| 'figure1_CloseRequestFcn', 'axis1_ButtondownFcn'.

%|

%| H is the callback object's handle (obtained using GCBO).

%|

%| EVENTDATA is empty, but reserved for future use.

%|

%| HANDLES is a structure containing handles of components in GUI using

%| tags as fieldnames, e.g. handles.figure1, handles.slider2. This

%| structure is created at GUI startup using GUIHANDLES and stored in

%| the figure's application data using GUIDATA. A copy of the structure

%| is passed to each callback. You can store additional information in

%| this structure at GUI startup, and you can change the structure

%| during callbacks. Call guidata(h, handles) after changing your

%| copy to replace the stored original so that subsequent callbacks see

%| the updates. Type "help guihandles" and "help guidata" for more

%| information.

%|

%| VARARGIN contains any extra arguments you have passed to the

%| callback. Specify the extra arguments by editing the callback

%| property in the inspector. By default, GUIDE sets the property to:

%| <MFILENAME>('<SUBFUNCTION_NAME>', gcbo, [], guidata(gcbo))

%| Add any extra arguments after the last argument, before the final

%| closing parenthesis.

% --------------------------------------------------------------------

function varargout = pushbutton1_Callback(h, eventdata, handles, varargin)

clc;

%adq = analoginput('nidaq', 1);

%addchannel(adq,1);

%Fs=eval(get(handles.edit1,'String'));

%tadq=eval(get(handles.edit2,'String'));

%nmuestras=Fs*tadq;

%set(adq,'SampleRate',Fs)

%set(adq,'SamplesPerTrigger',nmuestras)

%start(adq)

%set(handles.status,'String','Adquiriendo');

%while strcmp(adq.Running,'On')

%end

%data = getdata(adq);

load datos2.mat %%%%%%%%%%%%

nmuestras=length(data);

Fs=300;

tadq=nmuestras/Fs; %%%%%%%%%%

tiempo=linspace(0,tadq,nmuestras);

axes(handles.axes1)

plot(tiempo,data),zoom on, grid on

xlabel('Tiempo (sg)')

ylabel('Rango de Voltajes')

save datos.mat data Fs tadq -double -tabs

% --------------------------------------------------------------------

function varargout = slider1_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.slider1.

set(handles.text2,'String',fix(get(gcbo,'Value')))

% --------------------------------------------------------------------

function varargout = slider2_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.slider2.

set(handles.text4,'String',fix(get(gcbo,'Value')))

% --------------------------------------------------------------------

function varargout = pushbutton2_Callback(h, eventdata, handles, varargin)

clc;

load datos

N=4;

Wn=[80 165]/Fs;

[Num,Den] = butter(N,Wn,'stop');

dataf=filter(Num,Den,data);

plot(dataf),zoom on, grid on

% --------------------------------------------------------------------

function varargout = pushbutton3_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton3.

clc;

load datos

N=4;

R=1;

Wn=[80 165]/Fs;

[Num,Den] = cheby1(N,R,Wn,'stop');

dataf=filter(Num,Den,data);

plot(dataf),zoom on, grid on

% --------------------------------------------------------------------

function varargout = pushbutton4_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton4.

clc;

load datos

N=4;

R=60;

Wn=[115 125]/Fs;

[Num,Den] = cheby2(N,R,Wn,'stop');

dataf=filter(Num,Den,data);

plot(dataf),zoom on, grid on

% --------------------------------------------------------------------

function varargout = pushbutton5_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton5.

clc;

load datos

N=4;

Rp=1;

Rs=80;

Wn=[115 125]/Fs;

[Num,Den] = ellip(N,Rp,Rs,Wn,'stop');

dataf=filter(Num,Den,data);

plot(dataf),zoom on, grid on

% --------------------------------------------------------------------

function varargout = pushbutton6_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton6.

close(gcf)

% --------------------------------------------------------------------

function varargout = pushbutton11_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton11.

clc;

load datos

nmuestras=length(data);

N=4;

Wn=[80 165]/Fs;

[Num,Den] = butter(N,Wn,'stop');

[h,f,s] = freqz(Num,Den,nmuestras,Fs);

s.plot='mag';

s.xunits = 'khz';

s.yunits = 'linear';

freqzplot(h,f,s),title('Respuesta del Filtro')

figure(1),set(gcf,'Name','Polos y Ceros','Numbertitle','off')

zplane(Num,Den)

% --------------------------------------------------------------------

function varargout = pushbutton12_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton12.

clc;

load datos

nmuestras=length(data);

N=4;

R=1;

Wn=[75 165]/Fs;

[Num,Den] = cheby1(N,R,Wn,'stop');

[h,f,s] = freqz(Num,Den,nmuestras,Fs);

s.plot='mag';

s.xunits = 'khz';

s.yunits = 'linear';

freqzplot(h,f,s),title('Respuesta del Filtro')

figure(1),set(gcf,'Name','Polos y Ceros','Numbertitle','off')

zplane(Num,Den)

% --------------------------------------------------------------------

function varargout = pushbutton13_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton13.

clc;

load datos

nmuestras=length(data);

N=4;

R=60;

Wn=[115 125]/Fs;

[Num,Den] = cheby2(N,R,Wn,'stop');

[h,f,s] = freqz(Num,Den,nmuestras,Fs);

s.plot='mag';

s.xunits = 'khz';

s.yunits = 'linear';

freqzplot(h,f,s),title('Respuesta del Filtro')

figure(1),set(gcf,'Name','Polos y Ceros','Numbertitle','off')

zplane(Num,Den)

% --------------------------------------------------------------------

function varargout = pushbutton14_Callback(h, eventdata, handles, varargin)

% Stub for Callback of the uicontrol handles.pushbutton14.

clc;

load datos

nmuestras=length(data);

N=4;

Rp=1;

Rs=80;

Wn=[115 125]/Fs;

[Num,Den] = ellip(N,Rp,Rs,Wn,'stop');

[h,f,s] = freqz(Num,Den,nmuestras,Fs);

s.plot='mag';

s.xunits = 'khz';

s.yunits = 'linear';

freqzplot(h,f,s),title('Respuesta del Filtro')

figure(1),set(gcf,'Name','Polos y Ceros','Numbertitle','off')

zplane(Num,Den)

ING Mecatronico. BUCARAMANGA – SANTANDER – COLOMBIA