chinv.m

图像对齐（inage registration）工具箱

function  chinv(intp);

load chinv                             

flg = 0;

a = figure('Color',[0.8 0.8 0.8], ...
	'Colormap',mat0, ...
	'Name','Choice of invariants', ...
   'PointerShapeCData',mat1, ...
   'WindowStyle','modal', ...
   'Position',[559 161 210+flg*210 440], ...
   'Tag','Fig1');

         
   
b = uicontrol('Parent',a, ...
	'Units','points', ...
	'HorizontalAlignment','left', ...
   'Position',[7 70 148.5 13.5], ...
  	'BackgroundColor',[0.8 0.8 0.8], ...
   'String','Choice of invariants', ...
   'FontSize', 12, ...
	'Style','text', ...
	'Tag','StaticText1');


b = uicontrol('Parent',a, ...
	'Units','points', ...
	'Position',[7 100 145 220], ...
	'Style','frame', ...
   'Tag','Frame');



b = uicontrol('Parent',a, ...
	'Units','points', ...
   'Position',[7 40 60 23], ...
  	'Callback','cll_chinv allon ', ...
	'String','Select all', ...
	'Tag','Pushbutton1');

b = uicontrol('Parent',a, ...
	'Units','points', ...
   'Position',[92 40 60 23], ...
 	'Callback','cll_chinv alloff', ...
	'String','Unselect all', ...
	'Tag','Pushbutton2');

b = uicontrol('Parent',a, ...
	'Units','points', ...
   'Position',[7 10 145 23], ...
 	'Callback','cll_chinv done', ...
	'String','OK', ...
	'Tag','Pushbutton3');

j=0;
load invs;

clear pct;
global pct;

switch (intp)
case ('Hu           ')
   pct = 7;
   titl = desc.Hu;
case ('Affine       ')
   pct =6;
   titl = desc.Ami;

case ('Blur combined')
   pct = 9;
   titl = desc.Combined;
   
case ('Rotational   ')   
   pct = 1;
   titl = ['No choice'];
end;

for i=1:pct,
   str=strcat('cb',num2str(i));
	if i>10 j=1; end;
	b = uicontrol('Parent',a, ...
	'Units','points', ...
	'BackgroundColor',[0.627451 0.784314 0.658824], ...
	'Position',[13+j*153 293-(i-1)*20+j*200 130 15], ...
	'String',titl(i,:), ...
	'Style','checkbox', ...
	'Tag',str);
end;