for (y = 1; y <= Bottom; y++) {
  [1,y] = replace([1,y], [2,y], [3,y]);
}