www.pudn.com > Chesswzq.rar > wzq.cpp
#include "wzq.hpp"
#include "dim.hpp"
#include "res/qp.hpp"
#include "res/wzq_select.hpp"
#include "res/qzb.hpp"
#include "res/qzh.hpp"
#include "res/dead.hpp"
wzq::wzq()
{ dcseted=false; }
wzq::~wzq(){}
/*___________________________________________________________________________________________*/
void wzq::Init(PaintDc* pdc)//设置DC
{
dc =pdc;
dcseted=true;
Model=0;//人先
AItype=2;//高级
backable=0;//不悔其
m_x=7;
m_y=7;
NewGame();
CONSX[0]=3;
CONSX[1]=11;
CONSX[2]=19;
CONSX[3]=27;
CONSX[4]=36;
CONSX[5]=44;
CONSX[6]=53;
CONSX[7]=61;
CONSX[8]=69;
CONSX[9]=77;
CONSX[10]=85;
CONSX[11]=93;
CONSX[12]=101;
CONSX[13]=108;
CONSX[14]=117;
CONSY[0]=4;
CONSY[1]=12;
CONSY[2]=20;
CONSY[3]=28;
CONSY[4]=36;
CONSY[5]=44;
CONSY[6]=52;
CONSY[7]=61;
CONSY[8]=69;
CONSY[9]=77;
CONSY[10]=86;
CONSY[11]=94;
CONSY[12]=102;
CONSY[13]=109;
CONSY[14]=117;
}
void wzq::MovetoLeft()
{
m_x--;
if (m_x<0) m_x=14;
}
void wzq::MovetoRight()
{
m_x++;
if (m_x>14) m_x=0;
}
void wzq::MovetoDown()
{
m_y++;
if (m_y>14) m_y=0;
}
void wzq::MovetoUp()
{
m_y--;
if (m_y<0) m_y=14;
}
void wzq::DrawPos()//画当前位置
{
dc->DrawBitmap(CONSX[m_x],CONSY[m_y] , wzq_select );//mask
}
void wzq::DrawQZ(int nx,int ny,bool style)//画棋子
{
if (dcseted==false)return;
if (nx>15||ny>15) return;
if (style )
{
dc->DrawBitmap(CONSX[nx],CONSY[ny] , qzh );//黑
}
else
{
dc->DrawBitmap( CONSX[nx],CONSY[ny] , qzb );//白旗
}
}
bool wzq::GetWinState()
{ return (m_winRec.winner!=0);}
/*___________________________________________________________________________________________*/
void wzq::NewGame()//新游戏
{
if (dcseted==false)return;
int i1=0;
int i2=0;
int i3=0;
int ix=0;
for(i1=0 ; i1<=14;i1++)
{
for(i2=0 ; i2<=14;i2++)
{
map[i1][i2]=0;
for(i3=0 ; i3<=3;i3++)
{
user[i1][i2][i3]=255;
pc[i1][i2][i3]=255;
}
}
}
for (ix=0;ix<225;ix++)//清空纪录
{
wzs[ix].used=false;
}
m_winRec.winner=0;
nowd2 =0;
ReDraw();
if (Model==1)
{
userBd(7,7);
}
}
/*___________________________________________________________________________________________*/
void wzq::ReDraw()//重画
{
int i1=0 ;
int i2=0 ;
int ii=1 ;
if (!dcseted) return;
dc->DrawBitmap(0, 0,qp);//画棋盘
for(i1=0 ; i1<15;i1++)//画棋局
{
for(i2=0 ; i2<15;i2++)
{
if (map[i1][i2]==1){DrawQZ(i1,i2,false);}//白
else{if (map[i1][i2]==2){DrawQZ(i1,i2,true);}} //黑
}
}
if (m_winRec.winner!=0)//画胜利旗帜
{
int x1=m_winRec.nx1 , y1=m_winRec.ny1;
int xj,yj;
if(m_winRec.nx2-m_winRec.nx1>0)//直线或斜向
{
xj=1;
}
else
{
if (m_winRec.nx2-m_winRec.nx1==0)
{
xj=0;
}
else
{
xj=-1;
}
}
if(m_winRec.ny2-m_winRec.ny1>0)
{
yj=1;
}
else
{
if (m_winRec.ny2-m_winRec.ny1==0)
{
yj=0;
}
else
{
yj=-1;
}
}
if (m_winRec.winner!=0)
{
for ( ii=1 ; ii<=5 ; ii++)
{
dc->DrawBitmap( CONSX[x1],CONSY[y1],dead);
x1+=xj;
y1+=yj;
}
}
}
DrawPos();
}
/*___________________________________________________________________________________________*/
bool wzq::userAd(int nx,int ny)//黑色下子
{
if (!dcseted) return false;
if (map[nx][ny]==0)
{
map[nx][ny]=1;
DrawQZ(nx,ny,false);
return true;
}
else
{
return false;
}
}
/*___________________________________________________________________________________________*/
bool wzq::userBd(int nx,int ny)//白色下子
{
if (!dcseted) return false;
if (map[nx][ny]==0)
{
map[nx][ny]=2;
DrawQZ(nx,ny,true);
return true;
}
else
{
return false;
}
}
/*__________________________________________________________________________________________*/
bool wzq::bewinner2(bool style,int nx,int ny)//胜败
{
int tx1=0,tx2=0,ty1=0,ty2=0;
int yx1=0,yx2=0,yy1=0,yy2=0;
int st=(int)style+1;
int x1;
for ( x1=-5 ; x1<= 5 ; x1++)
{
if (map[nx+x1][ny]==st)
{
tx1++;
if (tx1==1) yx1=x1;
if (tx1>=5)
{
return SetWinner(st,nx+yx1,nx+yx1+5,ny,ny);
}
}
else
{
tx1=0;
}
if (map[nx][ny+x1]==st)
{
ty1++;
if (ty1==1) yy1=x1;
if (ty1>=5)
{
return SetWinner(st,nx,nx,ny+yy1,ny+yy1+5);
}
}
else
{
ty1=0;
}
if (map[nx+x1][ny+x1]==st)
{
tx2++;
if (tx2==1) yx2=x1;
if (tx2>=5)
{
return SetWinner(st,nx+yx2,nx+yx2+5,ny+yx2,ny+yx2+5);
}
}
else
{
tx2=0;
}
if (map[nx+x1][ny-x1]==st)
{
ty2++;
if (ty2==1) yy2=x1;
if (ty2>=5)
{
return SetWinner(st,nx+yy2,nx+yy2+5,ny-yy2,ny-yy2-5);
}
}
else
{
ty2=0;
}
}
return false;
}
bool wzq::SetWinner(int st,int x1,int x2,int y1,int y2)
{
m_winRec.winner =st;
m_winRec.nx1= x1;
m_winRec.nx2 =x2;
m_winRec.ny1 =y1;
m_winRec.ny2 =y2;
return true;
}
/*__________________________________________________________________________________________*/
bool wzq::downzi(/*int nx,int ny*/)//外部调用此函数下子
{
int nx=m_x;
int ny=m_y;
bool turnback;
if (nx<0||nx>14||ny<0||nx>14) return false;
if (Model==2 )
{
/*if (nturn==1)
{
turnback=userAd(nx,ny);
bewinner2(false,nx,ny);
nturn =turnback?0:1;
setback(nx,ny,false);
}
else*/
{
turnback=userBd(nx,ny);
bewinner2(true,nx,ny);
//nturn =turnback?1:0;
setback(nx,ny,true);
}
}
else
{
if (Model==1)
{
if (userAd(nx,ny)==false)return false;
bewinner2(false,nx,ny);
CPoint aigo=wzq::AiGo(true);
setback(nx,ny,false);
userBd(aigo.x,aigo.y);
setback(aigo.x,aigo.y,true);
bewinner2(true,aigo.x,aigo.y);
}
else
{
if (Model==0)
{
if (userBd(nx,ny)==false) return false;
bewinner2(true,nx,ny);
CPoint aigo=AiGo(false);
setback(nx,ny,true);
userAd(aigo.x,aigo.y);
setback(aigo.x,aigo.y,false);
bewinner2(false,aigo.x,aigo.y);
}
}}
return turnback;
}
/*__________________________________________________________________________________________*/
bool wzq::bejs(int nx,int ny)
{
/*++此处添加禁手控制++*/
//因为我不熟悉五子棋的规则，所以没有设置禁手
return false;
}
/*__________________________________________________________________________________________*/
void wzq::fillin(bool color,bool player,bool type)
{
int ix,iy;
int im=0 ;
for (ix=0 ;ix<=14;ix++)
{
for (iy=0 ;iy<=14;iy++)
{
if (map[ix][iy]==0)
{
for ( im=0 ; im<=3 ; im++)
{
setqx(ix,iy,color,player,im,type);
}
}
}
}
}
/*__________________________________________________________________________________________*/
void wzq::setqx(int nx ,int ny,bool style,bool player,int st,bool type)
{
bool ok=true;
int ia,ib;
int ix,iy;
int i2,i2j;
int tem1,tem2;
int x;
int i3;
int m1,m3;
int i;
int wx=nx,wy=ny,tem3=0;
switch (st)
{
case 0:
i2=1,i2j=0;break;
case 1:
i2=0,i2j=1;break;
case 2:
i2=1,i2j=1;break;
case 3:
i2=1,i2j=-1;break;
}
unsigned char temp3[15]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
unsigned char temp4[15]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
begin:
if (map[wx][wy]!=0)return;
i3=0;
ix=i2;
iy=i2j;
ia=1,ib=1;
//right==========================================================================================//
x=map[wx-ix][wy-iy];
while(!(x!=(int)style+1||wx-ix<0||wy-iy<0))
{
ia++;
ix+=i2;
iy+=i2j;
x=map[wx-ix][wy-iy];
}
ix=i2,iy=i2j;
//left====================================================================================//
x=map[wx+ix][wy+iy];
while(!(x!=(int)style+1||wx+ix>14||wy+iy>14))
{
ix+=i2;
iy+=i2j;
ib++;
x=map[wx+ix][wy+iy];
}
//偏移=======================================================================================//
if (ib==1&&ia==1)
{
if (tem3==0)
{
wx+=i2,wy+=i2j;
tem3=1;
goto begin;
}
else
{
if (tem3==1)
{
wx-=i2*2,wy-=i2j*2;
tem3=2;
goto begin;
}
else
{
if (tem3==2)return;
}
}
}
ix=0,iy=0;
switch (st)
{
case 0:
{
m1=(ia!=1&&ib==1),m3=(ib!=1&&ia==1);
for(i=0; i<1+ia+ib;i++)
{
tem1=wx-ia+ix-m1;
if (tem1<0||tem1>14){ix+=1;continue;}
x=map[tem1][wy];
temp3[i3]=ntoc(x,type,style);
ix+=1;
i3++;
}
ix=0,i3=0;
for (i=0 ; i<1+ia+ib;i++)
{
tem1=wx+ib-ix+m3;
if (tem1<0||tem1>14){ix+=1;continue;}
x=map[tem1][wy];
temp4[i3]=ntoc(x,type,style);
ix+=1;
i3++;
}
break;
}
case 1:
{
m1=(ia!=1&&ib==1),m3=(ib!=1&&ia==1);
for(i=0; i<1+ia+ib;i++)
{
tem1=wy-ia+iy-m1;
if (tem1<0||tem1>14){iy+=1;continue;}
x=map[wx][tem1];
temp3[i3]=ntoc(x,type,style);
iy+=1;
i3++;
}
iy=0,i3=0;
for (i=0 ; i<1+ia+ib;i++)
{
tem1=wy+ib-iy+m3;
if (tem1<0||tem1>14){iy+=1;continue;}
x=map[wx][tem1];
temp4[i3]=ntoc(x,type,style);
iy+=1;
i3++;
}
break;
}
break;
case 2:
{
m1=(ia!=1&&ib==1),m3=(ib!=1&&ia==1);
for (i=0 ; i<1+ia+ib ; i++)
{
tem1=wx-ia+ix-m1;
tem2=wy-ia+iy-m1;
if (tem1<0||tem1>14||tem2<0||tem2>14){ix+=1,iy+=1;continue;}
x=map[tem1][tem2];
temp3[i3]=ntoc(x,type,style);
iy+=1;
ix+=1;
i3++;
}
iy=0,ix=0,i3=0;
for (i=0 ; i<1+ia+ib ; i++)
{
tem1=wx+ib-ix+m3;
tem2=wy+ib-iy+m3;
if (tem1<0||tem1>14||tem2<0||tem2>14){ix+=1,iy+=1;continue;}
x=map[tem1][tem2];
temp4[i3]=ntoc(x,type,style);
iy+=1;
ix+=1;
i3++;
}
break;
}
case 3:
{
m1=(ia!=1&&ib==1),m3=(ib!=1&&ia==1);
for (i=0 ; i<1+ia+ib ; i++)
{
tem1=wx-ia+ix-m1;
tem2=wy+ia+iy+m1;
if (tem1<0||tem1>14||tem2<0||tem2>14){ix+=1,iy-=1;continue;}
x=map[tem1][tem2];
temp3[i3]=ntoc(x,type,style);
iy-=1;
ix+=1;
i3++;
}
iy=0,ix=0,i3=0;
for (i=0 ; i<1+ia+ib ; i++)
{
tem1=wx+ib-ix+m3;
tem2=wy-ib-iy-m3;
if (tem1<0||tem1>14||tem2<0||tem2>14){ix+=1,iy+=1;continue;}
x=map[tem1][tem2];
temp4[i3]=ntoc(x,type,style);
iy-=1;
ix+=1;
i3++;
}
break;
}
};
//tj===================================================//
if ( (strcmp("00H0",(const char *)&temp3[1])==0 || strcmp("00H0",(const char *)&temp4[1])==0 || strcmp("00H0",(const char *)&temp3[0])==0 || strcmp("00H0",(const char *)&temp4[0])==0)&&tem3!=0)return;
if ( (strcmp("00B0",(const char *)&temp3[1])==0 || strcmp("00B0",(const char *)&temp4[1])==0 || strcmp("00B0",(const char *)&temp3[0])==0 || strcmp("00B0",(const char *)&temp4[0])==0)&&tem3!=0)return;
if ( (strcmp("00HHHB",(const char *)&temp3[1])==0 || strcmp("00HHHB",(const char *)&temp4[1])==0 || strcmp("00HHHB",(const char *)&temp3[0])==0 || strcmp("00HHHB",(const char *)&temp4[0])==0)&&tem3!=0)return;
/*++此处添加更多的屏蔽++*/
if (tem3==0)
{for (i=0 ; i<=61 ; i++)
{
if (strcmp(wds[i],(const char *)&temp3[1])==0||strcmp(wds[i],(const char *)&temp4[1])==0||strcmp(wds[i],(const char *)&temp3[0])==0||strcmp(wds[i],(const char *)&temp4[0])==0)
{
if (player==false)
{
pc[nx][ny][st]=i;
return;
}
else
{
user[nx][ny][st]=i;
return;
}
}
}
}
else
{
for (i=0 ; i<=61 ; i++)
{
if (strcmp(wds[i],(const char *)&temp3[0])==0||strcmp(wds[i],(const char *)&temp4[0])==0)
{
if (player==false)
{
pc[nx][ny][st]=i;
return;
}
else
{
user[nx][ny][st]=i;
return;
}
}
}
}
}
/*__________________________________________________________________________________________*/
CPoint wzq::AiGo(bool color)
{
//CPoint turnback(-1,-1);
CPoint turnback;
turnback.x=-1;
turnback.y=-1;
clear(false);
fillin(color,false,true);
fillin(!color,false,false);
aitype2 =getaitype();
unsigned char found=255;
int ix=0 ;
int iy=0 ;
int im=0 ;
for (ix=0 ;ix<=14;ix++)
{
for ( iy=0 ;iy<=14;iy++)
{
for ( im=0 ; im<=3 ; im++)
{
if (pc[ix][iy][im]<=found)
{
found=pc[ix][iy][im];
turnback.x=ix,turnback.y=iy;
}
}
}
}
if (found<=23)
return turnback;
else
return getmax(color);
}
/*__________________________________________________________________________________________*/
void wzq::setall()
{
int ix=0 ;
int iy=0 ;
for ( ix=0 ;ix<=14;ix++)
{
for ( iy=0 ;iy<=14;iy++)
{
wzq::nicest2[ix][iy]=0;
}
}
}
/*____________________________________________________________________________________*/
char wzq::ntoc(char num,bool type,bool style)
{
if (num==0)
return '0';
else
if (type==true)
{
if (num==(int)style+1)
return 'H';
else
return 'B';
}
else
{
if (num!=(int)style+1)
return 'H';
else
return 'B';
}
}
/*_____________________________________________________________________________________*/
void wzq::checkgo(int x,int y,bool color,int nu,int inx,int iny)
{
wzq::trygo[x][y]=(char)color+1;
clear(true);
fillin(color,true,true);
fillin(!color,true,false);
CPoint temp=getbg(true);
bool four1=false,four2=false,three1=false,three2=false;
bool four3=false,four4=false,three3=false,three4=false;
int i=0 ;
for ( i=0 ; i<=3 ; i++)
{
if (user[temp.x][temp.y][i]>=3&&user[temp.x][temp.y][i]<=5)
{
wzq::nicest2[inx][iny]=2;//lose
return;
}
else
{
if (user[temp.x][temp.y][i]<3)//win
{
wzq::nicest2[inx][iny]=1;
return;
}
else
{
if (user[temp.x][temp.y][i]>=6&&user[temp.x][temp.y][i]<=14)
{
if(four1==true)four2=true;else four1=true;
}
else
{
if (user[temp.x][temp.y][i]>=15&&user[temp.x][temp.y][i]<=23)
{
if(four3==true)four4=true;else four3=true;
}
else
{
if (user[temp.x][temp.y][i]==24||user[temp.x][temp.y][i]==25)
{
if(three1==true)three2=true;else three1=true;
}
else
{
if (user[temp.x][temp.y][i]==26||user[temp.x][temp.y][i]==27)
{
if(three3==true)three4=true;else three3=true;
}
}
}
}
}
}
}/*++此处添加更多的胜败判断++*/
if (three1+three2+four1+four2>=2)
{
wzq::nicest2[inx][iny]=1;//lose
return;
}
else
{
if (three3+three4+four3+four4>=2)
{ wzq::nicest2[inx][iny]=2;//win
return;
}
}
if (nu>=wzq::aitype2)
{
wzq::nicest2[inx][iny]=3;
return;
}
int xxx=nu+1;
checkgo(temp.x ,temp.y ,!color,xxx,inx,iny);
}
/*_____________________________________________________________________________________*/
CPoint wzq::getmax(bool color)
{
CPoint turnback;
turnback.x=0;
turnback.y=0;
setall();
begin:
bool x=0;
int fx=0,fy=1;
int ix=0 ;
int iy=0;
for ( ix=0 ;ix<=14;ix++)
{
for ( iy=0;iy<=14;iy++)
{
if (wzq::nicest2[ix][iy]==0)
{
if (bj2(ix,iy,fx,fy,false)==true)
fx=ix,fy=iy,x=1;
}
}
}
//找最大
//if (x==-1){turnback.x=7,turnback.y=7;return turnback;}//如果第一步返回7,7
if (x==0)
{x=0;
for ( ix=0 ;ix<=14;ix++)
{
for ( iy=0 ;iy<=14;iy++)
{
if (wzq::nicest2[ix][iy]!=1/*不输*/)
{
if (bj2(ix,iy,turnback.x,turnback.y,false)==true)turnback.x=ix,turnback.y=iy,x=1;
}
}
}
if (x==0)
{x=0;
for ( ix=0 ;ix<=14;ix++)
{
for ( iy=0 ;iy<=14;iy++)
{
if (bj2(ix,iy,turnback.x,turnback.y,false)==true)turnback.x=ix,turnback.y=iy,x=1;
}
}
}
if (x==0)turnback.x =7,turnback.y =7;
return turnback;
}//找完
for (ix=0 ;ix<=14;ix++)
{
for ( iy=0 ;iy<=14;iy++)
{
wzq::trygo[ix][iy]=wzq::map[ix][iy];
}
}
//填
wzq::checkgo(fx,fy, color,1,fx,fy);
//预测
if (nicest2[fx][fy]==2)//win
{
turnback.x=fx,turnback.y=fy;
return turnback;
}
else
{
goto begin;//重来一次
}
//判断
}
/*_____________________________________________________________________________________*/
CPoint wzq::getbg(bool style )
{
CPoint turnback;
int ix=0 ;
int iy=0 ;
int ix1=0,iy1=0;
for ( ix=0 ;ix<=14;ix++)
{
for ( iy=0 ;iy<=14;iy++)
{
if (bj2(ix,iy,ix1,iy1,style)==true)
{
ix1=ix,iy1=iy;
}
}
}
turnback.x=ix1;
turnback.y=iy1;
return turnback;
}
/*_____________________________________________________________________________________*/
bool wzq::bj2(int x1,int y1,int x2,int y2,bool style)
{
unsigned char a[4];
unsigned char b[4];
unsigned char temp1;
int i;
int i2=0 ;
if (style==false)
{
for (i=0 ; i<=3 ;i++)
{a[i]=1;
a[i]=pc[x1][y1][i];
b[i]=pc[x2][y2][i];
}
}
else
{
for (i=0 ; i<=3 ;i++)
{a[i]=1;
a[i]=user[x1][y1][i];
b[i]=user[x2][y2][i];
}
}
//...
for (i=0 ; i<=3 ; i++)
{
for ( i2=0 ; i2<=2-i; i2++)
{
if (a[i2]>a[i2+1])
{
temp1=a[i2];
a[i2]=a[i2+1];
a[i2+1]=temp1;
}
if (b[i2]>b[i2+1])
{
temp1=b[i2];
b[i2]=b[i2+1];
b[i2+1]=temp1;
}
}
}
//冒泡排序
for (i=0 ; i<=3 ; i++)
{
if (a[i]b[i])
{
return false;
}
}
}
return false;
}
void wzq::clear(bool style)
{
int ix,iy;
int im=0 ;
if (style==false)
for ( ix=0 ;ix<=14;ix++)
{
for (iy=0 ;iy<=14;iy++)
{
for ( im=0 ; im<=3 ; im++)
{
wzq::pc[ix][iy][im]=255;
}
}
}
else
{
for (ix=0 ;ix<=14;ix++)
{
for (iy=0 ;iy<=14;iy++)
{
for ( im=0 ; im<=3 ; im++)
{
wzq::user[ix][iy][im]=255;
}
}
}
}
}
int wzq::getaitype()
{
if (wzq::AItype==0)
return 6;
else
if (wzq::AItype==1)
return 10;
else
if (wzq::AItype==2 )
return 20;
else
return 10;
}
void wzq::setback(int nx,int ny,bool style)
{
wzs[wzq::nowd2].used=true;
wzs[wzq::nowd2].color=style;
wzs[wzq::nowd2].ix =nx;
wzs[wzq::nowd2].iy =ny;
nowd2++;
}