用C语言实现的五子棋算法.docx

1、用C语言实现的五子棋算法五子棋C原码/*turboc2.0下编译通过*/i nclude i nclude i nclude i nclude #define N 15#define B 7#define STOP -10000#define OK 1#define NO 0#define UP 328#define DOWN 336#define LEFT 331#define RIGHT 333/*定义了两个数，n为棋盘的大小。b为背景颜色的数值*/int aN+1N+1;int zx,zy;int write=1,biaoji=0;struct znlong sum;int y;int

2、x;wN+1N+1,max,max1;void cbar(int i,int x,int y,int r);void map(int a);int getkey();int key();void zuobiao(int x,int y,int i);int tu(int a,int write);int wtu(int a,int write);int zhineng(int a);int zh5(int y,int x,int a);long zzh5(int b,int i);main()int i,j;int gdriver=DETECT;int gmode;initgraph(&gdr

3、iver,&gmode,);zx=(N+1)/2;zy=(N+1)/2;for(i=1;i=N;i+)for(j=1;j=N;j+)aij=0;map(a);i=1;while(i)int k,n;k=wtu(a,write);if(k=STOP) goto end;map(a);n=zhineng(a);if(n=STOP) goto end;map(a);end:;/* 实现对局的程序 ，计算全部N*N个格中，最应该填的格子 */int zhineng(int aN+1N+1)int i,j;int k;max.sum=-1;for(i=0;i=N;i+)for(j=0;j+N;j+)wi

4、j.sum=0;wij.x=i;wij.y=j;for(i=1;i=N-4;i+)for(j=1;j=N-4;j+)k=zh5(i,j,a);if(k=STOP) return (STOP);for(i=1;i=N;i+)for(j=1;j=N;j+)if(max.sum(i-zy)*(i-zy)+(j-zx)*(j-zx)max.sum=wij.sum;max.y=i;max.x=j;if(amax.ymax.x=0)amax.ymax.x=-1;zy=max.y;zx=max.x;/* 转换成5*5的数组,计算出在二十五个格子中，最应该填的格 */int zh5(int y,int x,i

5、nt aN+1N+1)int i,j;int b66;long c13;long d66;long temp;for(i=y;i=y+4;i+)for(j=x;j=x+4;j+)bi+1-yj+1-x=aij;c1=b11+b12+b13+b14+b15;c2=b21+b22+b23+b24+b25;c3=b31+b32+b33+b34+b35;c4=b41+b42+b43+b44+b45;c5=b51+b52+b53+b54+b55;c6=b11+b21+b31+b41+b51;c7=b12+b22+b32+b42+b52;c8=b13+b23+b33+b43+b53;c9=b14+b24+

6、b34+b44+b54;c10=b15+b25+b35+b45+b55;c11=b11+b22+b33+b44+b55;c12=b15+b24+b33+b42+b51;for(i=1;i=12;i+)switch(ci)case 5:biaoji=1;return(STOP);case -5:biaoji=-1;return(STOP);case -4:ci=100000;break;case 4:ci=100000;break;case -3:ci=150;break;case 3:ci=150;break;case -2:ci=120;break;case 2:ci=100;break;c

7、ase -1:ci=1;break;case 1:ci=1;break;default: ci=0;for(i=1;i=12;i+)if(ci=150)ci+=zzh5(b,i);for(i=1;i=5;i+)for(j=1;j=5;j+)dij=0;for(i=1;i=5;i+)for(j=1;j=5;j+)if(i=j) dij+=c11;if(i+j)=6) dij+=c12;dij+=ci+cj+5;for(i=1;i=5;i+)for(j=1;j=5;j+)if(bij!=0)dij=-2;max1.sum=-1;max1.y=0;max1.x=0;for(i=1;i=5;i+)fo

