clc;
clear all;
filesFolder=fullfile('C:\Users\wk\Desktop\隐写和隐写分析实验\隐写原始灰度图像');%%原始图像存放的文件夹
outFilesFolder=fullfile('C:\Users\wk\Desktop\隐写和隐写分析实验\隐写实验\LSBR\含密图像');%%含密图像存放的文件夹
files=dir(fullfile(filesFolder,'*.tif'));%%获得所有图像的文件结构体数组
filesName={files.name}';%%获得所有图像的文件名
filesNumber=length(filesName);%%获得图像的个数
percent=0.90;%%设定嵌入率
seed=2;%%随机数种子
% for i=1:filesNumber
% fprintf('正在对第%d个图像嵌入信息\r\n',i);
% coverImage=imread(fullfile(filesFolder, filesName{i}));%%读取第i幅图像
% stegoImage=embed(coverImage,percent,seed);%%将密信用LSBR算法进行嵌入
% extract(stegoImage,percent,seed);
% filename=filesName{i};
% [pathstr, name, ext] = fileparts(filename) ;
% newfilename=strcat(name,'.bmp');
% outFile=fullfile(outFilesFolder,newfilename);%%保存含密图像的文件
% imwrite(stegoImage, outFile);
% end
for i=1:filesNumber
fprintf('正在对第%d个图像嵌入信息\r\n',i);
coverImage=imread(fullfile(filesFolder, filesName{i}));%%读取第i幅图像
stegoImage=embed(coverImage,percent,seed);%%将密信用LSBR算法进行嵌入
extract(stegoImage,percent,seed);
outFile=fullfile(outFilesFolder,filesName{i});%%保存含密图像的文件
imwrite(stegoImage, outFile);
end
评论1