C語言 AI智能，五子棋 人機對戰(zhàn)，人人對戰(zhàn)

C語言五子棋，人機對戰(zhàn)，人人對戰(zhàn)

chunli@Linux:~$ cat main.c 
# include<stdio.h>
# include<string.h>
# include<stdlib.h>
# define SPA 0
# define MAN 1
# define COM 2    /* 空位置設(shè)為0 ，玩家下的位置設(shè)為1 ，電腦下的位置設(shè)為2 */
int qipan[15][15];    /* 15*15的棋盤 */
int a,b,c,d,x;  /* a b為玩家下子坐標 ，c d為電腦下子坐標 x為剩余空位置*/
void start();  /* 程序的主要控制函數(shù) */
void draw();   /* 畫棋盤 */
int win(int p,int q);  /* 判斷勝利 p q為判斷點坐標 */
void AI(int *p,int *q);     /* 電腦下子 p q返回下子坐標 */
int value(int p,int q);     /* 計算空點p q的價值 */
int qixing(int n,int p,int q);    /* 返回空點p q在n方向上的棋型 n為1-8方向 從右順時針開始數(shù) */
void yiwei(int n,int *i,int *j);   /* 在n方向上對坐標 i j 移位 n為1-8方向 從右順時針開始數(shù)  */

void main()
{
	char k;
	do{
		x=225;
		start();
		printf("還要再來一把嗎?輸入y或n："); getchar(); scanf("%c",&k);
		while(k!='y'&&k!='n'){ printf("輸入錯誤,請重新輸入\n"); scanf("%c",&k); }
		system("clear");
	}while(k=='y');
	printf("謝謝使用!\n");
}

