clc;
close?all;
clear;
A=imread（‘lena.jpg‘）;
B=A;
message=‘HelloI?am?a?little?sister!?‘;
m=length（message）;
imshow（A）
title（‘原始圖片‘）;
n=size（A）;
k=1;
%?LSB?算法:
for?i=1:n（1）
????for?j=1:n（2）
????????if?k<=m?
	????????%如果消息輸入完成則為0
????????????h=bitget（double（message（k））8:-1:1）;
????????else
????????????h=[00000000];
????????end
????????c=bitget（A（ij）8:-1:1）;
????????if?mod（j8）?==?0?
????????????p=8;
????????else
????????????p=mod（j8）;
????????end
????????v=0;
????????for?q=1:7
????????????v=xor（vc（q））;
????????end
????????v=xor（v?h（p）?）;
????????B（ij）=bitset（A（ij）1v）;%對A（ij）的第一位置數(shù)
????????if?mod（j8）?==?0??
????????????k=k+1;
????????end
????end
???????????%end?LSB
end
figureimshow（B）
imwrite（B‘new.jpg‘）;
title（‘隱藏信息的圖片‘）;

%double（B（1:））-double（A（1:））

%?read?message:
out=char;
tmp=0??;
t=1;
for?i=1:n（1）
???for?j=1:n（2）
???????c=bitget（B（ij）8:-1:1）;
???????v=0;
???????for?q=1:8
???????????v=xor（vc（q））;
???????end
???????if?mod（j8）==0
???????????p=1;
???????else
???????????p=9-mod（j8）;
???????end
???????tmp=bitset（tmppv）;
???????if?mod（j8）==0
???????????out（t）=char（tmp）;
???????????t=t+1;
???????????tmp=0;
???????end
???end
end
out

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

?????文件??????11091??2010-10-21?23:38??lsb\lena.jpg

?????文件???????1276??2010-11-20?21:46??lsb\LSB.m

?????文件??????10582??2010-11-19?21:02??lsb\new.jpg

?????目錄??????????0??2010-11-20?21:46??lsb

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

????????????????22949????????????????????4