// fixed_length.txt.cms 2011.10.16    by あすかぜ
// 固定長ファイルにエクスポートします。
// 編集・再配布は自由です。

arr = "";
for(x=1; x<=Right; x++){
  maxlen = 0;
  for(y=1; y<=Bottom; y++){
    maxlen = max(maxlen, lenB([x,y]));
  }
  arr = arr + str(maxlen) + ",";
}

for(y=1; y<=Bottom; y++){
  rest = arr;
  for(x=1; x<=Right; x++){
    isnum = (double([x,y]) == str([x,y]));
    if(!isnum){
      write([x,y]);
    }
    if(isnum || x < Right){
      pos = pos(rest, ",");
      maxlen = int(left(rest, pos - 1));
      rest = mid(rest, pos + 1);

      padding = maxlen - lenB([x,y]);
      for(i=1; i<=padding; i++){
        write(" ");
      }
    }
    if(isnum){
      write([x,y]);
    }
    if(x < Right){
      write(" ");
    }
  }
  writeln();
}