
function qcWG_BogLineCB(src,event,x,y,ha)

axes(ha);
gx = get(ha,'XLim');
gy = get(ha,'YLim');
toBL=x>=gx(1) & x<=gx(2) & y>=gy(1) & y<=gy(2);
f = find(toBL);
scatter(x(f),y(f),7,'c','filled');

ha.UserData(:,end+1)=toBL;
