% GUI_test.m

% Author : 
% Date   : Sep. 2007

% Creating the function.
function varargout = GUI_test(varargin)

%% define Layout
% define layout of the MainWindow
MW = figure('MenuBar','none',...
                    'Name','Image Anlalyzer',...
                    'NumberTitle','off',...
                    'Toolbar','none',...
                    'Visible','on',...
                    'Position',[0,0,1300,1100]);

% CREATE MENU BAR
% Adding Menu 'File'
MB = uimenu('Label','File');
% Adding menu items to 'File'
item1 = uimenu(MB,'Label','item1');

% ADDING COMPONENTS

% Axes for Original Image
axes_img_org = axes('Visible','on',...
                    'Units','Pixels',...
                    'Position',[685,490,590,420]);
% set caption for axes_img_org
st_org_img = uicontrol('Style','text',...
                       'String','Selected Image',...
                       'Position',[935,915,130,15]);

% Axes for Hisogram        
axes_hist    = axes('Visible','on',...
                    'Units','Pixels',...
                    'Position',[685,25,590,420]);
% set caption for axes_hist
st_hist = uicontrol('Style','text',...
                    'String','Histogram',...
                    'Position',[950,450,100,15]);

% create pushbutton to load original image
pb_org = uicontrol('Style','pushbutton',...
                   'String','Load Image',...
                   'Position',[20,890,90,40],...
                   'Callback',{@img_load});

% create pushbutton to load blank
pb_blk = uicontrol('Style','pushbutton',...
                   'String','Load Blank',...
                   'Position',[185,890,90,40],...
                   'Callback',{@blk_load});

% create pushbutton to start analysis
pb_start = uicontrol('Style','pushbutton',...
                     'String','Start',...
                     'Position',[110,840,75,40],...
                     'Callback',{@img_analysis});

% create text-field for cell-counts
counts = uicontrol('Style','text',...
                   'Position',[225,810,50,15]);
% text to label 'counts'
counts_txt = uicontrol('Style','text',...
                       'String','Number of detected cells:',...
                       'Position',[20,810,200,15]);

                   
%% Callback functions

p.img_org = [];
p.blk = [];
guidata(MW,p);

% function to load original image
function img_load(source,eventdata)

    p = guidata(source);

    [FileName,PathName] = uigetfile('*.JPG','Select Original Image');
    img_org = imread(FileName);
    p.img_org = img_org;
    guidata(source,p);
    
    axes(axes_img_org)
    imshow(img_org);
    axis off;

%%