%?
function?annotate（a）
%
%?function?annotate（?imagetype?）
%
%?Example?of?a?:?a?=?‘G:\my?document\FaceTestData\‘;
%
%?Reads?and?displays?all?images?in?the?current?dir?one?by?one.
%
%?When?an?image?is?displayed?annotation?can?be?done?by?left-
%?clicking?the?mouse.?Press?‘e‘?to?end?annotation?and?write
%?a?corresponding?asf-file?in?the?current?dir.?Use?plotasf（）?
%?to?view?the?resulting?asf-file.
%?
%?Example?usage:??annotate（‘bmp‘）;
%
%?Write?‘help?imread‘?to?see?supported?filetypes.
%
%?if?isempty（find（imagetype?==?‘.‘））
%?????eval（?sprintf（‘dirlist=dir（‘‘%s*.%s‘‘）;‘?a?imagetype?）?）;?%?get?a?dir?list?of?all?images?of?type?‘imagetype‘
%?else
????dirlist?=?dir（a）;
%?end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%?for?each?image?in?the?current?directory
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
for?i=3:length（dirlist）-1

	%%%%%%%%%%%%%%%%%%%%%%
	%?load?and?show?image
	%%%%%%%%%%%%%%%%%%%%%%??????
????image_filename=dirlist（i）.name;????
????eval（sprintf（‘[imgcmap]=imread（‘‘%s%s‘‘）;‘aimage_filename））;
????figure;????
	axis?ij;	
????imagesc（img）;
????axis?image;
????colormap（?cmap?）;
????eval（sprintf（‘title（‘‘%s‘‘）;‘image_filename））;
????s=size（img）;
????height=s（1）;
????width=s（2）;
????%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
????%?annotate?image?with?points
????%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
????end_botton?=?0;
????point_count?=?0;
????path_count?=?0;
????while?end_botton~=‘e‘?&?end_botton~=‘b‘
????
????????[points?end_botton]=markpath（?point_count?）;
???????	if?end_botton?==?‘s‘
????????????break;
????????end

????	s=size（points）;????????????	????
????	npathpoints?=?s（1）;????	
????	if?npathpoints==0????	????	
????		break;
		end????		

		%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	????%?create?a?path?point?matrix
	????%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	????P_path?		=?zeros（?npathpoints?7?）;????
	????P_path（:1）?=?path_count;								%?path?number
	????if?end_botton==‘o‘?
	????	P_path（:2）?=?4;									%?point?type?=?open?path
	????else
	????	P_path（:2）?=?0;									%?point?type?=?closed?path
	????end
	????
	????P_path（:3）?=?points（:1）/width;??						%?relative?x?positions
	????P_path（:4）?=?points（:2）/height;?						%?relative?y?positions
	????P_path（:5）?=?[point_count:point_count+npathpoints-1]‘;	%?point?number
	????
	????if?end_botton==‘c‘
	????
	????	%?closed?path
	????	P_path（:6）?=?[point_count+npathpoints-1?point_count:point_count+npathpoints-2]‘;??	%?connects_from
	????	P_path（:7）?=?[point_count+1:point_count+npathpoints-1?point_count]‘;				%?connects_to
		else
			
			%?open?path?（default）
			P_path（:6）?=?[point_count?point_count:point_count+npathpoints-2]‘;??				%?connects_from
	????	P_path（:7）?=?[point_count+1:point_count+npathpoints-1?point_count+npathpoints-1]‘;	%?connects_to			????	
	????end	
	????	????	
????	if?point_count==0
????	
????		%?create?point?matrix
????		P?=?P_path;
		else
			%?add?to?point?matrix????		
			P?=?[P;?P_path];
????	end
????	

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????29172??2003-11-04?16:24??biaodian\27_14.jpg

?????文件???????3476??2012-12-21?15:15??biaodian\annotate.m

?????文件???????2253??2010-04-03?23:22??biaodian\annotate27.asv

?????文件???????2274??2010-04-03?23:22??biaodian\annotate27.m

?????文件?????428429??2008-08-27?18:46??biaodian\code\04000_05_01_fit.png

?????文件???????3482??2010-04-03?23:22??biaodian\code\annotate.m

?????文件???????2253??2010-04-03?23:22??biaodian\code\annotate27.asv

?????文件???????2274??2010-04-03?23:22??biaodian\code\annotate27.m

?????文件????????953??2010-04-03?23:22??biaodian\code\formatasf.m

?????文件????????374??2010-04-03?23:22??biaodian\code\getasfpath.m

?????文件????????370??2010-04-03?23:22??biaodian\code\image2gray.m

?????文件???????1712??2010-04-03?23:22??biaodian\code\markpath.m

?????文件???????4275??2010-04-03?23:22??biaodian\code\normface905.asv

?????文件???????4351??2010-07-16?12:07??biaodian\code\normface905.m

?????文件????????571??2010-04-03?23:22??biaodian\code\plotasf.m

?????文件????????939??2010-04-03?23:22??biaodian\code\readasf.m

?????文件????????238??2010-04-03?23:22??biaodian\code\removeext.m

?????文件????????214??2010-04-03?23:22??biaodian\code\replaceext.m

?????文件????????312??2010-04-03?23:22??biaodian\code\showmarkedimage.m

?????文件?????????29??2010-04-03?23:22??biaodian\code\test-annotate.m

?????文件??????????0??2010-07-16?11:57??biaodian\code\test.txt

?????文件?????????29??2010-04-03?23:22??biaodian\code\testAnnotate.m

?????文件???????1234??2010-04-03?23:22??biaodian\code\writeasf.m

?????文件?????????90??2010-04-03?23:22??biaodian\code\說明.txt

?????文件????????953??2010-04-03?23:22??biaodian\formatasf.m

?????文件????????374??2010-04-03?23:22??biaodian\getasfpath.m

?????文件???????3382??2003-02-06?23:09??biaodian\image\1.bmp

?????文件??????29172??2003-11-04?16:24??biaodian\image\27_14.jpg

????..A.SH.??????7168??2012-12-21?14:56??biaodian\image\Thumbs.db

?????文件????????370??2010-04-03?23:22??biaodian\image2gray.m

............此處省略19個文件信息