第６９章 ルールを変更する

縦、横、斜めいずれかの方向で相手の石を挟むと、その石は自分の石となる というようにします。挟める石は１個だけです。同時に多方向の石を挟むこともできます。

先に縦、横、または対角線に自分の石だけが並べば勝ちです。

左の図のような状態の時、先手はE5に石を置くとD4の石を自分のものにすることが できます。

左の図のような状態の時、先手がD4に石を置くとC3, C4の２つの石を自分のものに することができます。

では、プログラムを見てみましょう。

// game06.c

#include <windows.h>
#include <stdio.h>
#include <conio.h>
#include <time.h>

#define MASU 6 //MASUの数値を変えると盤面の大きさが変わります

int banshow(HANDLE);
int Locate(HANDLE, int, int);
int check_location(int, int); //すでに駒がおかれていないかどうか調べる
int judge();
int stonerecord(int, int);
int replay(HANDLE, int);
int comp_put(char *); //コンピュータが駒を置きます
int IsStoneGet(HANDLE, int, int, BOOL);

int ban[MASU][MASU];
int comp; //対戦相手がコンピュータの時1, その他0
int compsente; //コンピュータが先手1, 後手0


struct _tagRec {
    int row;
    int col;
} Rec[MASU * MASU];

int main()
{
    HANDLE hOut;
    char cMoji, szTxt[8];
    BOOL bOrd = TRUE; //FALSE:後手　TRUE:先手
    int i, row =0, col=0, jud, tekazu; //何手で勝負がついたか;
    char location[8]; //位置指定 A2, B1,など
    char *sente = "先手", *gote = "後手";
    char order[8], hantei[16], yesno[8];

    hOut = GetStdHandle(STD_OUTPUT_HANDLE);
    printf("コンピュータと対戦しますか(y/n)");
    gets(yesno);
    if (strcmp(yesno, "Y") == 0 || strcmp(yesno, "y") == 0) {
        comp = 1;
        printf("あなたが先手になりますか(y/n)");
        gets(yesno);
        if (strcmp(yesno, "Y") == 0 || strcmp(yesno, "y") == 0) {
            compsente = 0;
        } else {
            compsente = 1;
        }
    } else {
        comp = 0;
    }
    
    Locate(hOut, 0, 0);
    printf("                                     ");
    Locate(hOut, 0, 1);
    printf("                                     ");

    banshow(hOut);

    for (i = 0; i < MASU * MASU; i++) {
        if (bOrd)
            strcpy(order, sente);
        else
            strcpy(order, gote);
INP:
        Locate(hOut, 28, MASU + 2);
        printf("       ");
        
            Locate(hOut, 0, MASU + 2);
            printf("位置を指定してください(%s)", order);
        if (comp == 0 || (comp == 1 && compsente == 1 && !bOrd) || (comp == 1 && compsente == 0 && bOrd)) {
            gets(location);
        } else {
            comp_put(location);
        }
        if (location[0] == '0')
            return -1;
        if (isalpha(location[0]) == 0) {
            Locate(hOut, 0, MASU + 3);
            printf("指定が違います");
            goto INP;
        }
        if (isupper(location[0]) == 0)
            cMoji = toupper(location[0]);
        else
            cMoji = location[0];
        row = cMoji - 'A';
        if (row < 0 || row > MASU - 1) {
            Locate(hOut, 0, MASU + 3);
            printf("行の指定が違います");
            goto INP;
        }

        if (isdigit(location[1]) != 0 && isdigit(location[2]) != 0 && location[3] == '\0') {
            szTxt[0] = location[1];
            szTxt[1] = location[2];
            szTxt[2] = '\0';
            col = atoi(szTxt) - 1;
        } else if (isdigit(location[1]) != 0 && location[2] == '\0') {
            szTxt[0] = location[1];
            szTxt[1] = '\0';
            col = atoi(szTxt) - 1;
        } else {
            Locate(hOut, 0, MASU + 3);
            printf("列の指定が違います");
            goto INP;
        }
            
        if (col < 0 || col > MASU - 1) {
            Locate(hOut, 0, MASU + 3);
            printf("列の位置指定が違います");
            goto INP;
        }
        if (check_location(row, col) != 0) {
            Locate(hOut, 0, MASU + 3);
            printf("そこには置けません!");
            goto INP;
        }            
        if (bOrd)
            ban[row][col] = 1;
        else
            ban[row][col] = 2;
        IsStoneGet(hOut, row, col, bOrd);
        stonerecord(row, col);
        bOrd = !bOrd;
        banshow(hOut);
        Locate(hOut, 0, MASU + 3);
        printf("                         ");
        jud = judge();
        switch (jud) {
            case 0:
                strcpy(hantei, "");
                break;
            case 1:
                strcpy(hantei, "先手の勝ち");
                tekazu = i +1;
                break;
            case 2:
                strcpy(hantei, "後手の勝ち");
                tekazu = i + 1;
                break;
            default:
                strcpy(hantei, "内部エラー");
                break;
        }
        Locate(hOut, 0, MASU + 4);
        printf(hantei);
        if (jud != 0)
            break;
    }
    if (jud == 0) {
        printf("引き分けです");
        tekazu = MASU * MASU;
    }
    printf("\n\n");
    printf("再現しますか(Y/N)-->");
    gets(yesno);
    if (strcmp(yesno, "y") == 0 || strcmp(yesno, "Y") == 0) {
        replay(hOut, tekazu);
    }
    Locate(hOut, 0, MASU + 6);
    return 0;
}