void start()
{
	system("clear");
	int i,j,a1,b1,c1,d1,choice;                /* a1 b1儲存玩家上手坐標 c1 d1儲存電腦上手坐標 */
	char ch;
	printf("\t╔═══════════════════════════════╗\n");
	printf("\t║                                                              ║\n");
	printf("\t║      歡迎使用五子棋對戰(zhàn)程序     祝您玩的愉快挑戰(zhàn)無極限       ║\n");
        printf("\t║                                                              ║\n");
	printf("\t║                 ._______________________.                    ║\n"); 
	printf("\t║                 | _____________________ |                    ║\n");
	printf("\t║                 | I                   I |                    ║\n");
	printf("\t║                 | I     五 子 棋      I |                    ║\n");
	printf("\t║                 | I                   I |                    ║\n");
	printf("\t║                 | I                   I |                    ║\n");
 	printf("\t║                 | I___________________I |                    ║\n");
	printf("\t║                 !_______________________!                    ║\n");
 	printf("\t║                     ._[__________]_.                         ║\n");
	printf("\t║                 .___|_______________|___.                    ║\n");
	printf("\t║                  |::: ____             |                     ║\n"); 
	printf("\t║                  |    ~~~~ [CD-ROM]    |                     ║\n");
	printf("\t║                  !_____________________!                     ║\n");
	printf("\t║                                                              ║\n");
	printf("\t║                                                              ║\n");
	printf("\t║         寒 星 溪 月 疏 星 首，花 殘 二 月 并 白 蓮。         ║\n");
	printf("\t║         雨 月 金 星 追 黑 玉，松 丘 新 宵 瑞 山 腥。         ║\n");
	printf("\t║         星 月 長 峽 恒 水 流，白 蓮 垂 俏 云 浦 嵐。         ║\n");
	printf("\t║         黑 玉 銀 月 倚 明 星，斜 月 明 月 堪 稱 朋。         ║\n");
	printf("\t║         二 十 六 局 先 棄 二，直 指 游 星 斜 彗 星。         ║\n");
	printf("\t║                                                              ║\n");
	printf("\t║                                                              ║\n");
	printf("\t║          1.人機對戰(zhàn)                 2.人人對戰(zhàn)               ║\n");
	printf("\t║                                                              ║\n");
	printf("\t╚═══════════════════════════════╝\n");
	printf("\t\t\t請輸入1或2：");
	scanf("%d",&choice);                              /* 選擇模式:人機或人人 */
	while(choice!=1&&choice!=2) { printf("輸入錯誤，請重新輸入："); scanf("%d",&choice); }
	if(choice==1){                                    /* 人機模式 */
		system("clear"); 
		printf("歡迎使用五子棋人機對戰(zhàn)！下子請輸入坐標（如13 6）?；谄逭堓斎?5 15。\n\n\n"); 
		for(j=0;j<15;j++)
			for(i=0;i<15;i++)
				qipan[j][i]=SPA;  /* 置棋盤全為空 */
		draw();
		printf("[先]下請按1，[后]下請按2：");
		scanf("%d",&i); 
		while(i!=1&&i!=2)  { printf("輸入錯誤，請重新輸入："); scanf("%d",&i); }
		if(i==1) {                     /* 如果玩家先手下子 */
			printf("請下子："); scanf("%d%d",&a,&b); 
			while((a<0||a>14)||(b<0||b>14)) { printf("坐標錯誤!請重新輸入："); scanf("%d%d",&a,&b); }
			a1=a; b1=b; x--; qipan[b][a]=MAN; system("clear"); draw();
		}
		while(x!=0){
			if(x==225) { c=7; d=7; qipan[d][c]=COM; x--; system("clear"); draw(); }  /* 電腦先下就下在7 7 */
			else { AI(&c,&d); qipan[d][c]=COM; x--; system("clear"); draw(); } /* 電腦下子 */
			c1=c; d1=d;                 /* 儲存電腦上手棋型 */
			if(win(c,d)){               /* 電腦贏 */
				printf("要悔棋嗎？請輸入y或n："); getchar(); scanf("%c",&ch);
				while(ch!='y'&&ch!='n') { printf("輸入錯誤，請重新輸入："); scanf("%c",&ch); }
				if(ch=='n') { printf("下不過電腦很正常，請不要灰心!!!\n"); return; }
				else { x+=2; qipan[d][c]=SPA; qipan[b1][a1]=SPA; system("clear"); draw(); } /* 悔棋 */
			}
			printf("電腦下在%d %d\n請輸入：",c,d); scanf("%d%d",&a,&b);   /* 玩家下子 */
			if(a==15&&b==15) { x+=2; qipan[d][c]=SPA; qipan[b1][a1]=SPA; system("clear"); draw(); printf("請輸入："); scanf("%d%d",&a,&b); } /* 悔棋 */
			while((a<0||a>14)||(b<0||b>14)||qipan[b][a]!=SPA) { printf("坐標錯誤或該位置已有子!請重新輸入："); scanf("%d%d",&a,&b); }
			a1=a; b1=b; x--; qipan[b][a]=MAN; system("clear"); draw();
			if(win(a,b)){ printf("電腦神馬的都是浮云!!!\n"); return; }    /* 玩家贏 */
		}
		printf("和局\n");
	}
	if(choice==2){
		system("clear"); 
		printf("歡迎使用五子棋人人對戰(zhàn)！下子請輸入坐標(如13 6)?；谄逭堓斎?5 15。	\n\n\n"); 
		for(j=0;j<15;j++)
			for(i=0;i<15;i++)
				qipan[j][i]=SPA; /* 置棋盤全為空 */
		draw();
		while(x!=0){
			printf("1P請輸入："); scanf("%d%d",&a,&b);
			if(a==15&&b==15) { x+=2; qipan[d][c]=SPA; qipan[b1][a1]=SPA; system("clear"); draw(); printf("1P請輸入："); scanf("%d%d",&a,&b); }	
			while((a<0||a>14)||(b<0||b>14)||qipan[b][a]!=SPA) { printf("坐標錯誤或該位置已有子!請重新輸入："); scanf("%d%d",&a,&b); }
			a1=a; b1=b; x--; qipan[b][a]=MAN; system("clear"); draw();
			printf("1P下在%d %d。\n",a,b);
			if(win(a,b)){ printf("你真棒!!!\n"); return; }    /* 玩家1贏 */
			printf("2P請輸入："); scanf("%d%d",&c,&d);
			if(c==15&&d==15) { x+=2; qipan[b][a]=SPA; qipan[d1][c1]=SPA; system("clear"); draw(); printf("2P請輸入："); scanf("%d%d",&c,&d); }	
			while((c<0||c>14)||(d<0||d>14)||qipan[d][c]!=SPA) { printf("坐標錯誤或該位置已有子!請重新輸入："); scanf("%d%d",&c,&d); }
			c1=c; d1=d; x--; qipan[d][c]=COM; system("clear"); draw();
			printf("2P下在%d %d。\n",c,d);
			if(win(c,d)){ printf("你真棒!!!\n"); return; }    /* 玩家2贏 */
		}
		printf("和局\n");
	}
}
void draw() /* 畫棋盤 */
{
	int i,j;
	char p[15][15][4];
	for(j=0;j<15;j++)
		for(i=0;i<15;i++){
			if(qipan[j][i]==SPA) strcpy(p[j][i],"  \0");
			if(qipan[j][i]==MAN) strcpy(p[j][i],"●\0");
			if(qipan[j][i]==COM) strcpy(p[j][i],"◎\0");
		}
	printf("         0   1   2   3   4   5   6   7   8   9   10  11  12  13  14  \n"); 
	printf("       ┌─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┐\n");
	for(i=0,j=0;i<14;i++,j++){
	printf("     %2d│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%d\n",j,p[i][0],p[i][1],p[i][2],p[i][3],p[i][4],p[i][5],p[i][6],p[i][7],p[i][8],p[i][9]
	printf("       ├─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┤\n");
	}
    printf("     14│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│%s│0\n",p[14][0],p[14][1],p[14][2],p[14][3],p[14][4],p[14][5],p[14][6],p[14][7],p[14][8],p[14][
    printf("       └─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┘\n");
	printf("         0   1   2   3   4   5   6   7   8   9   10  11  12  13  14  \n");
}
int win(int p,int q)      /* 判斷勝利 p q為判斷點坐標，勝利返回1，否則返回0 */
{
	int k,n=1,m,P,Q;      /* k儲存判斷點p q的狀態(tài)COM或MAN。P Q儲存判斷點坐標。n為判斷方向。m為個數(shù)。 */
	P=p; Q=q;
	k=qipan[q][p];
	while(n!=5){
		m=0; 
		while(k==qipan[q][p]){
			m++;
			if(m==5) return 1; 
			yiwei(n,&p,&q); if(p<0||p>14||q<0||q>14) break;
		}
		n+=4; m-=1; p=P; q=Q;   /* 轉(zhuǎn)向判斷 */
		while(k==qipan[q][p]){
			m++;
			if(m==5) return 1; 
			yiwei(n,&p,&q); if(p<0||p>14||q<0||q>14) break;
		}
		n-=3; p=P; q=Q;         /* 不成功則判斷下一組方向 */
	}
	return 0;
}
void AI(int *p,int *q)           /* 電腦下子 *p *q返回下子坐標 */
{
	int i,j,k,max=0,I,J;        /* I J為下點坐標 */
	for(j=0;j<15;j++)
		for(i=0;i<15;i++)
			if(qipan[j][i]==SPA){      /* 歷遍棋盤，遇到空點則計算價值，取最大價值點下子。 */
				k=value(i,j);
				if(k>=max) { I=i; J=j; max=k; }
			}
	*p=I; *q=J;
}
int value(int p,int q) /* 計算空點p q的價值 以k返回 */ 
{
	int n=1,k=0,k1,k2,K1,K2,X1,Y1,Z1,X2,Y2,Z2,temp;  
	int a[2][4][4]={40,400,3000,10000,6,10,600,10000,20,120,200,0,6,10,500,0,30,300,2500,5000,2,8,300,8000,26,160,0,0,4,20,300,0};
	       /* 數(shù)組a中儲存己方和對方共32種棋型的值  己方0對方1    活0沖1空活2空沖3    子數(shù)0-3（0表示1個子，3表示4個子） */
	while(n!=5){
		k1=qixing(n,p,q); n+=4;			/* k1,k2為2個反方向的棋型編號 */
		k2=qixing(n,p,q); n-=3;
		if(k1>k2) { temp=k1; k1=k2; k2=temp; }  /* 使編號小的為k1,大的為k2 */
		K1=k1; K2=k2;       /* K1 K2儲存k1 k2的編號 */
		Z1=k1%10; Z2=k2%10; k1/=10; k2/=10; Y1=k1%10; Y2=k2%10; k1/=10; k2/=10; X1=k1%10; X2=k2%10;
		    /* X Y Z分別表示 己方0對方1    活0沖1空活2空沖3    子數(shù)0-3（0表示1個子，3表示4個子） */
		if(K1==-1) { if(K2<0) { k+=0; continue; } else k+=a[X2][Y2][Z2]+5; continue;  };    /* 空棋型and其他 */
		if(K1==-2) { if(K2<0) { k+=0; continue; } else k+=a[X2][Y2][Z2]/2; continue; };       /* 邊界沖棋型and其他 */ 
		if(K1==-3) { if(K2<0) { k+=0; continue; } else k+=a[X2][Y2][Z2]/3; continue; };    /* 邊界空沖棋型and其他 */ 
		if(((K1>-1&&K1<4)&&((K2>-1&&K2<4)||(K2>9&&K2<14)))||((K1>99&&K1<104)&&((K2>99&&K2<104)||(K2>109&&K2<114)))){
			/* 己活己活 己活己沖 對活對活 對活對沖 的棋型賦值*/
			if(Z1+Z2>=2) { k+=a[X2][Y2][3]; continue; }
			else { k+=a[X2][Y2][Z1+Z2+1]; continue; }
		}
		if(((K1>9&&K1<14)&&(K2>9&&K2<14))||((K1>109&&K1<114)&&(K2>109&&K2<114))){
			/* 己沖己沖 對沖對沖 的棋型賦值*/
			if(Z1+Z2>=2) { k+=10000; continue; }
			else { k+=0; continue; }
		}
		if(((K1>-1&&K1<4)&&((K2>99&&K2<104)||(K2>109&&K2<114)))||((K1>9&&K1<14)&&((K2>99&&K2<104)||(K2>109&&K2<114)))){
			/* 己活對活 己活對沖 己沖對活 己沖對沖 的棋型賦值*/
			if(Z1==3||Z2==3) { k+=10000; continue; }
			else { k+=a[X2][Y2][Z2]+a[X1][Y1][Z1]/4; continue; } 
		}
		else  { k+=a[X1][Y1][Z1]+a[X2][Y2][Z2]; continue;  }    /* 其他棋型的賦值 */
	}
	return k;
}
int qixing(int n,int p,int q)            /* 返回空點p q在n方向上的棋型號 n為1-8方向 從右順時針開始數(shù) */ 
{
	int k,m=0;  /* 棋型號注解:  己活000-003 己沖010-013 對活100-103 對沖110-113 己空活020-023 己空沖030-033 對空活120-123 對空沖130-133 空-1 邊界沖-2 邊界空沖-3*/
	yiwei(n,&p,&q);
	if(p<0||p>14||q<0||q>14) k=-2;                                      /* 邊界沖棋型 */
	switch(qipan[q][p]){
		case COM:{
					m++; yiwei(n,&p,&q);
					if(p<0||p>14||q<0||q>14) { k=m+9; return k; }
					while(qipan[q][p]==COM) { m++; yiwei(n,&p,&q); if(p<0||p>14||q<0||q>14) { k=m+9; return k; } }
					if(qipan[q][p]==SPA) k=m-1;                         /* 己方活棋型 */
 					else k=m+9;                                         /* 己方?jīng)_棋型 */
				 }break;
		case MAN:{
					m++; yiwei(n,&p,&q);
					if(p<0||p>14||q<0||q>14) { k=m+109; return k; }
					while(qipan[q][p]==MAN) { m++; yiwei(n,&p,&q); if(p<0||p>14||q<0||q>14) { k=m+109; return k; } }
					if(qipan[q][p]==SPA) k=m+99;                         /* 對方活棋型 */
					else k=m+109;                                        /* 對方?jīng)_棋型 */
				 }break;
		case SPA:{
					yiwei(n,&p,&q);
					if(p<0||p>14||q<0||q>14) { k=-3; return k; }         /* 邊界空沖棋型 */
					switch(qipan[q][p]){
					case COM:{
								m++; yiwei(n,&p,&q);
								if(p<0||p>14||q<0||q>14) { k=m+29; return k; }
								while(qipan[q][p]==COM) { m++; yiwei(n,&p,&q); if(p<0||p>14||q<0||q>14) { k=m+29; return k; } }
								if(qipan[q][p]==SPA) k=m+19;                      /* 己方空活棋型 */
								else k=m+29;                                      /* 己方空沖棋型 */
							 }break;
					case MAN:{
								m++; yiwei(n,&p,&q);
								if(p<0||p>14||q<0||q>14) { k=m+129; return k; }
								while(qipan[q][p]==MAN) { m++; yiwei(n,&p,&q); if(p<0||p>14||q<0||q>14) { k=m+129; return k; } }	
								if(qipan[q][p]==SPA) k=m+119;                     /* 對方空活棋型 */
								else k=m+129;                                     /* 對方空沖棋型 */ 
							 }break;
					case SPA: k=-1; break;                                         /* 空棋型 */
					}
				}break;
	}
	return k;
}
void yiwei(int n,int *i,int *j)        /* 在n方向上對坐標 i j 移位 n為1-8方向 從右順時針開始數(shù) */
{
	switch(n){
	case 1: *i+=1; break;
	case 2: *i+=1; *j+=1; break;
	case 3: *j+=1; break;
	case 4: *i-=1; *j+=1; break;
	case 5: *i-=1; break;
	case 6: *i-=1; *j-=1; break;
	case 7: *j-=1; break;
	case 8: *i+=1; *j-=1; break;
	}
}
 



chunli@Linux:~$

編譯運行：

chunli@Linux:~$ gcc main.c  && ./a.out 
	╔═══════════════════════════════╗
	║                                                              ║
	║      歡迎使用五子棋對戰(zhàn)程序     祝您玩的愉快挑戰(zhàn)無極限       ║
	║                                                              ║
	║                 ._______________________.                    ║
	║                 | _____________________ |                    ║
	║                 | I                   I |                    ║
	║                 | I     五 子 棋      I |                    ║
	║                 | I                   I |                    ║
	║                 | I                   I |                    ║
	║                 | I___________________I |                    ║
	║                 !_______________________!                    ║
	║                     ._[__________]_.                         ║
	║                 .___|_______________|___.                    ║
	║                  |::: ____             |                     ║
	║                  |    ~~~~ [CD-ROM]    |                     ║
	║                  !_____________________!                     ║
	║                                                              ║
	║                                                              ║
	║         寒 星 溪 月 疏 星 首，花 殘 二 月 并 白 蓮。         ║
	║         雨 月 金 星 追 黑 玉，松 丘 新 宵 瑞 山 腥。         ║
	║         星 月 長 峽 恒 水 流，白 蓮 垂 俏 云 浦 嵐。         ║
	║         黑 玉 銀 月 倚 明 星，斜 月 明 月 堪 稱 朋。         ║
	║         二 十 六 局 先 棄 二，直 指 游 星 斜 彗 星。         ║
	║                                                              ║
	║                                                              ║
	║          1.人機對戰(zhàn)                 2.人人對戰(zhàn)               ║
	║                                                              ║
	╚═══════════════════════════════╝
			請輸入1或2：