for (y=1; y<=Bottom; y++) {
  c1 = str([1,y]);
  c2 = str([2,y]);
  c3 = str([3,y]);
  c4 = str([4,y]);
  c5 = str([5,y]);

  [1,y] = c5;
  [2,y] = c3;
  [3,y] = c1;
  [4,y] = c2;
  [5,y] = c4;
}