linux五子棋代码c语言(vc++五子棋代码)
求一个用C语言编写五子棋游戏的全部代码.
这个程序还需要两个文件,告诉我你邮箱,我发给你
源程序前半部分
/*加载头文件*/
#includestdio.h
#includestdlib.h
#includegraphics.h
#includebios.h
#includeconio.h
/*编译预处理,定义按键码*/
#define LEFT 0x4b00
#define RIGHT 0x4d00
#define DOWN 0x5000
#define UP 0x4800
/*若想在游戏中途退出, 可按 Esc 键*/
#define ESC 0x011b
/*SPACE键表示落子*/
#define SPACE 0x3920
/*设置偏移量*/
#define OFFSET 20
#define OFFSET_x 4
#define OFFSET_y 3
/*定义数组大小*/
#define N 19
/*定义全局变量*/
int status[N][N]; /*定义的数组,保存状态*/
int step_x,step_y;/*行走的坐标*/
int key ; /*获取按下的键盘的键*/
int flag; /*玩家标志*/
/*自定义函数原型*/
void DrawBoard();
void DrawCircle(int x,int y,int color);
void Alternation();
void JudgePlayer(int x,int y);
void Done();
int ResultCheck(int x,int y);
void WelcomeInfo();
void ShowMessage();
/*定义函数*/
/*显示欢迎信息函数*/
void WelcomeInfo()
{
char ch ;
/*移动光标到指定位置*/
gotoxy(12,4);
/*显示欢迎信息*/
printf("Welcome you to gobang word!");
gotoxy(12,6);
printf("1.You can use the up,down,left and right key to move the chessman,");
gotoxy(12,8);
printf(" and you can press Space key to enter after you move it !");
gotoxy(12,10);
printf("2.You can use Esc key to exit the game too !");
gotoxy(12,12);
在linux 环境下用c 编写五子棋程序中的鼠标的绘制和轨迹代码怎么编写??
首先要学习使用 gcc,因为Linux环境下没有VC++,也没有TC,
你还要掌握一些 Linux C编程的一些图形函数,
像 画直线,一些的函数,基本都没什么差别,都和
windows 的差不多.
其实鼠标没有控制什么,只是计算机鼠标的位置,然后画图而已.
c语言基础,求五子棋详细代码
/*一个月就想做五子棋,有点难啊,希望你能看懂,这是代码*/
#include?stdlib.h
#include?stdio.h
#include?conio.h
#include?string.h
#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;//回合数
char*?Copy(char*?strDest,const?char*?strSrc)//修改过的字符串复制函数,会忽略末端的\0
{
????char*?strDestCopy?=?strDest;
????while?(*strSrc!='\0')
????{
????????*strDest++=*strSrc++;
????}
????return?strDestCopy;
}
void?Initialize()//初始化一个对局函数
{
????int?i,j;//循环变量
????showText="";//重置显示信息
????count=0;//回合数归零
????for(i=0;iMAXIMUS;i++)//重置对局数据
????{
????????for(j=0;jMAXIMUS;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==0j==0)//以下为边缘棋盘样式
????????return?"┏";
????else?if(i==MAXIMUS-1j==0)
????????return?"┓";
????else?if(i==MAXIMUS-1j==MAXIMUS-1)
????????return?"┛";
????else?if(i==0j==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(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;iMAXIMUS*2+1;i++)//循环写入每一行
????{
????????printf("%s",buff[i]);
????????if(iMAXIMUS*2)//写入完每一行需要换行
????????????printf("\n");
????}
}
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;iMAXIMUS;i++)//按横坐标循环正常的次数
????????{
????????????write(getStyle(i,j));//写入交点字符
????????????if(i!=MAXIMUS-1)//如果不在最右侧则补充一个横线承接左右
????????????{
????????????????if(j==0||j==MAXIMUS-1)
????????????????{
????????????????????write("━");//上下边缘的横线更粗
????????????????}
????????????????else
????????????????{
????????????????????write("—");//中间的横线
????????????????}
????????????}
????????}
????????ln();//写完一行后提行
????}
????Display();//将缓冲器内容输出到屏幕
}
int?Put()//在当前光标位置走子,如果非空,则返回0表示失败
{
????if(p[Cx][Cy]==0)
????{
????????p[Cx][Cy]=Now;//改变该位置数据
????????return?1;//返回1表示成功
????}
????else
????{
????????return?0;
????}
}
int?Check()//胜负检查,即判断当前走子位置有没有造成五连珠的情况
{
????int?w=1,x=1,y=1,z=1,i;//累计横竖正斜反邪四个方向的连续相同棋子数目
????for(i=1;i5;i++)//向下检查
????????if(Cy+iMAXIMUSp[Cx][Cy+i]==Now)
????????????w++;
????????else?
????????????break;
????for(i=1;i5;i++)//向上检查
????????if(Cy-i0p[Cx][Cy-i]==Now)
????????????w++;
????????else?
????????????break;
????if(w=5)//若果达到5个则判断当前走子玩家为赢家
????????return?Now;
????for(i=1;i5;i++)//向右检查
????????if(Cx+iMAXIMUSp[Cx+i][Cy]==Now)
????????????x++;
????????else?
????????????break;
????for(i=1;i5;i++)//向左检查
????????if(Cx-i0p[Cx-i][Cy]==Now)
????????????x++;
????????else?
????????????break;
????if(x=5)//若果达到5个则判断当前走子玩家为赢家
????????return?Now;
????for(i=1;i5;i++)//向右下检查
????????if(Cx+iMAXIMUSCy+iMAXIMUSp[Cx+i][Cy+i]==Now)
????????????y++;
????????else?
????????????break;
????for(i=1;i5;i++)//向左上检查
????????if(Cx-i0Cy-i0p[Cx-i][Cy-i]==Now)
????????????y++;
????????else?
????????????break;
????if(y=5)//若果达到5个则判断当前走子玩家为赢家
????????return?Now;
????for(i=1;i5;i++)//向右上检查
????????if(Cx+iMAXIMUSCy-i0p[Cx+i][Cy-i]==Now)
????????????z++;
????????else?
????????????break;
????for(i=1;i5;i++)//向左下检查
????????if(Cx-i0Cy+iMAXIMUSp[Cx-i][Cy+i]==Now)
????????????z++;
????????else?
????????????break;
????if(z=5)//若果达到5个则判断当前走子玩家为赢家
????????return?Now;
????return?0;//若没有检查到五连珠,则返回0表示还没有玩家达成胜利
}
int?RunGame()//进行整个对局,返回赢家信息(虽然有用上)
{
????int?input;//输入变量
????int?victor;//赢家信息
????Initialize();//初始化对局
????while(1)//开始无限回合的死循环,直到出现胜利跳出
????{
????????Print();//打印棋盘
????????input=getch();//等待键盘按下一个字符
????????if(input==27)//如果是ESC则退出程序
????????{
????????????exit(0);
????????}
????????else?if(input==0x20)//如果是空格则开始走子
????????{
????????????if(Put())//如果走子成功则判断胜负
????????????{
????????????????victor=Check();
????????????????Now=3-Now;//轮换当前走子玩家
????????????????count++;
????????????????if(victor==1)//如果黑方达到胜利,显示提示文字并等待一次按键,返回胜利信息
????????????????{
????????????????????showText="黑方获得了胜利!";
????????????????????Print();
????????????????????if(getch()==0xE0)
????????????????????{
????????????????????????getch();
????????????????????}
????????????????????return?Now;
????????????????}
????????????????else?if(victor==2)//如果白方达到胜利,显示提示文字并等待一次按键,返回胜利信息
????????????????{
????????????????????showText="白方获得了胜利!";
????????????????????Display();
????????????????????if(getch()==0xE0)
????????????????????{
????????????????????getch();
????????????????????}
????????????????????return?Now;
????????????????}
????????????????else?if(count==MAXIMUS*MAXIMUS)//如果回合数达到了棋盘总量,即棋盘充满,即为平局
????????????????{
????????????????????showText="平局!";
????????????????????Display();
????????????????????if(getch()==0xE0)
????????????????????{
????????????????????????getch();
????????????????????}
????????????????????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(Cx0)//如果光标位置越界则移动到对侧
????????????????Cx=MAXIMUS-1;
????????????if(Cy0)
????????????????Cy=MAXIMUS-1;
????????????if(CxMAXIMUS-1)
????????????????Cx=0;
????????????if(CyMAXIMUS-1)
????????????????Cy=0;
????????}
????}
}
int?main()//主函数
{
????system("title?简易五子棋?——Etsnarl制作");//设置标题
????system("mode?con?cols=63?lines=32");//设置窗口大小
????system("color?E0");//设置颜色
????while(1)//循环执行游戏
????{
????????RunGame();
????}
????return?0;
}
用C语言在linux下编写一个五子棋程序!
五子棋的核心算法
五子棋是一种受大众广泛喜爱的游戏,其规则简单,变化多端,非常富有趣味性和消遣性。这里设计和实现了一个人机对下的五子棋程序,采用了博弈树的方法,应用了剪枝和最大最小树原理进行搜索发现最好的下子位置。介绍五子棋程序的数据结构、评分规则、胜负判断方法和搜索算法过程。
一、相关的数据结构
关于盘面情况的表示,以链表形式表示当前盘面的情况,目的是可以允许用户进行悔棋、回退等操作。
CList StepList;
其中Step结构的表示为:
struct Step
{
int m; //m,n表示两个坐标值
int n;
char side; //side表示下子方
};
以数组形式保存当前盘面的情况,
目的是为了在显示当前盘面情况时使用:
char FiveArea[FIVE_MAX_LINE][FIVE_MAX_LINE];
其中FIVE_MAX_LINE表示盘面最大的行数。
同时由于需要在递归搜索的过程中考虑时间和空间有效性,只找出就当前情况来说相对比较好的几个盘面,而不是对所有的可下子的位置都进行搜索,这里用变量CountList来表示当前搜索中可以选择的所有新的盘面情况对象的集合:
CList CountList;
其中类CBoardSituiton为:
class CBoardSituation
{
CList StepList; //每一步的列表
char FiveArea[FIVE_MAX_LINE][FIVE_MAX_LINE];
struct Step machineStep; //机器所下的那一步
double value; //该种盘面状态所得到的分数
}
二、评分规则
对于下子的重要性评分,需要从六个位置来考虑当前棋局的情况,分别为:-,|,/,\,//,\\
实际上需要考虑在这六个位置上某一方所形成的子的布局的情况,对于在还没有子的地方落子以后的当前局面的评分,主要是为了说明在这个地方下子的重要性程度,设定了一个简单的规则来表示当前棋面对机器方的分数。
基本的规则如下:
判断是否能成5, 如果是机器方的话给予100000分,如果是人方的话给予-100000 分;
判断是否能成活4或者是双死4或者是死4活3,如果是机器方的话给予10000分,如果是人方的话给予-10000分;
判断是否已成双活3,如果是机器方的话给予5000分,如果是人方的话给予-5000 分;
判断是否成死3活3,如果是机器方的话给予1000分,如果是人方的话给予-1000 分;
判断是否能成死4,如果是机器方的话给予500分,如果是人方的话给予-500分;
判断是否能成单活3,如果是机器方的话给予200分,如果是人方的话给予-200分;
判断是否已成双活2,如果是机器方的话给予100分,如果是人方的话给予-100分;
判断是否能成死3,如果是机器方的话给予50分,如果是人方的话给予-50分;
判断是否能成双活2,如果是机器方的话给予10分,如果是人方的话给予-10分;
判断是否能成活2,如果是机器方的话给予5分,如果是人方的话给予-5分;
判断是否能成死2,如果是机器方的话给予3分,如果是人方的话给予-3分。
实际上对当前的局面按照上面的规则的顺序进行比较,如果满足某一条规则的话,就给该局面打分并保存,然后退出规则的匹配。注意这里的规则是根据一般的下棋规律的一个总结,在实际运行的时候,用户可以添加规则和对评分机制加以修正。
三、胜负判断
实际上,是根据当前最后一个落子的情况来判断胜负的。实际上需要从四个位置判断,以该子为出发点的水平,竖直和两条分别为 45度角和135度角的线,目的是看在这四个方向是否最后落子的一方构成连续五个的棋子,如果是的话,就表示该盘棋局已经分出胜负。具体见下面的图示:
四、搜索算法实现描述
注意下面的核心的算法中的变量currentBoardSituation,表示当前机器最新的盘面情况, CountList表示第一层子节点可以选择的较好的盘面的集合。核心的算法如下:
void MainDealFunction()
{
value=-MAXINT; //对初始根节点的value赋值
CalSeveralGoodPlace(currentBoardSituation,CountList);
//该函数是根据当前的盘面情况来比较得到比较好的可以考虑的几个盘面的情况,可以根据实际的得分情况选取分数比较高的几个盘面,也就是说在第一层节点选择的时候采用贪婪算法,直接找出相对分数比较高的几个形成第一层节点,目的是为了提高搜索速度和防止堆栈溢出。
pos=CountList.GetHeadPosition();
CBoardSituation* pBoard;
for(i=0;ivalue=Search(pBoard,min,value,0);
Value=Select(value,pBoard-value,max);
//取value和pBoard-value中大的赋给根节点
}
for(i=0;ivalue)
//找出那一个得到最高分的盘面
{
currentBoardSituation=pBoard;
PlayerMode=min; //当前下子方改为人
Break;
}
}
其中对于Search函数的表示如下:实际上核心的算法是一个剪枝过程,其中在这个搜索过程中相关的四个参数为:(1)当前棋局情况;(2)当前的下子方,可以是机器(max)或者是人(min);(3)父节点的值oldValue;(4)当前的搜索深度depth。
double Search(CBoardSituation&
board,int mode,double oldvalue,int depth)
{
CList m_DeepList;
if(deptholdvalue))== TRUE)
{
if(mode==max)
value=select(value,search(successor
Board,min,value,depth+1),max);
else
value=select(value,search(successor
Board,max,value,depth+1),min);
}
return value;
}
else
{
if ( goal(board)0)
//这里goal(board)0表示已经可以分出胜负
return goal(board);
else
return evlation(board);
}
}
注意这里的goal(board)函数是用来判断当前盘面是否可以分出胜负,而evlation(board)是对当前的盘面从机器的角度进行打分。
下面是Select函数的介绍,这个函数的主要目的是根据 PlayerMode情况,即是机器还是用户来返回节点的应有的值。
double Select(double a,double b,int mode)
{
if(ab && mode==max)|| (a b && mode==min)
return a;
else
return b;
}
五、小结
在Windows操作系统下,用VC++实现了这个人机对战的五子棋程序。和国内许多只是采用规则或者只是采用简单递归而没有剪枝的那些程序相比,在智力上和时间有效性上都要好于这些程序。同时所讨论的方法和设计过程为用户设计其他的游戏(如象棋和围棋等)提供了一个参考。
参考资料:
c语言的五子棋代码(博弈算法)
#include?stdio.h
#include?bios.h
#include?ctype.h
#include?conio.h
#include?dos.h
#define?CROSSRU?????0xbf???/*右上角点*/
#define?CROSSLU?????0xda???/*左上角点*/
#define?CROSSLD?????0xc0???/*左下角点*/
#define?CROSSRD?????0xd9???/*右下角点*/
#define?CROSSL???????0xc3???/*左边*/
#define?CROSSR???????0xb4???/*右边*/
#define?CROSSU???????0xc2???/*上边*/
#define?CROSSD???????0xc1???/*下边*/
#define?CROSS???????0xc5???/*十字交叉点*/
/*定义棋盘左上角点在屏幕上的位置*/
#define?MAPXOFT?????5
#define?MAPYOFT?????2
/*定义1号玩家的操作键键码*/
#define?PLAY1UP?????0x1157/*上移--'W'*/
#define?PLAY1DOWN???0x1f53/*下移--'S'*/
#define?PLAY1LEFT???0x1e41/*左移--'A'*/
#define?PLAY1RIGHT???0x2044/*右移--'D'*/
#define?PLAY1DO?????0x3920/*落子--空格键*/
/*定义2号玩家的操作键键码*/
#define?PLAY2UP?????0x4800/*上移--方向键up*/
#define?PLAY2DOWN???0x5000/*下移--方向键down*/
#define?PLAY2LEFT???0x4b00/*左移--方向键left*/
#define?PLAY2RIGHT???0x4d00/*右移--方向键right*/
#define?PLAY2DO?????0x1c0d/*落子--回车键Enter*/
/*若想在游戏中途退出,?可按?Esc?键*/
#define?ESCAPE???????0x011b
/*定义棋盘上交叉点的状态,?即该点有无棋子?*/
/*若有棋子,?还应能指出是哪个玩家的棋子???*/
#define?CHESSNULL???0???/*没有棋子*/
#define?CHESS1???????'O'/*一号玩家的棋子*/
#define?CHESS2???????'X'/*二号玩家的棋子*/
/*定义按键类别*/
#define?KEYEX99v?????????0/*退出键*/
#define?KEYFALLCHESS???1/*落子键*/
#define?KEYMOVECURSOR???2/*光标移动键*/
#define?KEYINVALID?????3/*无效键*/
/*定义符号常量:?真,?假?---?真为1,?假为0?*/
#define?TRUE?????????1
#define?FALSE???????0
/**********************************************************/
/*?定义数据结构???????????????????????????????????????????*/
/*棋盘交叉点坐标的数据结构*/
struct?point
{
int?x,y;
};
或者下面这个:
#include?graphics.h
#include?stdlib.h
#include?stdio.h
#include?conio.h
#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
int?a[N+1][N+1];
int?zx,zy;
int?write=1,biaoji=0;
struct?zn{
long?sum;
int?y;
int?x;
}w[N+1][N+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(gdriver,gmode,"");
zx=(N+1)/2;
zy=(N+1)/2;
for(i=1;i=N;i++)
for(j=1;j=N;j++)
a[i][j]=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:
;
}
int?zhineng(int?a[N+1][N+1])
{
int?i,j;
int?k;
max.sum=-1;
for(i=0;i=N;i++)
for(j=0;j+N;j++)
{
w[i][j].sum=0;
w[i][j].x=i;
w[i][j].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.sumw[i][j].sum)
{
max.sum=w[i][j].sum;
max.y=i;
max.x=j;
}
else?if(max.sum==w[i][j].sum)
{
if(((max.y-zy)*(max.y-zy)+(max.x-zx)*(max.x-zx))((i-zy)*(i-zy)+(j-zx)*(j-zx)))
max.sum=w[i][j].sum;
max.y=i;
max.x=j;
}
}
if(a[max.y][max.x]==0)
{
a[max.y][max.x]=-1;
zy=max.y;
zx=max.x;
}
}
int?zh5(int?y,int?x,int?a[N+1][N+1])
{
int?i,j;
int?b[6][6];
long?c[13];
long?d[6][6];
long?temp;
for(i=y;i=y+4;i++)
for(j=x;j=x+4;j++)
b[i+1-y][j+1-x]=a[i][j];
c[1]=b[1][1]+b[1][2]+b[1][3]+b[1][4]+b[1][5];
c[2]=b[2][1]+b[2][2]+b[2][3]+b[2][4]+b[2][5];
c[3]=b[3][1]+b[3][2]+b[3][3]+b[3][4]+b[3][5];
c[4]=b[4][1]+b[4][2]+b[4][3]+b[4][4]+b[4][5];
c[5]=b[5][1]+b[5][2]+b[5][3]+b[5][4]+b[5][5];
c[6]=b[1][1]+b[2][1]+b[3][1]+b[4][1]+b[5][1];
c[7]=b[1][2]+b[2][2]+b[3][2]+b[4][2]+b[5][2];
c[8]=b[1][3]+b[2][3]+b[3][3]+b[4][3]+b[5][3];
c[9]=b[1][4]+b[2][4]+b[3][4]+b[4][4]+b[5][4];
c[10]=b[1][5]+b[2][5]+b[3][5]+b[4][5]+b[5][5];
c[11]=b[1][1]+b[2][2]+b[3][3]+b[4][4]+b[5][5];
c[12]=b[1][5]+b[2][4]+b[3][3]+b[4][2]+b[5][1];
for(i=1;i=12;i++)
{
switch(c[i])
{
case?5:biaoji=1;return(STOP);
case?-5:biaoji=-1;return(STOP);
case?-4:c[i]=100000;break;
case?4:c[i]=100000;break;
case?-3:c[i]=150;break;
case?3:c[i]=150;break;
case?-2:c[i]=120;break;
case?2:c[i]=100;break;
case?-1:c[i]=1;break;
case?1:c[i]=1;break;
default:?c[i]=0;
}
}
for(i=1;i=12;i++)
{
if(c[i]==150)
c[i]+=zzh5(b,i);
}
for(i=1;i=5;i++)
for(j=1;j=5;j++)
d[i][j]=0;
for(i=1;i=5;i++)
for(j=1;j=5;j++)
{
if(i==j)?d[i][j]+=c[11];
if((i+j)==6)?d[i][j]+=c[12];
d[i][j]+=c[i]+c[j+5];
}
for(i=1;i=5;i++)
for(j=1;j=5;j++)
{
if(b[i][j]!=0)
d[i][j]=-2;
}
max1.sum=-1;
max1.y=0;
max1.x=0;
for(i=1;i=5;i++)
for(j=1;j=5;j++)
{
if(max1.sumd[i][j])
{
max1.sum=d[i][j];
max1.y=i;
max1.x=j;
w[i+y-1][j+x-1].sum+=max1.sum;
}
else?if(max1.sum==d[i][j])
{
if(((i+y-1-zy)*(i+y-1-zy)+(j+x-1-zx)*(j+x-1-zx))((max1.y+y-1-zy)*(max1.y+y-1-zy)+(max1.x+x-1-zx)*(max1.x+x-1-zx)))
{
max1.sum=d[i][j];
max1.y=i;
max1.x=j;
}
}
}
}
long?zzh5(int?b[6][6],int?n)
{
int?i,j,k,l,m;
switch(n)
{
case?1:i=b[1][1];j=b[1][2];k=b[1][3];l=b[1][4];m=b[1][5];break;
case?2:i=b[2][1];j=b[2][2];k=b[2][3];l=b[2][4];m=b[2][5];break;
case?3:i=b[3][1];j=b[3][2];k=b[3][3];l=b[3][4];m=b[3][5];break;
case?4:i=b[4][1];j=b[4][2];k=b[4][3];l=b[4][4];m=b[4][5];break;
case?5:i=b[5][1];j=b[5][2];k=b[5][3];l=b[5][4];m=b[5][5];break;
case?6:i=b[1][1];j=b[2][1];k=b[3][1];l=b[4][1];m=b[5][1];break;
case?7:i=b[1][2];j=b[2][2];k=b[3][2];l=b[4][2];m=b[5][2];break;
case?8:i=b[1][3];j=b[2][3];k=b[3][3];l=b[4][3];m=b[5][3];break;
case?9:i=b[1][4];j=b[2][4];k=b[3][4];l=b[4][4];m=b[5][4];break;
case?10:i=b[1][5];j=b[2][5];k=b[3][5];l=b[4][5];m=b[5][5];break;
case?11:i=b[1][1];j=b[2][2];k=b[3][3];l=b[4][4];m=b[5][5];break;
case?12:i=b[1][5];j=b[2][4];k=b[3][3];l=b[4][2];m=b[5][1];break;
}
if((i==0j==1k==1l==1m==0))
return?(900);
if((i==0j==-1k==-1l==-1m==0))
return(1000);
if((i==0j==0k==1l==1m==1)||(i==1j==1k==1l==0m==0))
return(20);
if((i==0j==0k==-1l==-1m==-1)||(i==-1j==-1k==-1l==0m==0))
return(20);
if((i==-1j==1k==1l==1m==1)||(i==1j==-1k==1l==1m==1)||(i==1j==1k==-1l==1m==1)||(i==1j==1k==1l==-1m==1)||(i==1j==1k==1l==1m==-1))
return(-60);
if((i==1j==-1k==-1l==-1m==-1)||(i==-1j==1k==-1l==-1m==-1)||(i==-1j==1k==-1l==-1m==-1)||(i==-1j==-1k==-1l==1m==-1)||(i==-1j==-1k==-1l==-1m==1))
return(-60);
}
int?wtu(int?a[N+1][N+1],int?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=key0x00ff;
hi=(key0xff00)8;
return((lo==0)???hi+256:lo);
}
int?key()
{
int?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*y,r);
}
else
{
if(a[zy][zx]==1)
{
setcolor(8);
for(r=1;r=5;r++)
circle(75+25*x,25+25*y,r);
}
else?if(a[zy][zx]==-1)
{
setcolor(WHITE);
for(r=1;r=5;r++)
circle(75+25*x,25+25*y,r);
}
else
{
setcolor(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,25+25*zy+5);
}
}
}
int?tu(int?a[N+1][N+1],int?write)
{
int?k;
re:
k=key();
if(k==OK)
{
if(a[zy][zx]==0)
{
a[zy][zx]=write;
}
else
goto?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;
zuobiao(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)
{
if(i==1)
setcolor(8);
else?if(i==-1)
setcolor(WHITE);
for(i=1;i=r;i++)
{
circle(x,y,i);
}
}
}
void?map(int?a[N+1][N+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(a[i][j],75+25*j,25+25*i,10);
}