%************************主函數***********************
function?private_call
clc
%讀入原載體圖像和原始水印圖像
I=imread（‘f:\lena1.jpg‘）;figure;subplot（221）;imshow（I）;title（‘原載體lena圖像‘）;
Q=imread（‘f:\xiaohui.jpg‘）;
Q1=gray（Q）;%調用子函數，實現水印圖像灰度化和二值化
imwrite（Q1‘f:\erzhi.jpg‘）;
subplot（222）;imshow（Q1）;title（‘二值水印圖像‘）;
r=arnold（Q1）;?%水印置亂
imwrite（r‘f:\images2.jpg‘）;
s=embed（Ir）;%水印嵌入
imwrite（s‘f:\watermarked.jpg‘）;
D=imread（‘f:\watermarked.jpg‘）;
pnsr1=compare（DI）;c=sprintf（‘pnsr1:%f\n‘pnsr1）;disp（c）;
subplot（223）;imshow（s）;title（‘水印嵌入后圖像‘）;
v_get=get（DI）;
h=iarnold（v_get）;
NCa=com_sub（Q1h）;c=sprintf（‘嵌入水印NC1:%f\n‘NCa）;disp（c）;?
imwrite（h‘f:\get0.jpg‘）;
subplot（224）;
imshow（h）;
title（‘反置亂后的水印圖像‘）;


%水印的檢測
%兩種不同JPEG壓縮比下的測試
imwrite（D‘f:\jpeg_attck1.jpg‘‘jpeg‘‘Quality‘95）;
L=imread（‘f:\jpeg_attck1.jpg‘）;
pnsr2=compare（LI）;c=sprintf（‘壓縮95?pnsr2:%f\n‘pnsr2）;disp（c）;
figure;
subplot（221）;
imshow（L）;
title（‘95%jpeg壓縮后的圖像‘）;
v_get1=get（LI）;%提取壓縮后的水印
h1=iarnold（v_get1）;%反置亂
NC1=com_sub（Q1h1）;c=sprintf（‘壓縮NC2:%f\n‘NC1）;disp（c）;?
imwrite（h1‘f:\jpg_get1.jpg‘）;
subplot（223）;
imshow（h1）;
title（‘95%jpeg反置亂的水印‘）;


imwrite（D‘f:\jpeg_attck2.jpg‘‘jpeg‘‘Quality‘45）;
L1=imread（‘f:\jpeg_attck2.jpg‘）;
pnsr12=compare（L1I）;c=sprintf（‘壓縮45?pnsr3:%f\n‘pnsr12）;disp（c）;
subplot（222）;
imshow（L1）;
title（‘45%jpeg壓縮后的圖像‘）;
v_get12=get（L1I）;%提取壓縮后的水印
h12=iarnold（v_get12）;%反置亂
NC3=com_sub（Q1h12）;c=sprintf（‘壓縮45?NC3:%f\n‘NC3）;disp（c）;?
imwrite（h1‘f:\jpg_get2.jpg‘）;
subplot（224）;
imshow（h12）;
title（‘45%jpeg反置亂的水印‘）;

%2中不同的噪聲檢測
J=imnoise（D‘gaussian‘00.01）;
pnsr3=compare（JI）;c=sprintf（‘高斯噪聲pnsr4:%f\n‘pnsr3）;disp（c）;
imwrite（J‘f:\gaussian.jpg‘）;
W=imread（‘f:\gaussian.jpg‘）;
v_get2=get（WI）;%提取加噪后的水印
h2=iarnold（v_get2）;%反置亂
NC4=com_sub（Q1h2）;c=sprintf（‘高斯噪聲NC4:%f\n‘NC4）;disp（c）;?
imwrite（h2‘f:\gaussian2.jpg‘）;
figure;
subplot（221）;
imshow（W）;
title（‘0.01高斯噪聲的圖像‘）;
figure（3）;
subplot（223）;
imshow（h2）;
title（‘反置亂的水印圖像‘）;

JJ=imnoise（D‘salt?&?pepper‘0.02）;
pnsr32=compare（JJI）;c=sprintf（‘椒鹽噪聲pnsr5:%f\n‘pnsr32）;disp（c）;
imwrite（JJ‘f:\salt$pepper_attack2.jpg‘）;
WW=imread（‘f:\salt$pepper_attack2.jpg‘）;
v_get22=get（WWI）;%提取加噪后的水印
h22=iarnold（v_get22）;%反置亂
NC5=com_sub（Q1h22）;c=sprintf（‘椒鹽噪聲NC5:%f\n‘NC5）;disp（c）;?
imwrite（h22‘f:\salt_get2.jpg‘）;
subplot（222）;
imshow（WW）;
title（‘0.02椒鹽噪聲的圖像‘）;
subplot（224）;
imshow（h22）;
title（‘反置亂的水印圖像‘）;



%2種旋轉測試
J1=imrotate（D2‘bilinear‘‘crop‘）;
J2=imrotate（J1-2‘bilinear‘‘crop‘）;
pnsr4=compare（J2I）;c=sprintf（‘旋轉2°pnsr6:%f\n‘pnsr4）;disp（c）;
v_get3=get（J2I）;%旋轉后的水印
h3=iarnold（v_get3）;%反置亂
NC6=com_sub（Q1h3）;c=sprintf（‘旋轉2°NC6:%f\n‘NC6）;disp（c）;?
figure;
subplot（231）;
imshow（J1）;
title（‘旋轉2后的水印圖像‘）;
imwrite（h3‘f:\rotate_get3.jpg‘）;
subplot（234）;
imshow（h3）;
title（‘反置亂的水印圖像‘）;

JJ1=imrotate（D95‘bilinear‘‘crop‘）;
JJ2=imrotate（JJ1-95‘bilinear‘‘crop‘）;
imwrite（JJ1‘f:\rotate.jpg‘）;
pnsr

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????26624??2017-05-10?12:07??130070204路開放\中期檢查表.doc

?????文件??????11277??2017-06-06?20:09??130070204路開放\代碼使用說明.docx

?????文件??????16384??2017-03-14?13:54??130070204路開放\任務書.doc

?????文件??????60416??2017-04-19?12:32??130070204路開放\實習報告.doc

?????文件??????50688??2017-04-16?18:52??130070204路開放\開題報告.doc

?????文件?????982604??2017-06-06?20:03??130070204路開放\畢業論文.docx

?????文件?????800203??2017-06-06?19:07??130070204路開放\畢業論文打印版.pdf

?????文件???????6733??2017-05-28?09:33??130070204路開放\源代碼及圖片\caiseshuiyin.m

?????文件???????6341??2017-05-28?09:51??130070204路開放\源代碼及圖片\caisezhiliu.m

?????文件??????67250??2010-04-30?20:37??130070204路開放\源代碼及圖片\lena1.jpg

?????文件???????5655??2017-05-20?07:48??130070204路開放\源代碼及圖片\xiaohui.jpg

?????文件????1068704??2017-06-06?19:13??130070204路開放\英文.docx

?????文件??????17524??2017-06-06?19:12??130070204路開放\英文翻譯.docx

?????文件??????41558??2017-06-07?08:56??130070204路開放\項目審批表.doc

?????目錄??????????0??2017-06-06?20:05??130070204路開放\源代碼及圖片

?????目錄??????????0??2017-06-09?18:28??130070204路開放

-----------?---------??----------?-----??----

??????????????3161961????????????????????16