edgedetect.m

Edge detection in microscopy images using curvelets

function popup_crvltsize_CreateFcn(hObject, eventdata, handles)
% hObject    handle to popup_crvltsize (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: popupmenu 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


% --- Executes on selection change in popup_nrfields.
function popup_nrfields_Callback(hObject, eventdata, handles)
% hObject    handle to popup_nrfields (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% update the fieldsel popup menu
strs = {};
nflds = get(hObject, 'Value');
for k = 1:nflds, strs{k} = sprintf('%d',k); end
set(handles.popup_fieldsel, 'String', strs);
set(handles.popup_fieldsel, 'Value', 1);
guidata(hObject, handles)

findedges(handles, 1);


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

% Hint: popupmenu 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


% --- Executes on selection change in listbox_levels.
function listbox_levels_Callback(hObject, eventdata, handles)
% hObject    handle to listbox_levels (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 1)


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

% Hint: listbox 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



function edit_thrshlow_Callback(hObject, eventdata, handles)
% hObject    handle to edit_thrshlow (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes during object creation, after setting all properties.
function edit_thrshlow_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_thrshlow (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



function edit_thrshhigh_Callback(hObject, eventdata, handles)
% hObject    handle to edit_thrshhigh (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes during object creation, after setting all properties.
function edit_thrshhigh_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_thrshhigh (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


% --- Executes on selection change in popup_extendlen.
function popup_extendlen_Callback(hObject, eventdata, handles)
% hObject    handle to popup_extendlen (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


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

% Hint: popupmenu 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


% --- Executes on button press in popup_thinedges.
function popup_thinedges_Callback(hObject, eventdata, handles)
% hObject    handle to popup_thinedges (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);



% --- Executes on button press in popup_dilatethin.
function popup_dilatethin_Callback(hObject, eventdata, handles)
% hObject    handle to popup_dilatethin (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes on selection change in popup_dirspace.
function popup_dirspace_Callback(hObject, eventdata, handles)
% hObject    handle to popup_dirspace (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 1);


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

% Hint: popupmenu 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


% --- Executes on selection change in popup_displaytype.
function popup_displaytype_Callback(hObject, eventdata, handles)
% hObject    handle to popup_displaytype (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

displaydata(handles)


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

% Hint: popupmenu 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


% --- Executes on selection change in popup_fieldsel.
function popup_fieldsel_Callback(hObject, eventdata, handles)
% hObject    handle to popup_fieldsel (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

displaydata(handles, 1)

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

% Hint: popupmenu 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


% --- Executes on button press in popup_despur.
function popup_despur_Callback(hObject, eventdata, handles)
% hObject    handle to popup_despur (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);



function edit_global_extth_Callback(hObject, eventdata, handles)
% hObject    handle to edit_global_extth (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes during object creation, after setting all properties.
function edit_global_extth_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_global_extth (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



function edit_local_extth_Callback(hObject, eventdata, handles)
% hObject    handle to edit_local_extth (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes during object creation, after setting all properties.
function edit_local_extth_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_local_extth (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


% --- Executes on button press in check_tophat.
function check_tophat_Callback(hObject, eventdata, handles)
% hObject    handle to check_tophat (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);

% --- Executes on button press in check_excludesheets.
function check_excludesheets_Callback(hObject, eventdata, handles)
% hObject    handle to check_excludesheets (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);



function edit_tophatradius_Callback(hObject, eventdata, handles)
% hObject    handle to edit_tophatradius (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes during object creation, after setting all properties.
function edit_tophatradius_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_tophatradius (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


% --- Executes on button press in check_skeletonize.
function check_skeletonize_Callback(hObject, eventdata, handles)
% hObject    handle to check_skeletonize (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes on button press in check_displayedges.
function check_displayedges_Callback(hObject, eventdata, handles)
% hObject    handle to check_displayedges (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

displaydata(handles)


% --- Executes on button press in check_displaysheets.
function check_displaysheets_Callback(hObject, eventdata, handles)
% hObject    handle to check_displaysheets (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

displaydata(handles)


% --- Executes on button press in check_displayfield.
function check_displayfield_Callback(hObject, eventdata, handles)
% hObject    handle to check_displayfield (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

displaydata(handles)


function edit_sheetthrsh_Callback(hObject, eventdata, handles)
% hObject    handle to edit_sheetthrsh (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 2);


% --- Executes during object creation, after setting all properties.
function edit_sheetthrsh_CreateFcn(hObject, eventdata, handles)
% hObject    handle to edit_sheetthrsh (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


% --- Executes on button press in button_export.
function button_export_Callback(hObject, eventdata, handles)
% hObject    handle to button_export (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

est = struct('image', handles.im, 'cc', {handles.C}, 'field', {handles.fld}, 'edges_fld', handles.e, 'edges', handles.E, 'sheets', handles.sheet);
assignin('base', 'edgedata', est);
msgbox('Data was exported to base workspace in struct "edgedata".');


% --- Executes on button press in check_allcrvlt.
function check_allcrvlt_Callback(hObject, eventdata, handles)
% hObject    handle to check_allcrvlt (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

if ~isempty(handles.C),
    allcurvelets = get(hObject, 'Value');
    hb = msgbox('Working...');
    handles.C = applycurvelettransform(handles.im, allcurvelets);
    guidata(hObject, handles);
    close(hb)
    
    % recompute if finest level selected
    if ismember(length(get(handles.listbox_levels, 'String')), [get(handles.listbox_levels, 'Value')]),
        findedges(handles, 1);
    end
end


% --- Executes on selection change in popup_filtertype.
function popup_filtertype_Callback(hObject, eventdata, handles)
% hObject    handle to popup_filtertype (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

findedges(handles, 1);

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

% Hint: popupmenu 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


function menu_batch_Callback(hObject, eventdata, handles)

batch_edge(handles);