train_nn.m

function varargout = train_nn(varargin)
% TRAIN_NN M-file for train_nn.fig
%      TRAIN_NN, by itself, creates a new TRAIN_NN or raises the existing
%      singleton*.
%
%      H = TRAIN_NN returns the handle to a new TRAIN_NN or the handle to
%      the existing singleton*.
%
%      TRAIN_NN('CALLBACK',hObject,eventData,handles,...) calls the local
%      function named CALLBACK in TRAIN_NN.M with the given input arguments.
%
%      TRAIN_NN('Property','Value',...) creates a new TRAIN_NN or raises the
%      existing singleton*.  Starting from the left, property value pairs are
%      applied to the GUI before train_nn_OpeningFcn gets called.  An
%      unrecognized property name or invalid value makes property application
%      stop.  All inputs are passed to train_nn_OpeningFcn via varargin.
%
%      *See GUI Options on GUIDE's Tools menu.  Choose "GUI allows only one
%      instance to run (singleton)".
%
% See also: GUIDE, GUIDATA, GUIHANDLES

% Edit the above text to modify the response to help train_nn

% Last Modified by GUIDE v2.5 28-Apr-2010 20:40:08
% Begin initialization code - DO NOT EDIT
gui_Singleton = 1;
gui_State = struct('gui_Name',       mfilename, ...
                   'gui_Singleton',  gui_Singleton, ...
                   'gui_OpeningFcn', @train_nn_OpeningFcn, ...
                   'gui_OutputFcn',  @train_nn_OutputFcn, ...
                   'gui_LayoutFcn',  [] , ...
                   'gui_Callback',   []);
if nargin && ischar(varargin{1})
    gui_State.gui_Callback = str2func(varargin{1});
end

if nargout
    [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});
else
    gui_mainfcn(gui_State, varargin{:});
end
% End initialization code - DO NOT EDIT

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% --- Executes just before train_nn is made visible.
function train_nn_OpeningFcn(hObject, eventdata, handles, varargin)
% This function has no output args, see OutputFcn.
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
% varargin   command line arguments to train_nn (see VARARGIN)

% Choose default command line output for train_nn
handles.output = hObject;

% Update handles structure
guidata(hObject, handles);

% UIWAIT makes train_nn wait for user response (see UIRESUME)
% uiwait(handles.figure1);

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% --- Outputs from this function are returned to the command line.
function varargout = train_nn_OutputFcn(hObject, eventdata, handles) 
% varargout  cell array for returning output args (see VARARGOUT);
% hObject    handle to figure
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure
varargout{1} = handles.output;


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function edit1_Callback(hObject, eventdata, handles)
% hObject    handle to edit1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
% Hints: get(hObject,'String') returns contents of edit1 as text
%        str2double(get(hObject,'String')) returns contents of edit1 as a double

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% --- Executes during object creation, after setting all properties.
function edit1_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%Add New Word to Dictionary
% --- Executes on button press in pushbutton1.
function pushbutton1_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
global selected_col;
global selected_ln;
global all_img_1;
global all_img_2;
global all_img_3;
global all_img_4;
global all_words;
new_word = get(handles.edit1,'string');
if size(new_word,2) > 0 
    try
        trimg = handles.S;
        Ibox = preprocess(trimg);
        %Threshold
        trimg = rgb2gray(trimg);
        trimg = im2bw(trimg,graythresh(trimg));
        for cnt = 1:size(Ibox,2)
            rectangle('position',Ibox(:,cnt),'edgecolor','r');
            img{cnt} = imcrop(trimg,Ibox(:,cnt));
        end
        if selected_ln ~= size(img,2)/selected_col
            Error_more_than_4_words;
        else 
            all_img_1{size(all_img_1,2)+1} = img{1};
            all_img_2{size(all_img_2,2)+1} = img{2};
            all_img_3{size(all_img_3,2)+1} = img{3};
            all_img_4{size(all_img_4,2)+1} = img{4};
            all_words{size(all_words,2)+1} = {new_word};
            %Word Added Successfully
            set(handles.edit1, 'string','');
            wrod_successfully_added;
        end
    catch ME
        Error_no_word;
    end
