#define _CRT_SECURE_NO_WARNINGS
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#define MAX_ROW 3
#define MAX_COL 3

int Menu() {
	printf("====================\n");
	printf("    1.开始游戏\n");
	printf("    0.结束游戏\n");
	printf("====================\n");
	printf("请输入您的选择:");
	int choice = 0;
	scanf("%d", &choice);
	return choice;
}

char chess_board[MAX_ROW][MAX_COL];

void Init() {
	for (int row = 0; row < MAX_ROW; row += 1) {
		for (int col = 0; col < MAX_COL; col += 1) {
			chess_board[row][col] = ' ';
		}
	}
	srand((unsigned int)time(0));
}

void Print() {
	for (int row = 0; row < MAX_ROW; row += 1) {
		printf("| %c | %c | %c |\n", chess_board[row][0],
			chess_board[row][1], chess_board[row][2]);
		if (row != MAX_ROW - 1) {
			printf("|---|---|---|\n");
		}
	}
	// TODO
	//system("pause");
}

void PlayerMove() {
	printf("玩家请落子!\n");
	while (1) {
		printf("请输入落子坐标(row col):");
		int row = 0;
		int col = 0;
		scanf("%d %d", &row, &col);
		if (row < 0 || row >= MAX_ROW
			|| col < 0 || col >= MAX_COL) {
			printf("您的坐标输入非法,请重新输入!\n");
			continue;
		}
		if (chess_board[row][col] != ' ') {
			printf("此位置已有棋子,请重新输入!\n");
			continue;
		}
		chess_board[row][col] = 'X';
		break;
	}
	printf("玩家落子完毕!\n");
}

char CheckWinner() {
	for (int row = 0; row < MAX_ROW; row += 1) {
		if (chess_board[row][0] == chess_board[row][1]
			&& chess_board[row][0] == chess_board[row][2])
			return chess_board[row][0];
	}
	for (int col = 0; col < MAX_COL; col += 1) {
		if (chess_board[0][col] == chess_board[1][col]
			&& chess_board[0][col] == chess_board[2][col])
			return chess_board[0][col];
	}
	if (chess_board[0][0] == chess_board[1][1]
		&& chess_board[0][0] == chess_board[2][2]) {
		return chess_board[0][0];
	}
	if (chess_board[0][2] == chess_board[1][1]
		&& chess_board[0][2] == chess_board[2][0]) {
		return chess_board[0][2];
	}
	if (IsFull()) {
		return 'D';//draw 平局
	}return ' ';
}

int IsFull() {
	for (int row = 0; row < MAX_ROW; row += 1) {
		for (int col = 0; col < MAX_COL; col += 1) {
			if (chess_board[row][col] == ' ') {
				return 0;
			}
		}
	}
	return 1;
}

void ComputerMove() {
	printf("电脑落子!\n");
	while (1) {
		int row = rand() % 3;
		int col = rand() % 3;
		if (chess_board[row][col] != ' ') {
			continue;
		}
		chess_board[row][col] = 'O';
		break;
	}
	printf("电脑落子完毕!\n");
}

void Game() {
	Init();
	char winner = ' ';
	while (1) {
		Print();
		PlayerMove();
		winner = CheckWinner();
		if (winner != ' ') {
			break;
		}
		ComputerMove();
		winner = CheckWinner();
		if (winner != ' ') {
			break;
		}
	}
	Print();
	if (winner == 'X') {
		printf("玩家胜利!\n");
	}
	else if (winner == 'O') {
		printf("电脑胜利!\n");
	}
	else if (winner == 'D') {
		printf("和棋!\n");
	}
	else printf("代码出错!\n");
}

int main() {
	while(1) {
		int choice = Menu();
		if (choice == 1) {
			Game();
		}
		else if (choice == 0) {
			printf("再见!\n");
			break;
		}
		else {
			printf("您的输入有误,请重新输入!\n");
		}
	}
	system("pause");
	return 0;
}