lsb_crypt

steganography based on lsb substitution along with encryption

function c=calfa（n）
%------------------------------------------------------------------------------------------
%The following program codes a number n like a word in base 26
%------------------------------------------------------------------------------------------
if length（n）==1
    x=nbn（n26）;
    d=length（x）;
    y=[‘a‘‘b‘‘c‘‘d‘‘e‘‘f‘‘g‘‘h‘‘i‘‘j‘‘k‘‘l‘‘m‘‘n‘‘o‘‘p‘‘q‘‘r‘‘s‘‘t‘‘u‘‘v‘‘w‘‘x‘‘y‘‘z‘];
    i=1;c=[];
    while i        c=[cy（x（i）+1）];i=i+1;
    end
    if i==d
        c=[cy（x（d）+1）];
    end
else
    c1=calfa（n（1））;
    c2=calfa（n（2））;
    c=[c1c2];
end

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

     文件        626  2009-11-06 21:51  lsb+crypt\calfa.m

     文件        791  2009-11-06 21:59  lsb+crypt\dalfa.m

     文件       1720  2009-11-10 11:30  lsb+crypt\dctext.txt

     文件       1668  2009-11-10 11:29  lsb+crypt\desordtext.m

     文件      70285  2009-11-10 10:55  lsb+crypt\Ferrari F50 1.jpg

     文件     473537  2009-11-10 11:19  lsb+crypt\Ferrari F50 1H.png

     文件       2596  2009-11-10 11:29  lsb+crypt\hidetc.m

     文件        695  2009-11-07 21:12  lsb+crypt\keyexpansion.m

     文件     447332  2009-11-10 11:17  lsb+crypt\lena.H.png

     文件     786572  2009-11-01 20:53  lsb+crypt\lena.tiff

     文件     178279  2009-11-10 11:29  lsb+crypt\lena2.H.png

     文件     264584  2009-11-05 23:24  lsb+crypt\lena2.tiff

     文件       6351  2009-11-07 22:51  lsb+crypt\mytry.asv

     文件        718  2009-11-05 18:58  lsb+crypt\nbn.m

     文件        834  2009-11-06 21:55  lsb+crypt\randpermut.m

     文件       1459  2009-11-07 21:27  lsb+crypt\reordtext.asv

     文件       1539  2009-11-10 11:20  lsb+crypt\reordtext.m

     文件       2651  2009-11-10 11:17  lsb+crypt\secret.txt

     文件       1165  2009-11-10 11:29  lsb+crypt\seektc.m

     目录          0  2009-11-11 07:04  lsb+crypt

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

              2243402                    20