テキスト碁盤入出力機能作成方法　　(2000-10-21)

  【局面保存】

 // 石のコードがこのように定義されているとする
 #define KUU  0
 #define KURO 1
 #define SIRO 2
 #define KABE 3

 // 出力のベースとなるテキスト盤面
 char  textban[][42] =
 {
   "  ＡＢＣＤＥＦＧＨＪＫＬＭＮＯＰＱＲＳＴ",
   "１・−−−−−−−−−−−−−−−−−・",
   "２｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "３｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "４｜＋＋・＋＋＋＋＋・＋＋＋＋＋・＋＋｜",
   "５｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "６｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "７｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "８｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "９｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "10｜＋＋・＋＋＋＋＋・＋＋＋＋＋・＋＋｜",
   "11｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "12｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "13｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "14｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "15｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "16｜＋＋・＋＋＋＋＋・＋＋＋＋＋・＋＋｜",
   "17｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "18｜＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋｜",
   "19・−−−−−−−−−−−−−−−−−・",
   "",
 };

 // テキスト盤面上に配置する文字列
 char* textisi[] = { "", "●", "○", "", }

 // 盤面データが入っているものとする
 BYTE  ban[21][21];

 // テキスト出力関数
 void textbanout(BYTE* ban, int type)
 {
   int   data;
   char  textbanbuffer[21][42];

   memcpy(&textbanbuffer[0][0], &textban[0][0], 20 * 42 + 1);
   for (y = 1; y <= 19; y++)
   {
     for (x = 1; x <= 19; x++)
     {
       data = *(ban + y * 21 + x);
       if ((data == KURO) || (data == SIRO))
         *(short *)(&textbanbuffer[y][x * 2]) = *(short *)(&textisi[data][0]);
     }
   }

   // ここでファイル出力またはクリップボードにコピーすればよい
   // まとめることもできるけど別々のほうが判りやすいかも。
   if (type == 0)
   {
     // ファイルの場合は
     // ファイルをオープンして
     for (y = 0; y <= 19; y++)
       // &textbanbuffer[y][0] が文字列なのでそのままファイルに出力
     // ファイルをクローズ
   }
   else
   {
     // クリップボードの場合は
     // クリップボードを CF_TEXT 形式で確保するなどして
     for (y = 0; y <= 19; y++)
     {
       textbanbuffer[y][40] = '\r';
       textbanbuffer[y][41] = '\n';
     }
     // &textbanbuffer[0][0] をコピー処理する
     // クリップボードを解放するなどする
   }
 }


  【局面読み込み】

 // すこしややこしいかもしれませんので説明だけ。

 １ 読み込んだ行の先頭からの半角空白、全角空白をすべてカット。

      これでこの行の先頭には半角空白、全角空白はなくなる。

 ２ １の処理後、その行の次の２文字または１文字を下記のような文字列と比
    較してＹ座標を求める。
    "10"  "ｊ" なら Y = 10
    "11"  "ｋ" なら Y = 11
    "12"  "ｌ" なら Y = 12
    "13"  "ｍ" なら Y = 13
    "14"  "ｎ" なら Y = 14
    "15"  "ｏ" なら Y = 15
    "16"  "ｐ" なら Y = 16
    "17"  "ｑ" なら Y = 17
    "18"  "ｒ" なら Y = 18
    "19"  "ｓ" なら Y = 19
    "1"  "01"  "１"  "ａ" なら Y = 1
    "2"  "02"  "２"  "ｂ" なら Y = 2
    "3"  "03"  "３"  "ｃ" なら Y = 3
    "4"  "04"  "４"  "ｄ" なら Y = 4
    "5"  "05"  "５"  "ｅ" なら Y = 5
    "6"  "06"  "６"  "ｆ" なら Y = 6
    "7"  "07"  "７"  "ｇ" なら Y = 7
    "8"  "08"  "８"  "ｈ" なら Y = 8
    "9"  "09"  "９"  "ｉ" なら Y = 9
    その他の場合は行を無視して次の行の処理に移る １へ

      １０行目分からチェックするのがミソです。これで正しい盤面データ
      なら正しいＹ座標を返す。２行目からでもいいかな・・・

 ３ ２の処理後、その行の次から２文字ずつ見ていく。１９回かまたは文字列
    がなくなるまで。終われば １へ
    '●'  '◆' なら黒石
    '○'  '◇' なら白石
    盤に石を上書きしていく。

    ゴミは無視する。足りなければ上書きされないまで。

       ゴミとは "・−｜＋" の類です。"１２３あいう" なども無視します。
       罫線使用テキスト盤面も大丈夫です。
       ゴミでもＸ座標はインクリメントしてください。
       万一、後ろが切れていて足りないときはその行の処理をそのまま終
       わらせる。

    Ｙ座標のカウンタをもっておいて、そのカウンタより小さいときは無視
    する。あるいは読み込みの処理終了。

       これはテキストに２つ目の盤面が有った場合に、それを上書きしない
       ようにするためです。
       読み込みデータの終了かまたはカウンタが１９を超えたとき終了する
       のでもよい。

 どちらの処理もなにをすれば良いかが判れば自分にとって書きやすいコード
 にして組み込んでみてください。

 データのチェックやその他高度な技をさせる場合は、それなりに高度な処理
 が必要になります。すこしずつ工夫して改造していくのがお薦めです。