function find_BL_pushbutton(hObject, eventdata)

global var h

xlim(h.image,[0 var.Imsize(2)/3])
ylim(h.image,[0 var.Imsize(1)/3])
% set(h.image,'xlim',[0 var.Imsize(1)/3])
% set(h.image,'ylim',[0 var.Imsize(2)/3])

if isfield(h,'BLpoint')
    var.BL = [];
    delete(h.BLpoint);
end

[x,y] = ginput(1);
var.BL = ceil([y x]);

hold on
h.BLpoint = plot(var.BL(2),var.BL(1),'oy');
hold off

xlim(h.image,[0 var.Imsize(2)])
ylim(h.image,[0 var.Imsize(1)])
end

