for (y = 1; y <= Bottom; y++) { for (x = 1; x <= Right; x++) { s = str([x,y]); start = pos(s, "
"); end = pos(s, "
"); if (start > 0 && end > start) { [x,y] = left(s, start - 1) + replace(mid(s, start, end - start), "100", "") + mid(s, end); } } }