//date 2014年7月7日09:53:24
//willows  
//五子棋
 
#define _CRT_SECURE_NO_WARNINGS
 
#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
 
//棋盤初始化函數(shù)
//Chessboard棋盤數(shù)組，ln=棋盤大小,成功返回Chessboard，不成功NULL
void init_Chessboard(char Chessboard[][7], int ln)
{
  if ((Chessboard != NULL) && (ln>0)){
    int i = 0, j = 0;
    for (i = 0; i<ln; ++i){
      for (j = 0; j<ln; ++j){
        Chessboard[i][j] = '\t';
      }
    }
  // return Chessboard;
  }
// return NULL;
}
 
 
//顯示棋盤函數(shù)
void show_Chessboard(char Chessboard[][7], int ln)
{
  assert((Chessboard != NULL) && (ln > 0));
 
  int i = 0, j = 0;
  for (i = 0; i<ln; ++i){
    putchar('\t');
    putchar(i + '0');
  }//end for1
  putchar('\n');
  putchar('\n');
 
  for (i = 0; i<ln; ++i){
    putchar(i + '0');
    for (j = 0; j<ln; ++j){
      if ('\t' == Chessboard[i][j]){
        putchar(Chessboard[i][j]);
      }
      else
      {
        putchar('\t');
        putchar(Chessboard[i][j]);
      }
 
    }
    putchar('\n');
    putchar('\n');
  }//end for2
}
 
//棋子下子函數(shù)
//下子成功返回1，不成功返回0
int play(char Chessboard[][7], int ln, int x, int y, char ChessPieces)
{
  assert(Chessboard); //ChessPieces=NULL跳出
  if ((x<ln) && (y<ln) && (x >= 0) && (y >= 0)){
    if ('\t' == Chessboard[x][y]){
 
      Chessboard[x][y] = ChessPieces;
      return 1;  //成功
    }
    else
    {
      return 0;
    }//end if2
  }//end if1
  return 0;
}
 
//滿盤判斷
//棋盤滿了判斷//滿了就返回-1
int full_Chess(char Chessboard[][7], int ln)
{
  int i = 0, j = 0;
  for (i = 0; i<ln; ++i){
    for (j = 0; j<ln; ++j){
      if ('\t' == Chessboard[i][j]){
        return 0;  //棋盤未滿
      }//end if
    }//end for j
  }//end for i
 
  return 1;//棋盤滿了
 
}
 
 
//是否連成五子線判斷函數(shù)
//Chessboard=棋盤數(shù)組,ln=棋盤寬度,(XS,YS)方向判斷起點坐標(biāo),(dx,dy)方向增量標(biāo)記
//連成線返回1，沒有返回0
int judga_line(char Chessboard[][7], int ln, int XS, int YS, int dx, int dy)
{
  assert((Chessboard != NULL) && (ln > 0));
  if((XS <ln) && (YS<ln)  //起點坐標(biāo)在棋盤內(nèi)
    && (XS >=0) && (YS >=0)
    && (dx != 0 || dy != 0))        //坐標(biāo)增量不為同時0
  {
 
    if (((XS + dx * 4) > ln) || ((XS + dx * 4)<0) || //判斷終點坐標(biāo)
      ((YS + dy * 4)>ln) || ((YS + dy * 4) < 0) || //在棋盤外
      ('\t' == Chessboard[XS][YS]))
    {
        return 0;  //不在棋盤內(nèi)，或者起點是沒下子
    }
    else
    {
      int i = 0;
      for (i = 1; i < 5; ++i){
        if (Chessboard[XS][YS] != Chessboard[XS + (dx * i)][YS + (dy * i)])
        {
          return 0;  //如果不是連續(xù)5個一樣的
        }//end if3
      }//end for1
      return 1;  //五個都一樣，且都在棋盤內(nèi)
    }//end if 2
  }
  return 0;  //其他情況
}
 
