有哪些信誉好的足球投注网站- 1、本文档共4页，可阅读全部内容。
- 2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
实验二图像DCT域信息隐藏实验
【实验目的】：
一、复习变换域信息隐藏的基本思想
二、掌握用MATLAB实现图像DCT相关操作
三、完成基于图像DCT的信息隐藏实验
【实验工具及平台】：
WindowsXP/7系统
Matlab软件编程
【实验内容】
用MATLAB函数实现图像DCT域信息隐藏和提取
实验选择载体：任意大小尺寸的图像
【实验代码】
function[count,msg,result]=hidedctadv(image,imagegoal,msg,key,alpha)
frr=fopen(msg,r);
[msg,count]=fread(frr,ubit1);
fclose(frr);
data0=imread(image);
data0=double(data0)/255;
data=data0(:,:,1);
T=dctmtx(8);
DCTrgb=blkproc(data,[88],P1*x*P2,T,T);
[row,col]=size(DCTrgb);
row=floor(row/8);
col=floor(col/8);
a=zeros([rowcol]);
[k1,k2]=randinterval(a,count,key);
fori=1:count
k1(1,i)=(k1(1,i)-1)*8+1;
k2(1,i)=(k2(1,i)-1)*8+1;
end
temp=0;
fori=1:count
ifmsg(i,1)==0
ifDCTrgb(k1(i)+4,k2(i)+1)DCTrgb(k1(i)+3,k2(i)+2)
temp=DCTrgb(k1(i)+4,k2(i)+1);
DCTrgb(k1(i)+4,k2(i)+1)=DCTrgb(k1(i)+3,k2(i)+2);
DCTrgb(k1(i)+3,k2(i)+2)=temp;
end
else
ifDCTrgb(k1(i)+4,k2(i)+1)DCTrgb(k1(i)+3,k2(i)+2)
temp=DCTrgb(k1(i)+4,k2(i)+1);
DCTrgb(k1(i)+4,k2(i)+1)=DCTrgb(k1(i)+3,k2(i)+2);
DCTrgb(k1(i)+3,k2(i)+2)=temp;
end
end
ifDCTrgb(k1(i)+4,k2(i)+1)DCTrgb(k1(i)+3,k2(i)+2)
DCTrgb(k1(i)+3,k2(i)+2)=DCTrgb(k1(i)+3,k2(i)+2)-alpha;
else
DCTrgb(k1(i)+4,k2(i)+1)=DCTrgb(k1(i)+4,k2(i)+1)-alpha;
end
end
DCTrgb1=DCTrgb;
data=blkproc(DCTrgb,[88],P1*x*P2,T,T);
result=data0;
result(:,:,1)=data;
imwrite(result,imagegoal);
subplot(1,2,1);imshow(image);title(原始图像);
subplot(1,2,2);imshow(imagegoal);title(隐藏信息的图像);
1.txt待隐秘的信息：DCT域的信息秘密的基本算法
调用语言：[count,msg,result]=hidedctadv(infer_mid.jpg,1.jpg,1.txt,1982,2)
functionresult=extractdctadv(image,msg,key,count)
data0=imread(image);
data0=double(data0)/255;
data=data0(:,:,1);
T=dctmtx(8);
DCTcheck=blkproc(data,[88],P1*x*P2,T,T);
[row,col]=size(DCTcheck);
row=floor(row/8);
col=floor(col/8)
文档评论（0）