2013-11-07 实验之火柴游戏（递归思维逻辑，转化思维，查找最优解思维）

题目：

    这是一个纵横火柴棒游戏。如图[1.jpg]，在3x4的格子中，游戏的双方轮流放置火柴棒。其规则是：
    1. 不能放置在已经放置火柴棒的地方（即只能在空格中放置）。
    2. 火柴棒的方向只能是竖直或水平放置。
    3. 火柴棒不能与其它格子中的火柴“连通”。所谓连通是指两根火柴棒可以连成一条直线，且中间没有其它不同方向的火柴“阻拦”。
    例如：图[1.jpg]所示的局面下，可以在C2位置竖直放置（为了方便描述格子位置，图中左、下都添加了标记），但不能水平放置，因为会与A2连通。同样道理，B2，B3，D2此时两种方向都不可以放置。但如果C2竖直放置后，D2就可以水平放置了，因为不再会与A2连通（受到了C2的阻挡）。

    4. 游戏双方轮流放置火柴，不可以弃权，也不可以放多根。直到某一方无法继续放置，则该方为负（输的一方）。
    游戏开始时可能已经放置了多根火柴。
    你的任务是：编写程序，读入初始状态，计算出对自己最有利的放置方法并输出。
    如图[1.jpg]的局面表示为：
00-1
-000
0100
    即用“0”表示空闲位置，用“1”表示竖直放置，用“-”表示水平放置。
【输入、输出格式要求】
  每种局面占3行(多个局面间没有空白行)。
   程序则输出：每种初始局面情况下计算得出的最佳放置法（行号+列号+放置方式）。
    例如：用户输入：
0111
-000
-000

   则程序可以输出：
00-

1111
----
0010
  则程序可以输出：
211
   不难猜出，输出结果的含义为：
   对第一个局面，在第0行第0列水平放置
   对第二个局面，在第2行第1列垂直放置
   注意： 
   行号、列号都是从0开始计数的。    
   对每种局面可能有多个最佳放置方法（解不唯一），只输出一种即可。
   例如，对第一个局面，001 也是正解；最第二个局面，201也是正解。

思想：1，首先暴力递归出解的深度，即判断每一个可能的位置，再计算下一轮，直到不能有位置放置。此时若深度为0，说明一开始就不能放置，输掉比赛。若深度为偶数（>0），说明这样走也会输掉比赛，将初始位置走法记入到输的队列。若深度为奇数，则说明这样走也会赢取比赛，将初始位置走法记入到赢的队列。

          2，选取最佳位置，判断赢的队列的每一个初始位置是否存在于输的队列中，若不存在，该初始位置为最佳位置（可以找多个），若存在，该初始位置为次最佳位置（当没有最佳位置时，它就为最佳）。

程序实现：

#include<stdio.h>
#include<stdlib.h>
#include<string.h>

struct JPoint
{
	int x;
	int y;
	int value;
};

struct JPoint point[12];
int data[3][4];
int pwin = 0;
int plose = 0;
char win[100];
char lose[100];

void input_data(int i, char *s)
{
	int j;
	for(j = 0; j < sizeof(data[0]) / sizeof(data[0][0]); j++){
		if(s[j] == '0') data[i][j] = 0;
		if(s[j] == '1') data[i][j] = 1;
		if(s[j] == '-') data[i][j] = 2;
	}
}

int is_horizontal_check_position(int m, int n)  //    -
{
	int i;
	int j;

	i = m;
	for(j = n-1; j >= 0; j--){
		if(data[i][j] == 2){
			break;
		}
		if(data[i][j] == 1){
			j = -1;
			break;
		}
	}
	if(j != -1) {
		return 0;
	}


	for(j = n+1; j < sizeof(data[0]) / sizeof(data[0][0]); j++){
		if(data[i][j] == 2){
			break;
		}
		if(data[i][j] == 1){
			j = sizeof(data[0]) / sizeof(data[0][0]);
			break;
		}
	}
	if(j != sizeof(data[0]) / sizeof(data[0][0])) {
		return 0;
	}
	return 1;
}


