
function BogLineNew = qcWG_BogLineCB(x,y,BogLine,ha)

BogLineNew = BogLine;
axes(ha);
gx = get(ha,'XLim');
gy = get(ha,'YLim');
f = find(x>=gx(1) & x<=gx(2) & y>=gy(1) & y<=gy(2));
plot(x(f),y(f),'c.');
BogLineNew(f) = 1;
