for (y = 1; y <= Bottom; y++) {
  p1 = pos([x,y], "<table bgcolor=pink width=400><tr>");
  p2 = pos([x,y], "<table bgcolor=#FFF5BC width=400>");
  if (p1 > 0 && p2 > p1) {
    [x+1,y] = [x+1,y] + mid([x,y], p1, p2 - p1);
    [x,y] = left([x,y], p1 - 1) + mid([x,y], p2);
  }
}