%Loop over all samples in the database


%The name of the directory with the database
dirname = 'D:\database_directory\';
%The suffix with the file format
suffix = '.png';

%Open the file with the file names.
fid=fopen([dirname 'listnames.txt'],'rt');
maxlistlen=0;
ni=0;
while ~feof(fid)
    ni=ni+1;
    sn=fgetl(fid);
    listlen(ni)=findstr(sn,';')-1;
    listnum(ni)=sscanf(sn(findstr(sn,';')+1:length(sn)),'%d');
    if maxlistlen<length(listlen(ni));
        maxlistlen=length(listlen(ni));
    end
end
listnames=32*ones(ni,maxlistlen+1);
frewind(fid)
for ix=1:ni	
    sn=fgetl(fid);
    listnames(ix,1:listlen(ix))=sn(1:listlen(ix));
end
fclose(fid);
listnames=char(listnames);
% listnames - list of species
% listlen   - list of lengths of species names
% listnum   - list of the numbers of samples of individual species
% ni        - number of species

%The loop over all files
for ix=1:ni	    %loop over species
	for jx=1:listnum(ix)     %loop over samples of one species
        %reading of an image file
      	a=double(imread([dirname listnames(ix,1:listlen(ix)) int2str(jx) suffix]));
        %Add a processing of the matrix a.
	end
end