View difference between Paste ID: NiJRtG6m and ZjC86pfW
SHOW: | | - or go back to the newest paste.
1
I = imread('tablice\18.jpg'); 
2
%  I = imadjust(H,[.2 .4 .3; .9 .8 1],[]);
3
%  K=rgb2hsv(I);
4
 
5
 J=I;
6
 
7
 [h,w,d]=size(I);
8
  %figure()
9
  disp('start');
10
  oknoX=150;
11
  oknoY=34;   % ROZMIAR OKNA SKANUJĄCEGO
12
  for s = 1:10; % SKALA
13
     for y = 1:10:h- oknoY% POZYCJA OKNA Y
14
         fprintf('|%d|',round(100*y/h));
15
        for x = 1:26:w- oknoX  % POZYCJA OKNA X
16
              blue=0;
17
              black=0;
18
              white=0;
19
            for oy = y:y+oknoY % SKANOWANIE BADANEGO OKNA Y
20
                % SKANOWANIE BADANEGO OKNA X
21
                for ox = 1:round(x+oknoX/8) % X
22
%                     % WARUNEK I
23
                    if (I(oy,ox,1)>62 && I(oy,ox,1)<118 && ...
24
                        I(oy,ox,2)>74 && I(oy,ox,2)<160 && ...
25
                        I(oy,ox,3)>145 && I(oy,ox,3)<224)
26
                        blue=blue+1;
27
                    end
28
                   
29
                end
30
                for ox =round((x+oknoX)/8):x+oknoX % X
31
                    % WARUNEK II
32
                    
33
                    if (I(oy,ox,1)>150 && ...
34
                        I(oy,ox,2)>150  && ...
35
                        I(oy,ox,3)>150)
36
                        white=white+1;
37
                    end
38
                    if (I(oy,ox,1)<100 &&  ...
39
                        I(oy,ox,2)<100 &&  ...
40
                        I(oy,ox,3)<100)
41
                        black=black+1;
42
                    end
43
                   
44
                end
45
            end %oy
46
            w1=blue/(oknoX*oknoY/8);
47
             w2=white/black;
48
             
49
              
50
             disp('wartosci');
51
              disp(w1);
52
              disp(w2);
53
              
54
              
55
             input('zaznacz','s');
56
             SHOW = J;
57
             for ox = x:x+oknoX
58
                    SHOW(y,ox,1) = 255;
59
             end
60
                for ox = x:x+oknoX
61
                    SHOW(y+oknoY,ox,1) = 255;
62
                end
63
                for oy = y:y+oknoY
64
                    SHOW(oy,x,1) = 255;
65
                end
66
                for oy = y:y+oknoY
67
                    SHOW(oy,x+oknoX,1) = 255;
68
                end
69
             imshow(SHOW);
70
           if(w1>0.8 && w1<0.93 && w2>0.3 && w2<0.39)
71
               %disp('x:'+x+' y: ' + y);
72
               disp('JEST!');
73
               disp(w1);
74
               disp(w2);
75
               disp(w3);
76
                for ox = x:x+oknoX
77
                    I(y,ox,1) = 255;
78
                end
79
                for ox = x:x+oknoX
80
                    I(y+round(oknoY),ox,1) = 255;
81
                end
82
                for oy = y:y+oknoY
83
                    I(oy,x,1) = 255;
84
                end
85
                for oy = y:y+oknoY
86
                    I(oy,x+round(oknoX),1) = 255;
87
                end
88
%                 for ox = x:x+oknoX
89
%                     I(y+oknoY,ox,1) = 255;
90
%                 end
91
%                 for oy = y:y+oknoY
92
%                     I(oy,x,1) = 255;
93
%                 end
94
%                 for oy = y:y+oknoY
95
%                     I(oy,x+oknoX,1) = 255;
96
%                 end
97
           end
98
        end
99
     end
100
     oknoX = oknoX*1.05; % 
101
     oknoY = oknoY*1.05;
102
  end
103
  figure
104
105
  imshow(I);