検証！必勝パターン（５）

勝ちパターンの計算については、だいたい文章化できたかな？

１．自分のコマの上下左右斜め列に＋１０点
２．相手のコマの上下左右斜め列に－１０点
３．４隅は無条件に＋１点
４．中央を開けて○と×がにらみ合いになったときは、残る角に＋１５点

※
５．１列に自分のコマがふたつあるときは、残りの空白列に＋１００点
ここに置いたら勝ちなので、最優先でここに置く。
６．１列に相手のコマがふたつあるときは、残りの空白列に＋８０点
ここを残して相手にまわしたら負けるので、条件５の次に優先


このルールで盤面計算しなおして、再検証してみる。

ケース４
対角

いきなりルール３の「角は＋１点」忘れてるけど。
このケース４のためにルール４追加したんだから、うまくいってもらわないと困る。

４手目×はリーチ阻止でここ一拓。
５手目の決定も、この新ルールで予想外にうまくいった。
角３つ押さえた形でダブルリーチ。これで勝ち。


ケース３
辺の角



いちばん素直な形じゃないかな。
１０点のところが１マス。ここに置いてみる。
４手目の×の人は、リーチ阻止するしかない。
で、５手目は×のリーチ阻止が○側のダブルリーチになる。確定。



ケース２
桂馬飛び


これも、この日のために追加したルール３「角は＋１点」をフル活用。
３手目は左下隅に確定。
あとは×側リーチ阻止 → ○側リーチ阻止 の、５手目でダブルリーチ。


ケース１
接辺

処理ごまかしてる。
ホントは対角になる右下ではなく左下を優先しないといけないんだけど。
なんかうまく出来てしまった。

４手目の×はリーチ阻止するしかない。
で、５手目はいちばん点数の高い右下でダブルリーチ。すなわち勝利確定。



いいんじゃね？
なかなか、いい感じじゃね？

プログラム組む前は、いちど仮置きして、×側から評価しないといけないと読んでた。
ここに置いたら相手がこう置く。そう来たらこう返すみたいな感じの３手読み。
それが盤面に点数つけていちばんいいところに置けば済むんだから、うまく出来たと自画自賛。


main.cpp

---

// CPU思考ルーチン
void CpuTurn()
{
    int x,y;
    int bx,by;
    // 点数評価テーブル
    int tb[3][3]={0};
    int c=-99;

    // （１）次に自分が勝てる手があれば迷わずそこへ置く
    if(CheckDouble(game.Player,bx,by)){
        board[by][bx]=game.Player;
        ChangeTurn();
        return;
    }

    // （２）相手からのリーチはなるべく阻止！
    if(CheckEnemyDouble(game.Player,bx,by)){
        board[by][bx]=game.Player;
        ChangeTurn();
        return;
    }

    // ４隅にゲタをはかせる
    tb[0][0]++;
    tb[0][2]++;
    tb[2][0]++;
    tb[2][2]++;

    // ２ターン目、×側は中央が空いてたら最優先
    if(game.Turn==1)tb[1][1]+=50;

    // 評価点加点
    for(y=0;y<3;y++){
        for(x=0;x<3;x++){
            if(board[y][x]==game.Player){
                for(int i=0;i<3;i++){
                    tb[y][i]+=10;
                    tb[i][x]+=10;
                }
                if(x==y){
                    tb[0][0]+=10;
                    tb[1][1]+=10;
                    tb[2][2]+=10;
                }
                if(((x-y)*(y-x)==-4)||(x==1&&y==1)){
                    tb[0][2]+=10;
                    tb[1][1]+=10;
                    tb[2][0]+=10;
                }
            } else if(board[y][x]!=NONE){
                for(int i=0;i<3;i++){
                    tb[y][i]-=10;
                    tb[i][x]-=10;
                }
                if(x==y){
                    tb[0][0]-=10;
                    tb[1][1]-=10;
                    tb[2][2]-=10;
                }
                if(((x-y)*(y-x)==-4)||(x==1&&y==1)){
                    tb[0][2]-=10;
                    tb[1][1]-=10;
                    tb[2][0]-=10;
                }
            }
        }
    }

    // 対角でにらみあいが発生したときは角の優先度を上げる
    if(((board[0][0]!=NONE)&&(board[1][1]==NONE)&&(board[2][2]!=NONE))||
       ((board[0][2]!=NONE)&&(board[1][1]==NONE)&&(board[2][0]!=NONE))) {
        tb[0][0]+=15;
        tb[0][2]+=15;
        tb[2][0]+=15;
        tb[2][2]+=15;
    }

    // 評価点のいちばん高いポイントを探す
    bx = by = c = -99;
    for(y=0;y<3;y++){
        for(x=0;x<3;x++){
            if((board[1][1]!=game.Player)&&(tb[y][x]==0))continue;
            if((board[y][x]==NONE)&&(tb[y][x]>c)){
                bx = x;
                by = y;
                c = tb[y][x];
            }
        }
    }
    if(c!=-99){
        board[by][bx]=game.Player;
        ChangeTurn();
    } else {
        // ここに来ることはない。はず！
        while(1){
            bx = GetRand(2);
            by = GetRand(2);
            if(board[by][bx]==NONE){
                board[by][bx]=game.Player;   // 手番のひとのカーソルを置く
                ChangeTurn();
                break;
            }
        }
    }
}

---

この、冒頭のルールを頭に入れてたら、この意味不明のソースが
ちょっとは輝いて見えるようになってると思うがどうか。

ルール再掲載
１．自分のコマの上下左右斜め列に＋１０点
２．相手のコマの上下左右斜め列に－１０点
３．４隅は無条件に＋１点
４．中央を開けて○と×がにらみ合いになったときは、残る角に＋１５点

※
５．１列に自分のコマがふたつあるときは、残りの空白列に＋１００点
ここに置いたら勝ちなので、最優先でここに置く。
６．１列に相手のコマがふたつあるときは、残りの空白列に＋８０点
ここを残して相手にまわしたら負けるので、条件５の次に優先

で、前に作ったリーチ状態の確認を盤面評価にうまく組み込めるかと目論んでたんだけど、
だらっと長くなったルール１、２、「評価点加点」の部分がさらに長くなりそうなので
前作った部分をそのまま流用することにした。

ここまででCPU思考ルーチンのだいたい８割は説明できたかな。
あと、２手目で中央に置かれたときと×を受け持ったとき用の、いやらしい微調整だけ。




ブログエントリ
○×ゲームを作る（１）
http://http://hiyayakkoprog.blog.shinobi.jp/Entry/53/

ダウンロードＨＰ
http://hiyayakko.sarashi.com/Marubatu/MaruBatu.html

したらば掲示板
http://jbbs.livedoor.jp/bbs/read.cgi/computer/42268/1251347335/-100