DouKaku?

#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <assert.h>

typedef struct {
    int data;
    int turn;
} CELL;
/*
  [0][1][2]
  [3][4][5]
  [6][7][8]

cell
 data cellの内容
  0:空白
  1:o
  2:x
 turn 打たれたターン数
*/


//勝敗チェック
// 0    :決着まだ
// not 0:勝負あり
int check(CELL a[],int w){
    int i;
    //縦横
    for(i=0;i<3;i++){
        if((a[i*3].data==w)&&(a[i*3+1].data==w)&&(a[i*3+2].data==w)||
           (a[i].data==w)&&(a[i+3].data==w)&&(a[i+6].data==w)) return -1;
    }
    //斜め
    if((a[0].data==w)&&(a[4].data==w)&&(a[8].data==w)||
       (a[2].data==w)&&(a[4].data==w)&&(a[6].data==w)) return -1;
    return 0;
}

//ゲーム状態表示
void putgame(CELL a[],int mode){
    int i,j,turn_max;
    char c[3]={' ','o','x'};
    switch(mode){
    case 0:    //盤面
        for(i=0;i<9;i++){
            printf("%c",c[a[i].data]);
            if(i%3!=2)
                printf("|");
            else{
                printf("\n");
                if(i!=8) printf("-+-+-");
                printf("\n");
            }
        }
        break;
    case 1://盤面+手順
        for(i=0;i<9;i++){
            printf("%c%d",c[a[i].data],a[i].turn);
            if(i%3!=2)
                printf("|");
            else{
                printf("\n");
                if(i!=8) printf("--+--+--");
                printf("\n");
            }
        }
        break;
    case 2://手順
        turn_max=0;
        for(i=0;i<9;i++){
            if(turn_max<a[i].turn) turn_max=a[i].turn;
        }
        for(i=1;i<=turn_max;i++){
            for(j=0;j<9;j++){
                if(a[j].turn==i){
                    printf("%c(%d,%d)",c[a[j].data],j%3,j/3);
                    if(i!=turn_max) printf(",");
                    else printf("\n");
                }
            }
        }
        break;
    }
}

//乱数プレイヤー
int randplayer(CELL a[],int turn){
    int p;
    int i;
    static int seed=0;
    
    //初期化ルーチン
    if(turn==0){
        seed+=rand();
        return 0;
    }
    //乱数再現
    srand(seed);
    for(i=2-turn&2;i<turn;i+=2) rand();

    //思考ルーチン
    //残ってるマスからランダムに選択
    p=(rand()>>3)%(9-(turn-1));

    //埋まってるマスのスキップ
    i=0;
    while(1){
        if(a[i].data)
            p++;
        else{
            if(i==p) break;
        }
        i++;
    }
    return p;
}

//乱数プレイヤー２
int randplayer2(CELL a[],int turn){
    int p;
    int i;
    static int seed=0;;
    
    //初期化ルーチン
    if(turn==0){
        seed+=time(NULL);
        return 0;
    }
    //乱数再現
    srand(seed);
    for(i=2-turn&2;i<turn;i+=2) rand();

    //思考ルーチン
    //残ってるマスからランダムに選択
    p=(rand()>>3)%(9-(turn-1));

    //埋まってるマスのスキップ
    i=0;
    while(1){
        if(a[i].data)
            p++;
        else{
            if(i==p) break;
        }
        i++;
    }
    return p;
}

//ゲーム進行
int game(int (*p1)(CELL [],int ),int (*p2)(CELL [],int)){
    CELL a[9];
    int i;
    int t=1;
    int p;
    int ret=0;
    int (*player[2])(CELL [],int);
    //プレイヤー登録
    player[0]=p1;
    player[1]=p2;
    
    //盤面初期化
    for(i=0;i<9;i++){
        a[i].data=0;
        a[i].turn=0;
    }
    
    //プレイヤー初期化
    player[0](a,0);
    player[1](a,0);

    for(i=1;i<=9;i++){
        p=player[t-1](a,i);
        a[p].data=t;
        a[p].turn=i;
//        putgame(a,0);
        if (check(a,t)){
            ret=t;
            break;
        }else
            t=3-t;
    }
//    putgame(a,1);
//    putgame(a,2);
    return ret;
}

int main(){
    int i;
    int result[3]={0,0,0};

    //乱数の初期化
    srand(time(NULL));

    for(i=1;i<=10000;i++){
        result[game(randplayer,randplayer2)]++;
        if(i%100==0){
            printf("~test%d:o win:%d(%2.1f%%) x win:%d(%2.1f%%) draw:%d(%2.1f%%)\n",
                    i,result[1],100.0*result[1]/i,result[2],100.0*result[2]/i,result[0],100.0*result[0]/i);
        }
    }
    return 0;
}