for (y = SelTop; y <= SelBottom; y++) {
  for (x = SelRight; x >= SelLeft; x--) {
    str = [x,y];
    str = replace(str, "A1", "name");
    str = replace(str, "A2", "class");
    str = replace(str, "A3", "");
    str = replace(str, "A4", "mode");
    str = replace(str, "<font size=\"3\" color=\"#000000\">", "");
    str = replace(str, "<font size=\"1\" color=\"#000000\">", "");

    if (str != [x,y]) {
      [x,y] = str;
    } else {
      for (x2 = x; x2 < SelRight; x2++) {
        [x2,y] = [x2+1,y];
      }
      [SelRight,y] = "";
    }
  }
}