int banshow(HANDLE hStdOut)
{
    int i, j;

    Locate(hStdOut, 0, 0);
    printf("   ");
    for (i = 0; i < MASU; i++) {
        printf("[%2d]", i + 1);
    }
    printf("\n");
    for (i = 0; i < MASU; i++) {
        printf("[%c]\n", i + 'A');
    }
    for (i = 0; i < MASU; i++) {
        for (j = 0; j < MASU; j++) {
            if (ban[i][j] == 1) {
                Locate(hStdOut, j * 4 + 4, i + 1);
                printf("○");
            }
            if (ban[i][j] == 2) {
                Locate(hStdOut, j * 4 + 4, i + 1);
                printf("×");
            }
        }
    }
    return 0;
}

int Locate(HANDLE hOut, int x, int y)
{
    COORD dwPos;
    dwPos.X = (SHORT)x;
    dwPos.Y = (SHORT)y;

    if (SetConsoleCursorPosition(hOut, dwPos) == 0)
        return -1;
    else
        return 0;
}

int check_location(int row, int col)
{
    if (ban[row][col] == 0)
        return 0;
    else
        return -1;
}

int judge() //戻り値　1:先手の勝ち 2:後手の勝ち 0:勝敗はまだ
{
    int i, j, rseki[MASU], rwa[MASU], cseki[MASU], cwa[MASU];
    int cross1seki = 1, cross1wa = 0, cross2seki = 1, cross2wa = 0;

    // 配列の初期化
    for (i = 0; i < MASU; i++) {
        rseki[i] = 1;
        rwa[i] = 0;
        cseki[i] = 1;
        cwa[i] = 0;
    }
    
    for (i = 0; i < MASU; i++) {
        for (j = 0; j < MASU; j++) {
            rseki[i] = rseki[i] * ban[i][j];
            rwa[i]   = rwa[i] + ban[i][j];
            cseki[i] = cseki[i] * ban[j][i];
            cwa[i]   = cwa[i] + ban[j][i];
        }
        cross1seki = cross1seki * ban[i][i];
        cross1wa   = cross1wa + ban[i][i];
        cross2seki = cross2seki * ban[MASU - 1 - i][i];
        cross2wa   = cross2wa + ban[MASU - 1 - i][i];
    }

    for (i = 0; i < MASU; i++) {
        if (rseki[i] != 0 && rwa[i] == MASU)
            return 1;
        if (rseki[i] != 0 && rwa[i] == MASU * 2)
            return 2;
        if (cseki[i] != 0 && cwa[i] == MASU)
            return 1;
        if (cseki[i] != 0 && cwa[i] == MASU * 2)
            return 2;
    }

    if (cross1seki != 0 && cross1wa == MASU)
        return 1;
    if (cross1seki != 0 && cross1wa == MASU * 2)
        return 2;
    if (cross2seki != 0 && cross2wa == MASU)
        return 1;
    if (cross2seki != 0 && cross2wa == MASU * 2)
        return 2;
    return 0;
}


