демонстрационный пример в matlab imageext

[rozochka]

в этом примере выводит рисунки.
как выводить свои рисунки?

function imageext(action)
% IMAGEEXT Examples of images with a variety of colormaps
% demonstrates loading images, available MATLAB colormaps
% and spinning colormaps

% Rewritten for V5 demo by Kelly Liu, 1-8-96; jae Roh, 10-15-96
% Copyright 1984-2008 The MathWorks, Inc.
% $Revision: 5.18.4.1 $Date: 2008/12/15 08:52:34 $

% play= 1;
% stop=-1;

if nargin<1,
action='initialize';
end;

if strcmp(action,'initialize'),
oldFigNumber=watchon;

figNumber=figure( ...
'Name','Image and Color Map', ...
'Color', [.8 .8 .8], ...
'NumberTitle','off', ...
'Color', 'black', ...
'DoubleBuffer', 'on', ...
'Visible','off');

axes( ...
'Units','normalized', ...
'Color', [.8 .8 .8], ...
'Position',[0.05 0.10 0.75 0.87], ...
'Visible','off');

axis([0 1 0 1]);

%===================================
% Information for all buttons
labelColor=[0.8 0.8 0.8];
top=0.95;
bottom=0.05;

% yInitLabelPos=0.90;
left=0.825;
labelWid=0.15;
labelHt=0.05;
btnWid=0.15;
btnHt=0.05;
% Spacing between the label and the button for the same command
btnOffset=0.003;
% Spacing between the button and the next command's label
spacing=0.05;
%====================================
% The CONSOLE frame
frmBorder=0.02;
yPos=0.05-frmBorder;
frmPos=[left-frmBorder yPos btnWid+2*frmBorder 0.9+2*frmBorder];
h=uicontrol( ...
'Style','frame', ...
'Units','normalized', ...
'Position',frmPos, ...
'BackgroundColor',[0.50 0.50 0.50]);
%====================================

%====================================
% The number popup button
btnNumber=1;
yLabelPos=top-(btnNumber-1)*(btnHt+labelHt+spacing);
labelStr=' Images';
popupStr=str2mat('Fluid Jet', 'Bone',...
'Gatlinburg',...
'Durer',...
'Durer Detail',...
'Cape Cod',...
'Clown',...
'Earth',...
'Mandrill');
imglist = {'flujet', 'spine',...
'gatlin',...
'durer',...
'detail',...
'cape',...
'clown',...
'earth',...
'mandrill',...
'spiral'};
ClbkStr='imageext(''start'')';

% Generic label information
labelPos=[left yLabelPos-labelHt labelWid labelHt];
uicontrol( ...
'Style','text', ...
'Units','normalized', ...
'Position',labelPos, ...
'BackgroundColor',labelColor, ...
'HorizontalAlignment','left', ...
'String',labelStr);
% Generic popup button information
btnPos=[left yLabelPos-labelHt-btnHt-btnOffset btnWid btnHt];
popupHndl=uicontrol( ...
'Style','popup', ...
'Units','normalized', ...
'Position',btnPos, ...
'String',popupStr, ...
'Callback',ClbkStr);
%=============================================
% The view popup button
btnNumber=2;
yLabelPos=top-(btnNumber-1)*(btnHt+labelHt+spacing);
labelStr=' Colormap';

popupStr=str2mat('default', 'hsv', 'hot', 'pink', 'cool', 'bone', 'prism', 'flag', 'gray', 'rand');


% Generic button information
ClbkStr = 'imageext(''color'')';
labelPos=[left yLabelPos-labelHt labelWid labelHt];
VpopupHndl=uicontrol( ...
'Style','text', ...
'Units','normalized', ...
'Position',labelPos, ...
'BackgroundColor',labelColor, ...
'HorizontalAlignment','left', ...
'String',labelStr);
btnPos=[left yLabelPos-labelHt-btnHt-btnOffset btnWid btnHt];
VpopupHndl=uicontrol( ...
'Style','popup', ...
'Units','normalized', ...
'Position',btnPos, ...
'String',popupStr, ...
'Call', ClbkStr);

%====================================
% The Spin button
btnNumber=3;
labelStr='Spinmap';
callbackStr='spinmap';
yLabelPos=top-(btnNumber-1)*(btnHt+labelHt+spacing);
btnPos=[left yLabelPos-labelHt-btnHt-btnOffset btnWid btnHt];
infoHndl=uicontrol( ...
'Style','push', ...
'Units','normalized', ...
'position',btnPos, ...
'string',labelStr, ...
'call',callbackStr);
if (get(0, 'screendepth')>8)
set(infoHndl, 'Visible', 'off');
end
%====================================
% The INFO button
labelStr='Info';
callbackStr='imageext(''info'')';
infoHndl=uicontrol( ...
'Style','push', ...
'Units','normalized', ...
'position',[left bottom+2*btnHt+spacing btnWid 2*btnHt], ...
'string',labelStr, ...
'call',callbackStr);

%====================================
% The CLOSE button
labelStr='Close';
callbackStr='close(gcf)';
closeHndl=uicontrol( ...
'Style','push', ...
'Units','normalized', ...
'position',[left bottom btnWid 2*btnHt], ...
'string',labelStr, ...
'call',callbackStr);

% Uncover the figure
hndlList=[infoHndl closeHndl popupHndl VpopupHndl];
passPrmt.handle=hndlList;
passPrmt.clmap=[];
passPrmt.imgfile=imglist;
set(figNumber,'Visible','on', ...
'UserData',passPrmt);
watchoff(oldFigNumber);
figure(figNumber);
shwimg('flujet', passPrmt)
elseif strcmp(action,'start'),
figNumber=gcf;
passPrmt=get(figNumber, 'UserData');
hndlList=passPrmt.handle;
imglist=passPrmt.imgfile;
popupHndl=hndlList(3);
ClpopupHndl=hndlList(4);
n=get(popupHndl, 'Value');
set(ClpopupHndl, 'Value', 1);
filename=char(imglist(n));
shwimg(filename, passPrmt);
elseif strcmp(action,'color'),
colorlabels ={'default', 'hsv','hot','pink','cool','bone',...
'prism','flag','gray',...
'rand'};
figNumber=gcf;
passPrmt=get(figNumber, 'UserData');
hndlList=passPrmt.handle;
VpopupHndl=hndlList(4);
colr=get(VpopupHndl, 'Value');
if colr==10
colormap(rand(64,3));
elseif colr==1
colormap(passPrmt.clmap);
else
colormap(char(colorlabels(colr)));
end;

elseif strcmp(action,'info');
helpwin(mfilename);

end; % if strcmp(action, ...

function shwimg(filename, psprmt)
load(filename,'X','map');
image(X)
if exist('caption')==0
caption = [ ];
end;
axis('equal');
axis off;

% g487047 - mincolormap figure property now warning - warning turned off
% for tests to pass
[lastWarnMsg lastWarnId] = lastwarn;
oldMCWarning = warning('off','MATLAB:HandleGraphics:ObsoletedProperty:MinColormap');
set(gcf,'mincolormap',size(map,1),'colormap',map);
warning(oldMCWarning.state, 'MATLAB:HandleGraphics:ObsoletedProperty:MinColormap');
lastwarn(lastWarnMsg, lastWarnId);

imtext(.5,-.08,caption);
psprmt.clmap=map;
set(gcf, 'UserData', psprmt);