8、r(j=1;j=5;j+)if(max1.sum(max1.y+y-1-zy)*(max1.y+y-1-zy)+(max1.x+x-1-zx)*(max1.x+x-1-zx)max1.sum=dij;max1.y=i;max1.x=j;long zzh5(int b66,int n)int i,j,k,l,m;switch(n)case 1:i=b11;j=b12;k=b13;l=b14;m=b15;break;case 2:i=b21;j=b22;k=b23;l=b24;m=b25;break;case 3:i=b31;j=b32;k=b33;l=b34;m=b35;break;case 4

9、:i=b41;j=b42;k=b43;l=b44;m=b45;break;case 5:i=b51;j=b52;k=b53;l=b54;m=b55;break;case 6:i=b11;j=b21;k=b31;l=b41;m=b51;break;case 7:i=b12;j=b22;k=b32;l=b42;m=b52;break;case 8:i=b13;j=b23;k=b33;l=b43;m=b53;break;case 9:i=b14;j=b24;k=b34;l=b44;m=b54;break;case 10:i=b15;j=b25;k=b35;l=b45;m=b55;break;case

10、 11:i=b11;j=b22;k=b33;l=b44;m=b55;break;case 12:i=b15;j=b24;k=b33;l=b42;m=b51;break;if(i=0&j=1&k=1&l=1&m=0)return (900);if(i=0&j=-1&k=-1&l=-1&m=0)return(1000);if(i=0&j=0&k=1&l=1&m=1)|(i=1&j=1&k=1&l=0&m=0)return(20);if(i=0&j=0&k=-1&l=-1&m=-1)|(i=-1&j=-1&k=-1&l=0&m=0)return(20);if(i=-1&j=1&k=1&l=1&m=1

11、)|(i=1&j=-1&k=1&l=1&m=1)|(i=1&j=1&k=-1&l=1&m=1)|(i=1&j=1&k=1&l=-1&m=1)|(i=1&j=1&k=1&l=1&m=-1)return(-60);if(i=1&j=-1&k=-1&l=-1&m=-1)|(i=-1&j=1&k=-1&l=-1&m=-1)|(i=-1&j=1&k=-1&l=-1&m=-1)|(i=-1&j=-1&k=-1&l=1&m=-1)|(i=-1&j=-1&k=-1&l=-1&m=1)return(-60);/* 循环执行坐标的选择，直到按回车，空格或ESC键 */int wtu(int aN+1N+1,int

12、 write)int i=1;map(a);zuobiao(zx,zy,1);while(i)int k;k=tu(a,write);if(k=OK) i=0;if(k=STOP) return (STOP);/*从键盘获得输入的值*/int getkey()int key,lo,hi;key=bioskey(0);lo=key&0x00ff;hi=(key&0xff00)8;return(lo=0) ? hi+256:lo);/*对获得的值进行判断*/*对应的码值分别如下*/* 上：328 下：336 左： 331 右： 333 */* 回车：13 ESC键： 27 */int key()i

13、nt k;k=getkey();switch(k)case 27: return (STOP);case 13:case : return (OK);case 328: return (UP);case 336: return (DOWN);case 331: return (LEFT);case 333: return (RIGHT);default: return (NO);/*用来显示坐标的位置*/void zuobiao(int x,int y,int i)int r;if(i!=0)setcolor(GREEN);for(r=1;r=5;r+)circle(75+25*x,25+25

14、*y,r);elseif(azyzx=1)setcolor(8);for(r=1;r=5;r+)circle(75+25*x,25+25*y,r);else if(azyzx=-1)setcolor(WHITE); for(r=1;r=5;r+)circle(75+25*x,25+25*y,r);elsesetcolor(B);for(r=1;r=5;r+)circle(75+25*x,25+25*y,r);setcolor(RED); line(75+25*zx-5,25+25*zy,75+25*x+5,25+25*zy);line(75+25*zx,25+25*zy-5,75+25*zx,

15、25+25*zy+5);/*从键盘获得的值进行判断，反映在显示的图上*/int tu(int aN+1N+1,int write)int k;re:k=key();if(k=OK)if(azyzx=0)azyzx=write;elsegoto re;if(k=STOP) return(STOP);if(k=NO) goto re;if(k=UP)int i,j;if(zy=1) j=zy;else j=zy-1;zuobiao(zx,zy,0);zuobiao(zx,j,1);zy=j;goto re;if(k=DOWN)int i,j;if(zy=N) j=zy;else j=zy+1;zu

16、obiao(zx,zy,0);zuobiao(zx,j,1);zy=j;goto re;if(k=LEFT)int i,j;if(zx=1) i=zx;else i=zx-1;zuobiao(zx,zy,0);zuobiao(i,zy,1);zx=i;goto re;if(k=RIGHT)int i,j;if(zx=N) i=zx;else i=zx+1;zuobiao(zx,zy,0);zuobiao(i,zy,1);zx=i;goto re;/* 根据数组中（存储棋子位置）各位置的数，画实心圆（画出棋子）*/void cbar(int i,int x,int y,int r)if(i!=0

17、)if(i=1)setcolor(8);else if(i=-1)setcolor(WHITE);for(i=1;i=r;i+)circle(x,y,i);/*画出棋盘，和各个棋子*/void map(int aN+1N+1)int i,j;cleardevice();setbkcolor(B);setcolor(RED);for(i=0;iN;i+)line(100,50+25*i,75+N*25,50+25*i);line(100+25*i,50,100+25*i,25+N*25);for(i=1;i=N;i+)for(j=1;j=N;j+)cbar(aij,75+25*j,25+25*i,10);