黑白棋人机对弈程序.doc

#include graphics.h /*图形系统头文件*/#define LEFT 0x4b00 /*光标左键值*/#define RIGHT 0x4d00 /*光标右键值*/#define DOWN 0x5000 /*光标下键值*/#define UP 0x4800 /*光标上键值*/#define ESC 0x011b /* ESC键值*/#define ENTER 0x1c0d /* 回车键值*/int a88=0,key,score1,score2;/*具体分数以及按键与存放棋子的变量*/char playone3,playtwo3;/*两个人的得分转换成字符串输出*/void playtoplay(void);/*人人对战函数*/void DrawQp(void);/*画棋盘函数*/void SetPlayColor(int x);/*设置棋子第一次的颜色*/void MoveColor(int x,int y);/*恢复原来棋盘状态*/int QpChange(int x,int y,int z);/*判断棋盘的变化*/void DoScore(void);/*处理分数*/void PrintScore(int n);/*输出成绩*/void playWin(void);/*输出胜利者信息*/*主函数*/void main(void) int gd=DETECT,gr; initgraph(&gd,&gr,c:tc); /*初始化图形系统*/ DrawQp();/*画棋盘*/ playtoplay();/*人人对战*/ getch(); closegraph();/*关闭图形系统*/void DrawQp()/*画棋盘*/ int i,j; score1=score2=0;/*棋手一开始得分都为0*/ setbkcolor(BLUE); for(i=100;i=64-score1-score2) /*如果尝试超过空格数则停步*/ MoveColor(x,y); fillellipse(x,y,15,15); break; else continue;/*如果按键无效*/ DoScore();/*分数的改变*/ break;/*棋盘变化了，则轮对方走棋*/ else/*已经有棋子就继续按键*/ continue; else /*四个方向按键的判断*/ if(key=LEFT&x120)/*左方向键*/ MoveColor(x,y); fillellipse(x,y,15,15); SetPlayColor(t); x-=40; fillellipse(x,y,15,15); else if(key=RIGHT&x80)/*右方向键*/ MoveColor(x,y); fillellipse(x,y,15,15); SetPlayColor(t); x+=40; fillellipse(x,y,15,15); else if(key=UP&y120)/*上方向键*/ MoveColor(x,y); fillellipse(x,y,15,15); SetPlayColor(t); y-=40; fillellipse(x,y,15,15); else if(key=DOWN&y400)/*下方向键*/ MoveColor(x,y); fillellipse(x,y,15,15); SetPlayColor(t); y+=40; fillellipse(x,y,15,15); if(key=ESC)/*结束游戏*/ break; if(score1+score2)=64|score1=0|score2=0)/*格子已经占满或一方棋子为0判断胜负*/ playWin();/*输出最后结果*/ break; t=t%2+1; /*一方走后，改变棋子颜色即轮对方走*/ cc=0; /*计数值恢复为0*/ /*endwhile*/void SetPlayColor(int t)/*设置棋子颜色*/ if(t%2=1) setfillstyle(SOLID_FILL,15);/*白色*/ else setfillstyle(SOLID_FILL,8);/*灰色*/void MoveColor(int x,int y)/*走了一步后恢复原来格子的状态*/ if(y100)/*如果是从起点出发就恢复蓝色*/ setfillstyle(SOLID_FILL,BLUE); else/*其他情况如果是1就恢复白色棋子,2恢复黑色棋子,或恢复蓝色棋盘*/ switch(a(x-120)/40(y-120)/40) case 1: setfillstyle(SOLID_FILL,15);break; /*白色*/ case 2: setfillstyle(SOLID_FILL,8);break; /*黑色*/ default: setfillstyle(SOLID_FILL,BLUE); /*蓝色*/ int QpChange(int x,int y,int t)/*判断棋盘的变化*/ int i,j,k,kk,ii,jj,yes; yes=0; i=(x-120)/40; /*计算数组元素的行下标*/ j=(y-120)/40; /*计算数组元素的列下标*/ SetPlayColor(t);/*设置棋子变化的颜色*/ /*开始往8个方向判断变化*/ if(j6)/*往右边*/ for(k=j+1;k8;k+) if(aik=aij|aik=0)/*遇到自己的棋子或空格结束*/ break; if(aik!=0&k8) for(kk=j+1;kkk&k1)/*判断左边*/ for(k=j-1;k=0;k-) if(aik=aij|!aik) break; if(aik!=0&k=0) for(kk=j-1;kkk&k=0;kk-) aikk=aij; fillellipse(120+i*40,120+kk*40,15,15); if(kk!=j-1) yes=1; if(i6)/*判断下边*/ for(k=i+1;k8;k+) if(akj=aij|!akj) break; if(akj!=0&k8) for(kk=i+1;kkk&k1)/*判断上边*/ for(k=i-1;k=0;k-) if(akj=aij|!akj) break; if(akj!=0&k=0) for(kk=i-1;kkk&k=0;kk-) akkj=aij; fillellipse(120+kk*40,120+j*40,15,15); if(kk!=i-1) yes=1; if(i1&j=0&kk=0&kkk&k=0;ii-,jj+) aiijj=aij; fillellipse(120+ii*40,120+jj*40,15,15); if(ii!=i-1) yes=1; if(i1)/*左下*/ for(k=i+1,kk=j-1;k=0;k+,kk-) if(akkk=aij|!akkk) break; if(akkk!=0&k=0) for(ii=i+1,jj=j-1;iik&k1&j1)/*左上*/ for(k=i-1,kk=j-1;k=0&kk=0;k-,kk-) if(akkk=aij|!akkk) break; if(akkk!=0&k=0&kk=0) for(ii=i-1,jj=j-1;iik&k=0;ii-,jj-) aiijj=aij; fillellipse(120+ii*40,120+jj*40,15,15); if(ii!=i-1) yes=1; if(i6&j6)/* 右下*/ for(k=i+1,kk=j+1;kk8&kk8;k+,kk+) if(akkk=aij|!akkk) break; if(akkk!=0&kk8&k8) for(ii=i+1,jj=j+1;iik&k8;ii+,jj+) aiijj=aij; fillellipse(120+ii*40,120+jj*40,15,15); if(ii!=i+1) yes=1; return yes;/*返回是否改变过棋子颜色的标记*/void DoScore()/*处理分数*/ int i,j; score1=sc