%-------------------保存并讀入偽裝圖像---------------
imwrite(uint8(Img_imbeded),'偽裝圖像.bmp');
Img_imbeded=imread('偽裝圖像.bmp');
I_water = imread('sy.bmp');%讀入水印圖像

%-----------------------提取算法---------------------
M=8;
water_detect=zeros(nrow,ncol);
for i=1:nrow
    for j=1:ncol
    Img_bin=dec2bin(Img_imbeded(i,j),8);%把一個十進制數轉換成二進制數
        if Img_bin(N)=='0'
           water_detect(i,j)=0;
        else
            water_detect(i,j)=1;   
        end                        
    end
end
%結果顯示
subplot(121);
imshow(I_water);%顯示原水印圖像
title('原水印圖像256*256')
subplot(122);
imshow(water_detect);
title('提取出的水印圖像256*256')