ProfilesGUI(action)

function ProfilesGUI(action)
%
% Este es el GUI de MatLab 5.2 para Profiles
% Autor:		Sergio A. Gonzalez
% Version:	Preliminar
% Fecha:		5-1-99
%
switch(action)
case 'load',
   load mydata;
   set(gcbf,'UserData',XYData)
case 'print'
   ghostDir = 'D:\MATLAB\Ghostscript';
   gsPath	= 'D:\MATLAB\Ghostscript';
   print -deps2 -noui -r600 C:\MATLAB\Works\fig1.eps		% Encapsulated Postcript Level 2
%   print -dps2 -noui -r600 D:\MATLAB\Works\fig1.ps		% Postcript Level 2
%   print -dps2 -noui -r600 E:\Sergio\stepper\Damped.ps		% Postcript Level 2
%   print -dps2 -noui -r600 'E:\Sergio\stepper\Trpz-4860pps 1.ps'		% Postcript Level 2
%   print -dps2 -noui -r600 'E:\Sergio\stepper\Trpz-4860pps 2.ps'		% Postcript Level 2
   
   % for MatLab 5.1
%   print -dljet3 -noui 
   % for MatLab 5.2
%   print -dljet4 -noui D:\MATLAB\Works\fig1.ps

%   print -deps2 -noui -r600 -loose -epsi D:\MATLAB\Works\fig1.eps
case 'ZoomOut1'
   axes(findobj('Tag','Grafico1'));
   axis auto;
case 'ZoomOut2'
   axes(findobj('Tag','Grafico2'));
   axis auto;
case 'ZoomOut3'
   axes(findobj('Tag','Grafico3'));
   axis auto;
case 'plot'
   XYData=get(gcbf,'UserData')
   x=XYData(:,1);
   y=XYData(:,2);
   plot(x,y)
case 'close'
   close(gcbf)
end