function [] = GUI_25()
D = dir('*.jpg');
S.NAM = {D(:).name};
S.fh = figure('units','pixels','position',[450 450 400 200],'menubar','none','name','Verify Password.','resize','off','numbertitle','off','name','GUI_25');
S.ls = uicontrol('style','list',...
'units','pix',...
'position',[10 60 380 120],...
'backgroundcolor','w',...
'string',S.NAM,...
'HorizontalAlign','left');
S.pb = uicontrol('style','push',...
'units','pix',...
'position',[10 10 380 40],...
'backgroundcolor','w',...
'HorizontalAlign','left',...
'string','Load Image',...
'fontsize',14,'fontweight','bold',...
'callback',{@pb_call,S});
function [] = pb_call(varargin)
S = varargin{3};
L = get(S.ls,{'string';'value'});
try
L = L{1}{L{2}};
X = imread(L);
str = [L(1:end-4),'_',strrep(datestr(now,'HH:MM:SS'),':','_')];
assignin('base',str,X)
catch
fprintf('\t\t%s\n','No file selected, or read error.')
end