How to find an empty parking slot

In a parking how to i find an empty parking slot

[Cedric]

If you have images, please attach them to your post (staple icon).

Answer 1

[Image Analyst]

Huang, C.C.[Ching-Chun], Tai, Y.S., Wang, S.J.[Sheng-Jyh],
Vacant Parking Space Detection Based on Plane-Based Bayesian Hierarchical Framework,
CirSysVideo(23), No. 9, 2013, pp. 1598-1610.
IEEE via DOI 1309

http://www.visionbib.com/bibliography/contents.html

[Mahesh Jayashankar]

<<

>> In the following code I have to get a msgbox which should tell me that a car is removed for it's slot when i remove it ?

Code:-

%source = videoinput('winvideo',1);%clear all

% source = aviread('C:\Video\Source\traffic\san_fran_traffic_30sec_QVGA'); source = videoinput('winvideo',1); thresh = 25; im=getsnapshot(source); %(Remove this) bg = im; % read in 1st frame as background frame(change this) %bg = imread('original.jpg'); bg_bw = rgb2gray(bg); % convert background to greyscale %fg1 = bg_bw;

% ----------------------- set frame size variables ----------------------- %fr_size = size(bg); width = size(bg_bw,2); height = size(bg_bw,1); fg = zeros(height, width);

% --------------------- process frames -----------------------------------

for i = 2:100

    fr = getsnapshot(source);       % read in frame
    fr_bw = rgb2gray(fr);       % convert frame to grayscale

    fr_diff = abs(double(fr_bw) - double(bg_bw));  % cast operands as double to avoid negative overflow

    for j=1:width                 % if fr_diff > thresh pixel in foreground
        for k=1:height
            if ((fr_diff(k,j) > thresh))
                fg(k,j) = 1;
            else
                fg(k,j) = 0;
            end
        end

    end

    %bg_bw = fr_bw;

    figure(1),subplot(2,1,1),imshow(fr)
    %subplot(3,1,2),imshow(fr_bw)
    subplot(2,1,2),imshow(fg)

    M(i-1)  = im2frame(uint8(fg),gray);           % put frames into movie
        if(bg_bw==fr_bw)

        else
            textIn = ['Car has left the parking lot'];
            ha = actxserver('SAPI.SpVoice');
            invoke(ha,'speak',textIn);
            h = msgbox('Car has left the parking lot');
        end
end

% movie2avi(M,'frame_difference_output', 'fps', 30); % save movie as avi

[Image Analyst]

I can't run the code. I don't have the m-file, the fig-file, or the avi file. Why not step through with the debugger and see what lines of code get executed and what the variable values are?

[Nadeem Mohd]

source = videoinput('winvideo',1); thresh = 25; im=getsnapshot(source); %(Remove this) bg = im;

% read in 1st frame as background frame(change this) %

bg = imread('C:\Users\Aatif\Desktop\Thesis\A2.PNG');

bg_bw = rgb2gray(bg);

% convert background to greyscale %fg1 = bg_bw;

% ----------------------- set frame size variables ----------------------- %fr_size = size(bg);

width = size(bg_bw,2); height = size(bg_bw,1); fg = zeros(height, width);

% --------------------- process frames -----------------------------------

for i = 2:100

fr = getsnapshot(source); % read in frame

fr_bw = rgb2gray(fr); % convert frame to grayscale

fr_diff = abs(double(fr_bw) - double(bg_bw)); % cast operands as double to avoid negative overflow

for j=1:width % if fr_diff > thresh pixel in foreground

for k=1:height

if ((fr_diff(k,j) > thresh))

fg(k,j) = 1;

else

fg(k,j) = 0;

end

end

end

%bg_bw = fr_bw;

figure(1),subplot(2,1,1),imshow(fr)

%subplot(3,1,2),imshow(fr_bw)

subplot(2,1,2),imshow(fg)

M(i-1) = im2frame(uint8(fg),gray); % put frames into movie

if ((bg_bw) ~= (fr_bw))

textIn = ('Car has left the parking lot');

ha = actxserver('SAPI.SpVoice');

invoke(ha,'speak',textIn);

h = msgbox('Car has left the parking lot');

% else

%textIn = ('Car is in the parking lot');

% ha = actxserver('SAPI.SpVoice');

%invoke(ha,'speak',textIn);

%h = msgbox('Car is in the the parking lot');

end

end

i can get the if out put

i mean its nt reading the if statement

it just gives the else out put