function getSign(val) {
  if (val >= 0) {
    return 1;
  } else {
    return -1;
  }
}

top = y;
sign = getSign([x,top]);
while (y < Bottom && getSign([x,y+1]) == sign) {
  y++;
}

SelLeft = 1;
SelRight = Right;
SelTop = top;
SelBottom = y;
Copy();