基于MATLAB的DCT数字水印技术
M=256; N=32; K=8;I=zeros(M,M); D=zeros(M,M); D1=zeros(M,M); J=zeros(M,M); W=zeros(N,N); L=zeros(M,M);
block_dct1=zeros(M,M); block_dct2=zeros(M,M); block_idct=zeros(M,M);
block1=zeros(M,M); block2=zeros(M,M);
I=imread('C:\Documents and Settings\Administrator\桌面\200710291146238438','bmp');
J=imread('C:\Documents and Settings\Administrator\桌面\图片1.bmp');
J=rgb2gray(J); level=graythresh(J); J=im2bw(J,level);
subplot(1,3,1); imshow(I); title('源图像')
subplot(1,3,2); imshow(J); title('水印信息')
tem=1;
for m=1:N
for n=1:N
x=(m-1)*K+1; y=(n-1)*K+1;
block_dct=I(x:x+K-1,y:y+K-1); block_dct1=dct2(block_dct);
if J(m,n)==0, a=-1; else a=1; end
block_dct2=block_dct1*(1+a*0.01); block_idct=idct2(block_dct2);
D(x:x+K-1,y:y+K-1)=block_idct; tem=tem+1;
end
end
D1=round(D);
subplot(1,3,3);imshow(D1); title('嵌入水印后')
imwrite(D1,'d:\mark.bmp','bmp')
% figure;
% L=imread('d:\mark.bmp','bmp');
% imwrite(L,'attack.jpg','jpeg','Quality',70)
这个代码仿出来的图片已经完全失真了~~:'( 求救各位高人，有没有别的代码可以仿出来？
[ 本帖最后由 ChaChing 于 2009-4-5 22:03 编辑 ] 不懂"完全失真"的含意
建议楼主贴出图或给齐档案, 方便他人了解! 就是一幅画面嵌入水印后的图像，用这个程序仿出来就是一张白纸上有那么几块黑点！:@L
页:
[1]