clear;clc;
x=imread（‘加密后的lena.bmp‘‘bmp‘）;
[a?b?c]=size（x）;
N=a*b;
m（1）=input（‘請輸入密鑰：???‘）;
disp（‘解密中‘）;
for?i=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））;
????????n=n+1;
????end
end
imwrite（e‘解密后的lena.bmp‘‘bmp‘）;
disp（‘解密成功‘）;
winopen（‘解密后的lena.bmp‘）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2014-03-13?12:48??csdn-matlab-logistic\
?????文件?????????388??2006-06-07?14:53??csdn-matlab-logistic\decrypt1.m
?????文件?????????382??2006-06-07?14:58??csdn-matlab-logistic\encrypt1.m
?????文件?????????434??2014-03-09?14:49??csdn-matlab-logistic\imagecolor_de.m
?????文件?????????430??2014-03-09?14:54??csdn-matlab-logistic\imagecolor_en.m
?????文件???????66616??2005-11-09?20:04??csdn-matlab-logistic\lena.bmp
?????文件??????542219??2013-12-02?11:21??csdn-matlab-logistic\test.jpg