int is_vertical_check_position(int m, int n)  //    1
{
	int i, j;
	j = n;
	for(i = m-1; i >= 0; i--){
		if(data[i][j] == 1){
			break;
		}
		if(data[i][j] == 2){
			i = -1;
			break;
		}
	}
	if(i != -1) {
		return 0;
	}
	
	for(i = m+1; i < sizeof(data) / sizeof(data[0]); i++){
		if(data[i][j] == 1){
			break;
		}
		if(data[i][j] == 2){
			i = sizeof(data) / sizeof(data[0]);
			break;
		}
	}
	if(i != sizeof(data) / sizeof(data[0])) {
		return 0;
	}
	return 1;
}

void exec_match_position(int count)
{
	int i;
	int j;
	int flag = 0;
	for(i = 0; i <  sizeof(data) / sizeof(data[0]); i++)
		for(j = 0; j < sizeof(data[0]) / sizeof(data[0][0]); j++){
		if(data[i][j] == 0){
			if(is_horizontal_check_position(i,j)){
				data[i][j] = 2;
				flag = 1;
				point[count].x = i;
				point[count].y = j;
				point[count].value = 2;
				exec_match_position(count + 1);
			}

			data[i][j] = 0;
			if(is_vertical_check_position(i,j)){
				data[i][j] = 1;
				flag = 1;
				point[count].x = i;
				point[count].y = j;
				point[count].value = 1;
				exec_match_position(count + 1);
			}
			data[i][j] = 0;
		}
	}

	if(flag == 0){
		//printf("count: %d\n", count);
		/*int k;
		for(k=0; k < count; k++){
			if(point[k].value == 1){
				printf("%d%d%c", point[k].x, point[k].y, '1');
			}else {
				printf("%d%d%c", point[k].x, point[k].y, '-');
			}	
		}*/
		//printf("\n");

		if(count % 2){
			char s[4];
			s[0] = point[0].x + '0' - 0;
			s[1]  = point[0].y + '0' - 0;
			if(point[0].value == 1){
				s[2]  = '1';
			}else{
				s[2]  = '-';
			}
			s[3] = '\0';
			win[pwin] == '\0';
			if(strstr(win, s) == NULL){
				win[pwin++] = s[0];
				win[pwin++] = s[1];
				win[pwin++] = s[2];
			}
		}
		if(count % 2 ==0 && count != 0){
			char s[4];
			s[0] = point[0].x + '0' - 0;
			s[1]  = point[0].y + '0' - 0;
			if(point[0].value == 1){
				s[2]  = '1';
			}else{
				s[2]  = '-';
			}
			s[3] = '\0';
			lose[plose] == '\0';
			if(strstr(lose, s) == NULL){
				lose[plose++] = s[0];
				lose[plose++] = s[1];
				lose[plose++] = s[2];
			}
		}
	}
}

void choose_best_poition()
{
	lose[plose] = '\0';
	win[pwin] = '\0';
	//printf("The win position: %s\n",win);
	//printf("The lose position: %s\n",lose);
	int i;
	char s[4];
	int flag =0;
	for(i = 0; i < pwin; ){
		s[0] = win[i++];
		s[1] = win[i++];
		s[2] = win[i++];
		s[3] = '\0';
		if(strstr(lose, s) == NULL){
			flag = 1;
			printf("The best position: %c%c%c\n", s[0], s[1], s[2]);
		}
	}
	if(flag == 0 && pwin > 0){
		printf("%d The best position: %c%c%c\n", 1 ,win[0], win[1], win[2]);
	}

	if(pwin == 0){
		printf("No the best position, we will lose\n");
	}
}

int main(void)
{	
	printf("Please input the right data:\n");
	char input[10];
	scanf("%s", input);
	input_data(0, input);
	scanf("%s", input);
	input_data(1, input);
	scanf("%s", input);
	input_data(2, input);
	exec_match_position(0);
	choose_best_poition();
}