int stonerecord(int row, int col)
{
    static int nTe = 1;

    Rec[nTe - 1].row = row;
    Rec[nTe - 1].col = col;
    nTe++;
    return 0;
}

int replay(HANDLE hOut, int tekazu)
{
    int i, j, stone;
    BOOL bSente = TRUE;
    //盤面初期化
    Locate(hOut, 0, MASU + 4);
    printf("                    ");
    Locate(hOut, 0, MASU + 2);
    printf("                                ");
    for (i = 0; i < MASU; i++) {
        for (j = 0; j < MASU; j++) {
            Locate(hOut, i * 4 + 4, j + 1);
            printf("    ");
            ban[i][j] = 0;
        }
    }

    for (i = 0; i < tekazu; i++) {
        if (bSente)
            stone = 1;
        else
            stone = 2;
        ban[Rec[i].row][Rec[i].col] = stone;
        IsStoneGet(hOut, Rec[i].row, Rec[i].col, bSente);
        banshow(hOut);
        bSente = !bSente;
        Locate(hOut, 0, MASU + 4);
        printf("再現中.....第%02d手目", i + 1);
        _getch();
    }
    return 0;
}

対戦を再現中もやはり、石の位置が確定したらIsStoneGet関数を呼んでいます。

int comp_put(char *loc)
{
    char a1, a2[4];
    int row, col;

    srand((unsigned)time(NULL));

    while (1) {
        row = rand() % MASU;
        col = rand() % MASU;

        if (check_location(row, col) == 0)
            break;
    }

    a1 = (char)row + 'A';
    _itoa(col + 1, a2, 10);
    
    
    loc[0] = a1;
    loc[1] = '\0';
    strcat(loc, a2);

    return 0;
}

int IsStoneGet(HANDLE hOut, int row, int col, BOOL bOrd)
{
    int jibun, aite;

    if (bOrd) {
        jibun = 1;
        aite = 2;
    } else {
        jibun = 2;
        aite = 1;
    }

    if (row - 2 >= 0 && col - 2 >=0 &&
        ban[row - 2][col - 2] == jibun && 
        ban[row - 1][col - 1] == aite) {
        ban[row - 1][col - 1] = jibun;
    }
    if (row - 2 >= 0 &&
        ban[row - 2][col] == jibun &&
        ban[row - 1][col] == aite) {
        ban[row - 1][col] = jibun;
    }
    if (row - 2 >= 0 && col + 2 < MASU &&
        ban[row - 2][col + 2] == jibun &&
        ban[row - 1][col + 1] == aite) {
        ban[row - 1][col + 1] = jibun;
    }
    if (col - 2 >= 0 &&
        ban[row][col - 2] == jibun &&
        ban[row][col - 1] == aite) {
        ban[row][col - 1] = jibun;
    }
    if (col + 2 < MASU &&
        ban[row][col + 2] == jibun &&
        ban[row][col + 1] == aite) {
        ban[row][col + 1] = jibun;
    }
    if (row + 2 < MASU && col - 2 >= 0 &&
        ban[row + 2][col - 2] == jibun &&
        ban[row + 1][col - 1] == aite) {
        ban[row + 1][col - 1] = jibun;
    }
    if (row + 2 < MASU &&
        ban[row + 2][col] == jibun &&
        ban[row + 1][col] == aite) {
        ban[row + 1][col] = jibun;
    }
    if (row + 2 < MASU && col + 2 < MASU &&
        ban[row + 2][col + 2] == jibun &&
        ban[row + 1][col + 1] == aite) {
        ban[row + 1][col + 1] = jibun;
    }
    return 0;
}

引数のrow, colが石を置いた位置です。bOrdは、石を置いたのが先手か後手か を表しています。TRUEなら先手、FALSEなら後手です。

配列banには先手の位置に1,　後手の位置に2が書き込まれています。 今石を置いたのが先手であれば、自分は１、相手は2、後手であれば 逆になります。

今置いた石の位置から、２だけ離れた位置の石を調べます。それが 自分であり、かつ同じ方向に１離れた位置の石があいてであれば それを自分のものに書きかえます。

こう考えると簡単ですね。

さて、このプログラムでは、コンピュータと対戦する時、コンピュータは 何も考えていません。単にランダムにあいているところに石を置くだけです。 非常に弱いです。少しは、強くしてみてください。