%由一幅2值化的漢字輪廓圖像順時針或逆時針獲取輪廓坐標
edgeIm?=?imread（‘D:\EdgeIm.bmp‘）;
%figure?imshow（edgeIm）;

%edgeIm中非零元素的坐標，即輪廓坐標
[i?j]?=?find（edgeIm）;

%輪廓點數
numPoints?=?size（i?1）;
curNum?=?0;

%初始搜索點坐標
currentR?=?i（1?1）;
currentC?=?j（1?1）;

%初始化輪廓點坐標
points?=?zeros（numPoints?2）;

%開始搜索
curNum?=?curNum?+?1;
points（curNum:）?=?[currentR?currentC];
edgeIm（currentR?currentC）?=?0;

while?curNum?~=?numPoints;
?if?edgeIm（currentR?currentC-1）?==?1;
?curNum?=?curNum?+?1;
?currentC?=?currentC?-?1;
?points（curNum:）?=?[currentR?currentC];
?edgeIm（currentR?currentC）?=?0;
?elseif?edgeIm（currentR-1?currentC-1）?==?1;
?curNum?=?curNum?+?1;
?currentR?=?currentR?-?1;
?currentC?=?currentC?-?1;
?points（curNum:）?=?[currentR?currentC];
?edgeIm（currentR?currentC）?=?0;

?elseif?edgeIm（currentR-1?currentC）?==?1;
?curNum?=?curNum?+?1;
?currentR?=?currentR?-?1;
?points（curNum:）?=?[currentR?currentC];
?edgeIm（currentR?currentC）?=?0;