convert Malab to vb2010 help me

function LSB_embed(image_name,stego_name,tile)
%image_name=input('Ten anh:','s');
I=imread(image_name);
[m,n]=size(I);
dodai=floor(tile*m*n/100)
%dodai=input('Do dai thong diep:');
%tile=input('Cho ti le nhung:');
%l_dodai=dodai;
%L_B=zeros(1,24);
%i=24;
%while l_dodai>0
% L_B(i)=mod(l_dodai,2);
% l_dodai=floor(l_dodai/2);
% i=i-1;
%end
%chuyen do dai sang nhi phan
bin_message=mod(floor(rand(1,dodai)*10),2);
L_message=length(bin_message)
L_B=zeros(1,24);
i=24;
while L_message>0
L_B(i)=mod(L_message,2);
L_message=floor(L_message/2);
i=i-1;
end
w = [L_B bin_message];
l_w=length(w);
S=I;
d=1;
xl=waitbar(0,'Dang giau tin...');
for i=1:m
waitbar(i/m);
for j=1:n
if d<=l_w
S(i,j)=floor(I(i,j)/2)*2+w(d);
d=d+1;
else
break;
end
end
end
close(xl);
%stego_name=input('cho biet ten anh moi:','s');
imwrite(S,stego_name);

 채택된 답변

Walter Roberson
Walter Roberson 2012년 7월 12일

0 개 추천

You need the Builder NE product.
Note: the Builder NE product is not available for student licenses.

추가 답변 (0개)

카테고리

도움말 센터File Exchange에서 MATLAB에 대해 자세히 알아보기

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by