图像加密与解密

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‘）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        388  2006-06-07 14:53  image encryption\decrypt1.m

     文件        382  2006-06-07 14:58  image encryption\encrypt1.m

     文件      66616  2005-11-09 20:04  image encryption\lena.bmp

     目录          0  2009-04-07 15:36  image encryption

----------- ---------  ---------- -----  ----

                67386                    4