I = imread('tablice\18.jpg'); 
%  I = imadjust(H,[.2 .4 .3; .9 .8 1],[]);
%  K=rgb2hsv(I);
 
 J=I;
 
 [h,w,d]=size(I);
  %figure()
  disp('start');
  oknoX=150;
  oknoY=34;   % SCANNING WINDOW SIZE
  for s = 1:10; % SKALA
     for y = 1:10:h- oknoY % Y POSITION OF SCANNING WINDOW 
         fprintf('|%d|',round(100*y/h));
        for x = 1:26:w- oknoX  % x POSITION OF SCANNING WINDOW
              blue=0;
              black=0;
              white=0;
            for oy = y:y+oknoY % 
               
                for ox = 1:round(x+oknoX/8) % X
%                     % W1
                    if (I(oy,ox,1)>62 && I(oy,ox,1)<118 && ...
                        I(oy,ox,2)>74 && I(oy,ox,2)<160 && ...
                        I(oy,ox,3)>145 && I(oy,ox,3)<224)
                        blue=blue+1;
                    end
                   
                end
                for ox =round((x+oknoX)/8):x+oknoX % X
                    % W2
                    
                    if (I(oy,ox,1)>150 && ...
                        I(oy,ox,2)>150  && ...
                        I(oy,ox,3)>150)
                        white=white+1;
                    end
                    if (I(oy,ox,1)<100 &&  ...
                        I(oy,ox,2)<100 &&  ...
                        I(oy,ox,3)<100)
                        black=black+1;
                    end
                   
                end
            end %oy
            w1=blue/(oknoX*oknoY/8);
             w2=white/black;
             
              
%             disp('wartosci');
%              disp(w1);
%              disp(w2);
              
              
%             input('zaznacz','s');   % SCAN IMAGE MANUALLY
%             SHOW = J;
%            for ox = x:x+oknoX
%                    SHOW(y,ox,1) = 255;
%             end
%                for ox = x:x+oknoX
%                    SHOW(y+oknoY,ox,1) = 255;
%                end
%                for oy = y:y+oknoY
%                    SHOW(oy,x,1) = 255;
%                end
%                for oy = y:y+oknoY
%                    SHOW(oy,x+oknoX,1) = 255;
%                end
%             imshow(SHOW);
           if(w1>0.8 && w1<0.93 && w2>0.3 && w2<0.39)
               %disp('x:'+x+' y: ' + y);
               disp('JEST!');
               disp(w1);
               disp(w2);
               disp(w3);
                for ox = x:x+oknoX
                    I(y,ox,1) = 255;
                end
                for ox = x:x+oknoX
                    I(y+round(oknoY),ox,1) = 255;
                end
                for oy = y:y+oknoY
                    I(oy,x,1) = 255;
                end
                for oy = y:y+oknoY
                    I(oy,x+round(oknoX),1) = 255;
                end
%                 for ox = x:x+oknoX
%                     I(y+oknoY,ox,1) = 255;
%                 end
%                 for oy = y:y+oknoY
%                     I(oy,x,1) = 255;
%                 end
%                 for oy = y:y+oknoY
%                     I(oy,x+oknoX,1) = 255;
%                 end
           end
        end
     end
     oknoX = oknoX*1.05; % 
     oknoY = oknoY*1.05;
  end
  figure

  imshow(I);