clc;
clear all;
baza_hist=zeros(21,10,16);
test_hist=zeros(1,1,16);
for i=1:21
    for j=1:10
        i
        j
        zdjecie=['C:/xampp/htdocs/curl/baza/s',num2str(i),'/zdj',num2str(j),'.jpg'];
        %zdjecie=['C:/xampp/htdocs/curl/baza/s1/1.jpg'];
       temp = imread(zdjecie);
rozm = size(temp);
if length(rozm) > 2
    B(i,j,:,:) = (temp(:,:,1)+temp(:,:,2) +temp(:,:,3))/3;
else
    B(i,j,:,:) = temp(:,:,1);
end
    end
end
fid = fopen('testowy.txt');
zdjecie = [textscan(fid, '%s')];
fclose(fid);
zdj = cell2mat(zdjecie{1});
zdjatko = num2str(zdj);
zdjatko=['C:/xampp/htdocs/curl/baza/s21/zdj1.jpg'];
temp = imread(zdjatko);
rozm = size(temp)
if length(rozm) > 2
    T(1,1,:,:) = (temp(:,:,1)+temp(:,:,2) +temp(:,:,3))/3;
else
    T(1,1,:,:) = temp(:,:,1);
end
test_hist(1,1,:)=hist(double(T(1,1,:,:)),16);
for i=1:21
    for j=1:10
        baza_hist(i,j,:)=hist(double(B(i,j,:,:)),16);
    end
end
min_nr=0;
min=+inf;
min2=+inf;
for i=1:21
    for j=1:10
       for k=1:21
           for l=1:10
                 roznica=sum(abs(test_hist(1,1,:)-baza_hist(k,l,:)));
                if (roznica<min)
                    min=roznica;
                end
           end
           if (min<min2)
               min2=min;
               min_fol=k;
               min_nr=i;
           end
       end
    end
end
min
min_fol
min_nr
%exit