points.m

图像对齐（inage registration）工具箱

function points(body1,body2,text)
% This is the machine-generated representation of a Handle Graphics object
% and its children.  Note that handle values may change when these objects
% are re-created. This may cause problems with any callbacks written to
% depend on the value of the handle at the time the object was saved.
%
% To reopen this object, just type the name of the M-file at the MATLAB
% prompt. The M-file and its associated MAT-file must be on your path.

load points                      

n1=size(body1);
n2=size(body2);

b1=int2str(body1);
b2=int2str(body2);

pom1=['1: ..  ' b1(1,:)];

for i=1:(n1-1),
   pom1=[pom1 '|' int2str(i+1) ': ..  '  b1(i+1,:)];
end;

pom2=['1: ..  ' b2(1,:)];

for i=1:(n2-1),
   pom2=[pom2 '|' int2str(i+1) ': ..  '   b2(i+1,:)];
end;



a = figure('Color',[0.8 0.8 0.8], ...
	'Colormap',mat0, ...
	'Name','Control points', ...
	'PointerShapeCData',mat1, ...
	'Position',[542 236 381 420], ...
	'Resize','off', ...
	'Tag','Fig1', ...
	'WindowStyle','normal');
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[31.5 63 96 220.5], ...
	'String',pom1, ...
	'Style','listbox', ...
	'Tag','Listbox1', ...
	'Value',1);
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[1 1 1], ...
	'Position',[158.25 63.75 96 219], ...
	'String',pom2, ...
	'Style','listbox', ...
	'Tag','Listbox2', ...
	'Value',1);
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[33.75 21 221.25 27.75], ...
   'String','OK', ...
 	'Callback','uiresume(gcf);close(gcf); ', ...
   'Tag','Pushbutton1');

b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.635294 0.784314 0.662745], ...
	'FontSize',12, ...
	'Position',[33 289.5 219.75 18], ...
	'String',text, ...
	'Style','text', ...
	'Tag','StaticText1');