1039049-

来自「基于LSB的数字水印技术」· 代码 · 共 29 行

%---------水印信息的制造------------------
I_water = imread('sy.bmp');
Img_gray = imresize(I_water,[512,512]);
Img_bw = im2bw(Img_gray,0.9);
%----------载体图像的读入------------------
Img_cover = double(imread('yt.bmp'));
[nrow,ncol] = size(Img_cover);
%----------水印信息的嵌入-------------------
N=8; %嵌入位置（位平面）的选择
Img_imbeded = zeros(nrow,ncol);%产生nr行nc列的零矩阵
for i = 1:nrow
    for j = 1:ncol
       Img_bin = dec2bin(Img_cover(i,j),8);%把水印图像转换为8位二进制图像
         if Img_bw(i,j)==0;%判断水印第（i，j）点是否为0
          Img_bin(N)='0';%源图像第8位平面置为‘0’
         else
          Img_bin(N)='1';%源图像第8位平面置为‘1’
         end;%源图像第(i,j)像素点嵌入完毕
         Img_imbeded(i,j) = bin2dec(Img_bin);
    end
end
%结果显示
subplot(121);
imshow(uint8(Img_cover));
title('载体图像')
subplot(122);
imshow(uint8(Img_imbeded));
title('伪装图像')