else
    Error_no_word;
end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% --- Executes on button press in pushbutton2.
%ÒÑ ÇáÇÓÊÚÑÇÖ
function pushbutton2_Callback(hObject, eventdata, handles)
[filename, pathname] = uigetfile({'*.bmp;*.jpg;*.gif;*.png';'*.*'}, 'Pick an Image File','Dictionary/');
if pathname ~= 0
    S = imread([pathname,filename]);
    axes(handles.axes1);
    imshow(S);
    handles.S = S;
    guidata(hObject, handles);
end
% hObject    handle to pushbutton2 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% --- Executes on button press in pushbutton3.
%Learn and save and exist button
function pushbutton3_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton3 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
global selected_ln;
global all_img_1;
global all_img_2;
global all_img_3;
global all_img_4;
global all_words;
counter = 1;
out = [];
for cnt = 1:size(all_img_1,2);
    bw2 = charcrop(all_img_1{cnt});
    charvec = figresize(bw2);
    out(:,counter) = charvec;
    counter = counter +1;
end
for cnt = 1:size(all_img_2,2);
    bw2 = charcrop(all_img_2{cnt});
    charvec = figresize(bw2);
    out(:,counter) = charvec;
    counter = counter +1;
end
for cnt = 1:size(all_img_3,2);
    bw2 = charcrop(all_img_3{cnt});
    charvec = figresize(bw2);
    out(:,counter) = charvec;
    counter = counter +1;
end
for cnt = 1:size(all_img_4,2);
    bw2 = charcrop(all_img_4{cnt});
    charvec = figresize(bw2);
    out(:,counter) = charvec;
    counter = counter +1;
end

if size(out,2) > 0
    P = out(:,1:size(all_img_1,2)*selected_ln); 
    T = [];
    for xxx = 1:selected_ln
        T = [T eye(size(all_img_1,2))];
    end
    %% Creating and training of the Neural Network
    net = createnn(P,T);
    handles.net = net;
    %% Testing the Neural Network
    assignin('base','net',net);
    guidata(hObject, handles);
    %save NN ALL
    save('DataBase.mat','net','all_img_1','all_img_2','all_img_3','all_img_4','all_words','-mat');
    clear;
    clear global;
    close;
end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%Initalizer Function - load images words
% --- Executes during object creation, after setting all properties.
function figure1_CreateFcn(hObject, eventdata, handles)
% hObject    handle to figure1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called
movegui(hObject,'center');
set(hObject,'Name','Training the Neural Network');
clear;
clear global;
global selected_col;
selected_col = 1;
global selected_ln;
selected_ln = 4;
global all_img_1;
global all_img_2;
global all_img_3;
global all_img_4;
global all_words;
if exist('DataBase.mat','file') == 2
    saved_items = load('DataBase.mat','-mat');
    all_img_1 = saved_items.all_img_1;
    all_img_2 = saved_items.all_img_2;
    all_img_3 = saved_items.all_img_3;
    all_img_4 = saved_items.all_img_4;
    all_words = saved_items.all_words;
end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Show all Dictionary Images
% --- Executes on button press in pushbutton5.
function pushbutton5_Callback(hObject, eventdata, handles)
% hObject    handle to pushbutton5 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
global all_words;
if size(all_words,2) > 0
    fid = fopen('Words_Dictionary.txt', 'w', 'n', 'UTF-8');
    for i = 1:size(all_words,2)
        str = char(all_words{i});
        fwrite(fid, str, 'char');
        str1 = char(13);
        fwrite(fid, str1, 'char');
        str2 = char(10);
        fwrite(fid, str2, 'char');
    end
    fclose(fid);
    dos('notepad Words_Dictionary.txt &');
end