clear;
clc;?
x=imread（‘encrytionPenguins.jpg‘‘jpg‘）;???%讀取圖像信息?
[a?b?c]=size（x）;??????????????%將加密后圖像的大小賦給a?b?c?
N=a*b;?
m（1）=input（‘please?input?secret?key:??‘）;???????%用戶輸入預設加密密碼?
?m（1）=m（1）/（m（1）+1）;
disp（‘decrytion?code?is?runing...‘）;?
for?i=1:N-1????????????????%進行N-1次循環??
?m（i+1）=4*m（i）-4*m（i）^2;???%循環產生原密碼?
end?
?
m=mod（1000*m256）;?
m=uint8（m）;?
n=1;?
for?i=1:a?
??for?j=1:b?
????e（ij）=bitxor（m（n）x（ij））;?%?m（n）xor（m（n）xor?x（ij））===?x（ij）不帶進位加法?半加運算?
????n=n+1;?
??end?
?end?
imwrite（e‘decrytionPenguins.jpg‘‘jpg‘）;??%將解密的圖像輸出命名為decrytionPenguins.jpg????
disp（‘decrytion?success‘）;???????????%顯示解密成功提示信息???
winopen（‘decrytionPenguins.jpg‘）;???????%顯示解密后圖片?

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2015-01-26?15:07??en-decrytion\
?????文件??????321591??2015-01-26?14:44??en-decrytion\decrytionPenguins.jpg
?????文件??????435693??2015-01-26?14:44??en-decrytion\encrytionPenguins.jpg
?????文件???????96953??2015-01-26?13:56??en-decrytion\Penguins.jpg
?????文件?????????777??2015-01-26?14:41??en-decrytion\pictureDecrytion.m
?????文件?????????923??2015-01-26?14:41??en-decrytion\pictureEncrytion.m