for (y = 13; y <= Bottom; y++) {
  [3,y] = mid([2,y], 4);
  [2,y] = left([2,y], 3);
}