clear,clc;
[filename,filepath] = uigetfile(‘*.*‘,‘Select the image‘);
if isequal(filename,0)||isequal(filepath,0)
return;
else
filefullpath=[filepath,filename];
end
%得到檔案名，以便建立一個檔案夾儲存分塊圖像
[pathstr,name,ext] = fileparts(filename);
Im=imread(filefullpath);
% imshow(Im)
L = size(Im);
%分塊大小
height=300;
width=400;
%重疊
x=0.25;
h_val=height*(1-x);
w_val=width*(1-x);
max_row = (L(1)-height)/h_val+1;
max_col = (L(2)-width)/w_val+1;
%判斷能否完整分塊
if max_row==fix(max_row)%判斷是否能夠整分
max_row=max_row;
else
max_row=fix(max_row+1);
end
if max_col==fix(max_col)%判斷是否能夠整分
max_col=max_col;
else
max_col=fix(max_col+1);
end
seg = cell(max_row,max_col);
for row = 1:max_row
for col = 1:max_col
if ((width+(col-1)*w_val)>L(2)&&((row-1)*h_val+height)<=L(1))%判斷最右邊不完整的部分
seg(row,col)= {Im((row-1)*h_val+1:height+(row-1)*h_val,(col-1)*w_val+1:L(2),:)};
elseif((height+(row-1)*h_val)>L(1)&&((col-1)*w_val+width)<=L(2))%判斷最下邊不完整的部分
seg(row,col)= {Im((row-1)*h_val+1:L(1),(col-1)*w_val+1:width+(col-1)*w_val,:)};
elseif((width+(col-1)*w_val)>L(2)&&((row-1)*h_val+height)>L(1))%判斷最後一張
seg(row,col)={Im((row-1)*h_val+1:L(1),(col-1)*w_val+1:L(2),:)};
else
seg(row,col)= {Im((row-1)*h_val+1:height+(row-1)*h_val,(col-1)*w_val+1:width+(col-1)*w_val,:)}; %其餘完整部分
end
end
end
imshow(Im);
hold on
system([‘mkdir ‘,name]);%建立與圖檔名相同的檔案用來儲存圖檔
paths=[pwd,‘\‘,name]; %擷取指定檔案夾目錄
%儲存子圖
for i=1:max_row
for j=1:max_col
imwrite(seg{i,j},[paths,‘\‘,strcat(int2str(i),‘行‘,int2str(j),‘列‘,‘.bmp‘)]); %把第i幀的圖檔寫為‘mi.bmp‘
end
end
% 畫框顯示
for row = 1:max_row
for col = 1:max_col
c=rand(1,3);%随機顔色
rectangle(‘Position‘,[w_val*(col-1),h_val*(row-1),width,height],...
‘LineWidth‘,2,‘LineStyle‘,‘-‘,‘EdgeColor‘,c);
end
end