//裁判函數(shù)
//Chessboard 棋盤數(shù)組，ln=棋盤寬度
//贏了返回1，否則返回0
int judga(char Chessboard[][7], int ln)
{
  assert((NULL != Chessboard) && (ln>0));
  int i = 0, j = 0;
  //縱向成五子連線判斷
  for (i = 0; i<(ln - 4); ++i){
    for (j = 0; j<ln; ++j){
      if (judga_line(Chessboard, ln, i, j, 1, 0)){
        return 1;
      }
    }//end for_j
  }//end for_i
 
    //橫向成五子連線判斷
  for (i = 0; i<ln; ++i){
    for (j = 0; j<(ln - 4); ++j){
      if (judga_line(Chessboard, ln, i, j, 0, 1)){
        return 1;
      }
    }//end for_j
  }//end for_i
 
    //左上到右下成五子連線判斷
  for (i = 0; i<(ln - 4); ++i){
    for (j = 0; j<(ln - 4); ++j){
      if (judga_line(Chessboard, ln, i, j, 1, 1)){
        return 1;
      }
    }//end for_j
  }//end for_i
 
    //左下到右上成五子連線判斷
  for (i = ln-1; i>(ln-4); --i){
    for (j = 0; j <(ln - 4); ++j){
      if (judga_line(Chessboard, ln, i, j, -1, 1)){
        return 1;
      }
    }//end for_j
  }//end for_i
 
  return 0;  //沒能贏
}
 
 
//主函數(shù)
 
 
int main()
{
  char CB[7][7];
  char nameA[50] = "玩家A";
  char nameB[50] = "玩家B";
  int x = -1, y = -1;
  //初始化
  init_Chessboard(CB, 7);
 
  printf("請輸入玩家A的名字:");
  scanf("%s", nameA);
 
  printf("請輸入玩家B的名字:");
  scanf("%s", nameB);
   
  //顯示棋盤
  show_Chessboard(CB, 7);
 
  while (1){
    //判斷是否棋盤已滿
    if (full_Chess(CB, 7)){
      puts("\n棋盤已滿，下次再戰(zhàn)！");
      break; //跳出最外層while
    }//end if
 
 
    //玩家Ａ下子
    while (1){
      printf("\n請玩家 %s 下子 @\n", nameA);
      printf("棋子行坐標(biāo)X=");
      scanf("%d", &x);
      printf("棋子列坐標(biāo)Y=");
      scanf("%d", &y);
 
      if (play(CB, 7, x, y, '@')){  //@ ascii=64
        break;   //下子成功
      }
      else
      {
        puts("下子失敗，請重新選定位置下子");
        continue;  //下子不成功，重新下子
      }//end if
    }//end while A
 
    //顯示棋盤
    show_Chessboard(CB, 7);
 
    //判斷玩家A是否勝利
    if (judga(CB, 7)){
      printf("\n恭喜玩家 %s 成功取得勝利??！鮮花\n", nameA);
      getchar();
      getchar();
      break; //跳出最外層while
    }//不用下了
 
    //玩家B下子
    while (1){
      printf("\n請玩家 %s 下子 O\n", nameB);
      printf("棋子行坐標(biāo)X=");
      scanf("%d", &x);
      printf("棋子列坐標(biāo)Y=");
      scanf("%d", &y);
 
      if ((play(CB, 7, x, y, 'O'))){ //O ascii=79
        break;   //下子成功
      }
      else
      {
        puts("下子失敗，請重新選定位置下子");
        continue;  //下子不成功，重新下子
      }//end if
 
    }//end while B
 
    //顯示棋盤
    show_Chessboard(CB, 7);
 
    //判斷玩家B是否勝利
    if (judga(CB, 7)){
      printf("\n恭喜玩家 %s 成功取得勝利??！ 鮮花\n", nameA);
      getchar();
      getchar();
      break; //跳出最外層while
    }//不用下了
 
  }
 
  return 0;
 
}