#include <stdlib.h> #include <stdio.h> #include <conio.h> #include <string.h> #include <malloc.h> struct rcd;//声明节点结构 typedef struct rcd* Record;//节点指针别名 typedef struct rcd record;//节点别名 #define MAXIMUS 15 //定义棋盘大小 int p[MAXIMUS][MAXIMUS];//存储对局信息 char buff[MAXIMUS*2+1][MAXIMUS*4+3];//输出缓冲器 int Cx,Cy;//当前光标位置 int Now;//当前走子的玩家，1代表黑，2代表白 int wl,wp;//当前写入缓冲器的列数和行数位置 char* showText;//在棋盘中央显示的文字信息 int count;//回合数 int Putable;//指示当前是否可以走棋 int Exiting;//1为当场上无子并按ESC时询问是否退出程序的状态，2为非此状态 int ExiRep;//1为当回放到最后一回合并按向后时询问是否退出回放的状态，2为非此状态 Record RecBeg,RecNow;//记录的开始节点和当前节点 struct rcd//记录节点结构,双链表形式 { int X;//此记录走棋的X坐标 int Y;//此记录走棋的Y坐标 Record Next;//前一个记录 Record Back;//后一个记录 }; Record newRecord()//记录节点构造函数 { Record r=(Record)malloc(sizeof(record));//申请一个节点对象 r->Next=NULL;//给予前后节点初值NULL r->Back=NULL; return r; } void Exit()//检查退出程序 { int input; if(Exiting)//如果是第二次按下ESC { exit(0); } else//如果是第一次按下ESC则询问是否退出程序 { showText="是否退出？再次按下ESC退出，其他键返回"; Exiting=1;//指示已经按下过ESC } } void ExitRep()//检查退出回放 { int input; if(ExiRep)//如果是第二次后移 { ExiRep=3; } else//如果是第一次后移则询问是否退出回放 { showText="是否退出？再次后移退出回放，其他键返回"; ExiRep=1;//指示已经按下过后移 } } void AddRecord()//添加记录 { RecNow->X=Cx;//记录坐标 RecNow->Y=Cy; RecNow->Next=newRecord();//创建下一个记录节点 RecNow->Next->Back=RecNow;//完成双链表 RecNow=RecNow->Next;//当前记录推至下一个记录节点 } int DelRecord()//删除当前记录节点，1为删除成功，0为删除失败 { Record b;//上一个节点 if(RecNow->Back!=NULL)//越界检查 { b=RecNow->Back;//缓存上一个节点 free(RecNow);//释放当前节点 RecNow=b;//当前记录回至上一个记录节点 return 1; } else { return 0;//没有节点可删除时 } } void CleanRecord()//清理所有记录 { Record n;//下一个节点 while(RecBeg->Next!=NULL)//删除所有记录，直到越界前为止 { n=RecBeg->Next;//记下下一个节点 free(RecBeg);//释放当前节点 RecBeg=n;//当前记录推至下一个记录节点 } } char* Copy(char* strDest,const char* strSrc)//修改过的字符串复制函数，会忽略末端的 { char* strDestCopy = strDest; while (*strSrc!=' ') { *strDest++=*strSrc++; } return strDestCopy; } void Initialize()//初始化一个对局函数 { int i,j;//循环变量 system("title 对局中(按方向键控制光标，空格走子)，Esc撤销"); showText="";//重置显示信息 count=0;//回合数归零 RecNow=RecBeg=newRecord(); Exiting=0; for(i=0;i<MAXIMUS;i++)//重置对局数据 { for(j=0;j<MAXIMUS;j++) { p[i][j]=0; } } Cx=Cy=MAXIMUS/2;//重置光标到中央 Now=1;//重置当前为黑方 } char* getStyle(int i,int j)//获得棋盘中指定坐标交点位置的字符，通过制表符拼成棋盘 { if(p[i][j]==1)//1为黑子 return "●"; else if(p[i][j]==2)//2为白子 return "○"; else if(i==0&&j==0)//以下为边缘棋盘样式 return "┏"; else if(i==MAXIMUS-1&&j==0) return "┓"; else if(i==MAXIMUS-1&&j==MAXIMUS-1) return "┛"; else if(i==0&&j==MAXIMUS-1) return "┗"; else if(i==0) return "┠"; else if(i==MAXIMUS-1) return "┨"; else if(j==0) return "┯"; else if(j==MAXIMUS-1) return "┷"; return "┼";//中间的空位 } char* getCurse(int i,int j){//获得指定坐标交点位置左上格的样式，通过制表符来模拟光标的显示 if(Putable)//可走棋时光标为粗线 { if(i==Cx){ if(j==Cy) return "┏"; else if (j==Cy+1) return "┗"; } else if(i==Cx+1) { if(j==Cy) return "┓"; else if (j==Cy+1) return "┛"; } } else//不可走棋时光标为虚线 { if(i==Cx){ if(j==Cy) return "┌"; else if (j==Cy+1) return "└"; } else if(i==Cx+1) { if(j==Cy) return "┐"; else if (j==Cy+1) return "┘"; } } return " ";//如果不在光标附近则为空 } void write(char* c)//向缓冲器写入字符串 { Copy(buff[wl]+wp,c); wp+=strlen(c); } void ln()//缓冲器写入位置提行 { wl+=1; wp=0; } void Display()//将缓冲器内容输出到屏幕 { int i,l=strlen(showText);//循环变量，中间文字信息的长度 int Offset=MAXIMUS*2+2-l/2;//算出中间文字信息居中显示所在的横坐标位置 if(Offset%2==1)//如果位置为奇数，则移动到偶数，避免混乱 { Offset--; } Copy(buff[MAXIMUS]+Offset,showText);//讲中间文字信息复制到缓冲器 if(l%2==1)//如果中间文字长度为半角奇数，则补上空格，避免混乱 { *(buff[MAXIMUS]+Offset+l)=0x20; } system("cls");//清理屏幕，准备写入 for(i=0;i<MAXIMUS*2+1;i++){//循环写入每一行 printf("%s",buff[i]); if(i<MAXIMUS*2)//写入完每一行需要换行 printf(" "); } } void Print()//将整个棋盘算出并储存到缓冲器，然后调用Display函数显示出来 { int i,j;//循环变量 wl=0; wp=0; for(j=0;j<=MAXIMUS;j++)//写入出交点左上角的字符，因为需要打印棋盘右下角，所以很以横纵各多一次循环 { for(i=0;i<=MAXIMUS;i++) { write(getCurse(i,j));//写入左上角字符 if(j==0||j==MAXIMUS)//如果是棋上下盘边缘则没有连接的竖线，用空格填充位置 { if(i!=MAXIMUS) write(" "); } else//如果在棋盘中间则用竖线承接上下 { if(i==0||i==MAXIMUS-1)//左右边缘的竖线更粗 write("┃"); else if(i!=MAXIMUS)//中间的竖线 write("│"); } } if(j==MAXIMUS)//如果是最后一次循环，则只需要处理边侧字符，交点要少一排 { break; } ln();//提行开始打印交点内容 write(" ");//用空位补齐位置 for(i=0;i<MAXIMUS;i++)//按横坐标循环正常的次数 { write(getStyle(i,j));//写入交点字符 if(i!=MAXIMUS-1)//如果不在最右侧则补充一个横线承接左右 { if(j==0||j==MAXIMUS-1) { write("━");//上下边缘的横线更粗 } else { write("─");//中间的横线 } } } ln();//写完一行后提行 } Display();//将缓冲器内容输出到屏幕 } int Put(){//在当前光标位置走子，如果非空，则返回0表示失败 if(Putable) { p[Cx][Cy]=Now;//改变该位置数据 AddRecord(); return 1;//返回1表示成功 } else { return 0; } } int Check()//胜负检查，即判断当前走子位置有没有造成五连珠的情况 { int w=1,x=1,y=1,z=1,i;//累计横竖正斜反邪四个方向的连续相同棋子数目 for(i=1;i<5;i++)if(Cy+i<MAXIMUS&&p[Cx][Cy+i]==Now)w++;else break;//向下检查 for(i=1;i<5;i++)if(Cy-i>0&&p[Cx][Cy-i]==Now)w++;else break;//向上检查 if(w>=5)return Now;//若果达到5个则判断当前走子玩家为赢家 for(i=1;i<5;i++)if(Cx+i<MAXIMUS&&p[Cx+i][Cy]==Now)x++;else break;//向右检查 for(i=1;i<5;i++)if(Cx-i>0&&p[Cx-i][Cy]==Now)x++;else break;//向左检查 if(x>=5)return Now;//若果达到5个则判断当前走子玩家为赢家 for(i=1;i<5;i++)if(Cx+i<MAXIMUS&&Cy+i<MAXIMUS&&p[Cx+i][Cy+i]==Now)y++;else break;//向右下检查 for(i=1;i<5;i++)if(Cx-i>0&&Cy-i>0&&p[Cx-i][Cy-i]==Now)y++;else break;//向左上检查 if(y>=5)return Now;//若果达到5个则判断当前走子玩家为赢家 for(i=1;i<5;i++)if(Cx+i<MAXIMUS&&Cy-i>0&&p[Cx+i][Cy-i]==Now)z++;else break;//向右上检查 for(i=1;i<5;i++)if(Cx-i>0&&Cy+i<MAXIMUS&&p[Cx-i][Cy+i]==Now)z++;else break;//向左下检查 if(z>=5)return Now;//若果达到5个则判断当前走子玩家为赢家 return 0;//若没有检查到五连珠，则返回0表示还没有玩家达成胜利 } void ReplayMode(){ int i,j;//循环变量 system("title 回放中(按左键后退，右键或空格前进)，Esc退出"); showText="";//重置显示信息 count=0;//回合数归零 Putable=0;//不可走棋状态 RecBeg->Back=newRecord(); RecBeg->Back->Next=RecBeg; RecBeg=RecBeg->Back; for(i=0;i<MAXIMUS;i++)//重置对局数据 { for(j=0;j<MAXIMUS;j++) { p[i][j]=0; } } Now=1;//重置当前为黑方 } void RepForward()//回放模式前进 { if(RecNow->Next->Next!=NULL)//越界检查 { RecNow=RecNow->Next;//当前节点推至下一个记录节点 p[RecNow->X][RecNow->Y]=Now;//按照记录还原一个回合 Cx=RecNow->X;//设置光标位置 Cy=RecNow->Y; Now=3-Now;//转换当前的黑白方 } else//若已达到最后则询问退出 { ExitRep(); } } void RepBackward()//回放模式后退 { if(RecNow->Back!=NULL)//越界检查 { p[RecNow->X][RecNow->Y]=0;//按照记录撤销一个回合 if(RecNow->Back->Back==NULL)//在整个棋盘没有棋子时隐藏光标 { Cx=-2; Cy=-2; } else if(RecNow->Back==NULL)//在只有一个棋子时移动光标到这个棋子的位置 { Cx=RecNow->X; Cy=RecNow->Y; } else//正常情况下移动光标到上一回合的位置 { Cx=RecNow->Back->X; Cy=RecNow->Back->Y; } RecNow=RecNow->Back;//当前节点后退至上一个记录节点 Now=3-Now;//转换当前的黑白方 } } void ShowReplay() { int input;//输入变量 ReplayMode();//初始化回放模式 RecNow=RecBeg;//当前观察从头开始 RepForward();//显示第一次走棋 while(1)//开始无限回合的死循环，直到Esc退出 { if(ExiRep==3) { ExiRep=0; break; } Print();//打印棋盘 input=getch();//等待键盘按下一个字符 if(input==27)//如果是ESC则退出回放 { return; } else if(input==0x20)//如果是空格则前进 { RepForward(); continue; } else if(input==0xE0)//如果按下的是方向键，会填充两次输入，第一次为0xE0表示按下的是控制键 { input=getch();//获得第二次输入信息 switch(input)//判断方向键方向并移动光标位置 { case 0x4B: RepBackward();//向左后退 break; case 0x4D: RepForward();//向右前进 continue; } } ExiRep=0;//未再次按后移则不准备退出 showText=""; } } void Regret()//悔棋撤销,如果棋盘上没有子即为退出 { if(DelRecord()){//尝试删除当前节点，如果有节点可以删除则 p[RecNow->X][RecNow->Y]=0;//撤除当前回合 if(RecNow->Back==NULL)//如果删除的是第一颗子则将光标移动到第一颗子原来的位置上 { Cx=RecNow->X; Cy=RecNow->Y; } else//否则将光标移动到上一颗子上 { Cx=RecNow->Back->X; Cy=RecNow->Back->Y; } Now=3-Now;//反转当前黑白方 } else { Exit();//如果没有棋子可以撤销，则询问退出 } } int RunGame()//进行整个对局，返回赢家信息(虽然有用上) { int input;//输入变量 int victor;//赢家信息 Initialize();//初始化对局 while(1){//开始无限回合的死循环，直到出现胜利跳出 Putable=p[Cx][Cy]==0; Print();//打印棋盘 input=getch();//等待键盘按下一个字符 if(input==27)//如果是ESC则悔棋或退出 { Regret(); Print(); continue; } else if(input==0x20)//如果是空格则开始走子 { if(Put())//如果走子成功则判断胜负 { victor=Check(); Now=3-Now;//轮换当前走子玩家 count++; if(victor==1)//如果黑方达到胜利，显示提示文字并等待一次按键，返回胜利信息 { showText="黑方胜利!按R查看回放,按其他键重新开局"; Print(); input=getch(); if(input==0xE0) { getch(); } else if(input=='R'||input=='r') { ShowReplay(); } return Now; } else if(victor==2)//如果白方达到胜利，显示提示文字并等待一次按键，返回胜利信息 { showText="白方胜利!按R查看回放,按其他键重新开局"; Print(); input=getch(); if(input==0xE0) { getch(); } else if(input=='R'||input=='r') { ShowReplay(); } return Now; }else if(count==MAXIMUS*MAXIMUS)//如果回合数达到了棋盘总量，即棋盘充满，即为平局 { showText="平局!按R查看回放,按其他键重新开局"; Print(); input=getch(); if(input==0xE0) { getch(); } else if(input=='R'||input=='r') { ShowReplay(); } CleanRecord(); return 0; } } } else if(input==0xE0)//如果按下的是方向键，会填充两次输入，第一次为0xE0表示按下的是控制键 { input=getch();//获得第二次输入信息 switch(input)//判断方向键方向并移动光标位置 { case 0x4B:// Cx--; break; case 0x48: Cy--; break; case 0x4D: Cx++; break; case 0x50: Cy++; break; } if(Cx<0)Cx=MAXIMUS-1;//如果光标位置越界则移动到对侧 if(Cy<0)Cy=MAXIMUS-1; if(Cx>MAXIMUS-1)Cx=0; if(Cy>MAXIMUS-1)Cy=0; } Exiting=0;//未再次按下ESC则不准备退出 showText=""; } } int main()//主函数 { system("mode con cols=63 lines=32");//设置窗口大小 system("color E0");//设置颜色 while(1){//循环执行游戏 RunGame(); } }