五子棋

// chess.cpp : 定义应用程序的入口点。
//

#include "stdafx.h"
#include "chess.h"
#include "math.h"

#define MAX_LOADSTRING 100

// 全局变量:
HINSTANCE hInst;        // 当前实例
TCHAR szTitle[MAX_LOADSTRING];     // 标题栏文本
TCHAR szWindowClass[MAX_LOADSTRING];   // 主窗口类名

HBITMAP chess[2];
HDC   hdc,mdc,bufdc;
HWND  hWnd;
DWORD tPre,tNow;
int  board[10][10];
bool ptab[10][10][192];
bool ctab[10][10][192];
int  win[2][192];
int  num[2];
bool turn,over;
int  winner;

// 此代码模块中包含的函数的前向声明:
ATOM    MyRegisterClass(HINSTANCE hInstance);
BOOL    InitInstance(HINSTANCE, int);
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK About(HWND, UINT, WPARAM, LPARAM);

void MyPaint(HDC hdc);
void InitGame();
void ComTurn();

int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
 UNREFERENCED_PARAMETER(hPrevInstance);
 UNREFERENCED_PARAMETER(lpCmdLine);

  // TODO: 在此放置代码。
 MSG msg;
 HACCEL hAccelTable;

 // 初始化全局字符串
 LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
 LoadString(hInstance, IDC_CHESS, szWindowClass, MAX_LOADSTRING);
 MyRegisterClass(hInstance);

 // 执行应用程序初始化:
 if (!InitInstance (hInstance, nCmdShow))
 {
  return FALSE;
 }

 hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_CHESS));

 // 主消息循环:
/* while (GetMessage(&msg, NULL, 0, 0))
 {
  if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
  {
   TranslateMessage(&msg);
   DispatchMessage(&msg);
  }
 }*/
 while(TRUE)
 {
  if (GetMessage(&msg,NULL,0,0))
  {
   if (msg.message!=WM_QUIT)
   {
    TranslateMessage(&msg);
    DispatchMessage(&msg);
    MyPaint(hdc);
   }
  }
  else
   break;
 }

 return (int) msg.wParam;
}

 

//
//  函数: MyRegisterClass()
//
//  目的: 注册窗口类。
//
//  注释:
//
//    仅当希望
//    此代码与添加到 Windows 95 中的“RegisterClassEx”
//    函数之前的 Win32 系统兼容时，才需要此函数及其用法。调用此函数十分重要，
//    这样应用程序就可以获得关联的
//    “格式正确的”小图标。
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
 WNDCLASSEX wcex;

 wcex.cbSize = sizeof(WNDCLASSEX);

 wcex.style   = CS_HREDRAW | CS_VREDRAW;
 wcex.lpfnWndProc = WndProc;
 wcex.cbClsExtra  = 0;
 wcex.cbWndExtra  = 0;
 wcex.hInstance  = hInstance;
 wcex.hIcon   = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_CHESS));
 wcex.hCursor  = LoadCursor(NULL, IDC_ARROW);
 wcex.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
 wcex.lpszMenuName = MAKEINTRESOURCE(IDC_CHESS);
 wcex.lpszClassName = szWindowClass;
 wcex.hIconSm  = LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));

 return RegisterClassEx(&wcex);
}

//
//   函数: InitInstance(HINSTANCE, int)
//
//   目的: 保存实例句柄并创建主窗口
//
//   注释:
//
//        在此函数中，我们在全局变量中保存实例句柄并
//        创建和显示主程序窗口。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;
   HBITMAP tile,bmp;
   int rowNum,colNum;
   int i,x,y;

   hInst = hInstance; // 将实例句柄存储在全局变量中

   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

   ShowWindow(hWnd, nCmdShow);
   MoveWindow(hWnd,0,0,600,600,TRUE);
   UpdateWindow(hWnd);

   hdc=GetDC(hWnd);
   mdc=CreateCompatibleDC(hdc);
   bufdc=CreateCompatibleDC(hdc);

   bmp=CreateCompatibleBitmap(hdc,450,450);
   SelectObject(mdc,bmp);

   tile=(HBITMAP)LoadImage(NULL,"tile.bmp",IMAGE_BITMAP,45,45,LR_LOADFROMFILE);
   chess[0]=(HBITMAP)LoadImage(NULL,"chess0.bmp",IMAGE_BITMAP,38,38,LR_LOADFROMFILE);
   chess[1]=(HBITMAP)LoadImage(NULL,"chess1.bmp",IMAGE_BITMAP,38,38,LR_LOADFROMFILE);
  
   for (i=0;i<100;i++)
   {
    rowNum=i/10;
    colNum=i%10;
    x=colNum*45;
    y=rowNum*45;
    SelectObject(bufdc,tile);
    BitBlt(mdc,x,y,45,45,bufdc,0,0,SRCCOPY);
   }
   //BitBlt(hdc,0,0,640,480,mdc,0,0,SRCCOPY);

   InitGame();
   MyPaint(hdc);
   return TRUE;
}

//
//  函数: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  目的: 处理主窗口的消息。
//
//  WM_COMMAND - 处理应用程序菜单
//  WM_PAINT - 绘制主窗口
//  WM_DESTROY - 发送退出消息并返回
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
 int wmId, wmEvent;
 PAINTSTRUCT ps;
 HDC hdc;
 int x,y,m,n,i;

 switch (message)
 {
 case WM_COMMAND:
  wmId    = LOWORD(wParam);
  wmEvent = HIWORD(wParam);
  // 分析菜单选择:
  switch (wmId)
  {
  case IDM_ABOUT:
   DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
   break;
  case IDM_EXIT:
   DestroyWindow(hWnd);
   break;
  default:
   return DefWindowProc(hWnd, message, wParam, lParam);
  }
  break;
 case WM_PAINT:
  hdc = BeginPaint(hWnd, &ps);
  // TODO: 在此添加任意绘图代码...
  EndPaint(hWnd, &ps);
  break;
 case WM_KEYDOWN:
  switch(wParam)
  {
  case VK_ESCAPE:
   PostQuitMessage(0);
   break;
  case VK_F1:
   InitGame();
   break;
  }
 case WM_LBUTTONDOWN:
  if(!over)
   if (turn)
   {
    x=LOWORD(lParam);
    y=HIWORD(lParam);
    if (x>10&&x<460&&y>10&&y<460)
    {
     m=(int)floor((double)((x-10)/45));
     n=(int)floor((double)((y-10)/45));

     if (board[m][n]==2)
     {
      board[m][n]=0;
      num[0]++;
      if (num[0]==50&&num[1]==50)
      {
       winner=2;
       over=true;
      }
      else
       for (i=0;i<192;i++)
       {
        if (ptab[m][n][i])
        {
         win[0][i]++;
         ctab[m][n][i]=false;
         win[1][i]=7;
         if (win[0][i]==5)
         {
          winner=0;
          over=true;
         }
        }
        
       }
      turn=false;
     }
    }
   }
   break;
 case WM_DESTROY:
  DeleteDC(mdc);
  DeleteDC(bufdc);
  DeleteObject(chess[0]);
  DeleteObject(chess[1]);
  PostQuitMessage(0);
  break;
 default:
  return DefWindowProc(hWnd, message, wParam, lParam);
 }
 return 0;
}

// “关于”框的消息处理程序。
INT_PTR CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
 UNREFERENCED_PARAMETER(lParam);
 switch (message)
 {
 case WM_INITDIALOG:
  return (INT_PTR)TRUE;

 case WM_COMMAND:
  if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL)
  {
   EndDialog(hDlg, LOWORD(wParam));
   return (INT_PTR)TRUE;
  }
  break;
 }
 return (INT_PTR)FALSE;
}

void InitGame()
{
 int i,j,k;
 int count=0;

 over=false;
 num[0]=num[1]=0;

 //设定玩家与计算机在各个获胜组合中的棋子数
 for (i=0;i<192;i++)
 {
  win[0][i]=0;
  win[1][i]=0;
 }
    //初始化棋盘状态
 for(i=0;i<10;i++)
  for(j=0;j<10;j++)
   board[i][j]=2;
 //设定水平方向的获胜组合
 for(i=0;i<10;i++)
  for (j=0;j<6;j++)
  {
   for(k=0;k<5;k++)
   {
    ptab[i][j+k][count]=TRUE;
    ctab[i][j+k][count]=TRUE;
   }
   count++;
  }
 //设定垂直方向的获胜组合
 for(i=0;i<10;i++)
  for (j=0;j<6;j++)
  {
   for(k=0;k<5;k++)
   {
    ptab[j+k][i][count]=TRUE;
    ctab[j+k][i][count]=TRUE;
   }
   count++;
  }
 //设定正对角线方向的获胜组合
 for(i=0;i<10;i++)
  for (j=0;j<6;j++)
  {
   for(k=0;k<5;k++)
   {
    ptab[j+k][i+k][count]=TRUE;
    ctab[j+k][i+k][count]=TRUE;
   }
   count++;
  }
 //设定反对角线方向的获胜组合
 for(i=0;i<6;i++)
  for (j=9;j>=4;j--)
  {
   for(k=0;k<5;k++)
   {
    ptab[j-k][i+k][count]=TRUE;
    ctab[j-k][i+k][count]=TRUE;
   }
   count++;
  }
 //随机数决定由哪一方先下棋子
 srand(GetTickCount());
 if(rand()%2==0)
  turn=true;
 else
  turn=false;
}

void ComTurn()
{
 int grades[2][10][10];
 int m,n,i,max=0;
 int u,v;

 for (m=0;m<10;m++)
    for (n=0;n<10;n++)
    {
     grades[0][m][n]=0;
     grades[1][m][n]=0;

     if (board[m][n]==2)
     {
      for (i=0;i<192;i++)
      {
       //计算玩家在空格上的获胜分数
       if (ptab[m][n][i]&&win[0][i]!=7)
       {
        switch(win[0][i])
        {
        case 0:
         grades[0][m][n]+=1;
         break;
        case 1:
         grades[0][m][n]+=200;
         break;
        case 2:
         grades[0][m][n]+=400;
         break;
        case 3:
         grades[0][m][n]+=2000;
         break;
        case 4:
         grades[0][m][n]+=10000;
         break;
        }
       }
       //计算计算机在空棋格上的获胜分数
      if (ctab[m][n][i]&&win[1][i]!=7)
      {
       switch(win[1][i])
       {
       case 0:
        grades[1][m][n]+=1;
        break;
       case 1:
        grades[1][m][n]+=220;
        break;
       case 2:
        grades[1][m][n]+=420;
        break;
       case 3:
        grades[1][m][n]+=2100;
        break;
       case 4:
        grades[1][m][n]+=20000;
        break;
       }
      }
      }
      if (max==0)
      {
       u=m;
       v=n;
      }
      if (grades[0][m][n]>max)
      {
       max=grades[0][m][n];
       u=m;
       v=n;
      }
      else if (grades[0][m][n]==max)
      {
       if (grades[1][m][n]>grades[1][u][v])
       {
        u=m;
        v=n;
       }
      }
      if (grades[1][m][n]>max)
      {
       max=grades[1][m][n];
       u=m;
       v=n;
      }
      else if (grades[1][m][n]==max)
      {
       if (grades[0][m][n]>grades[0][u][v])
       {
        u=m;
        v=n;
       }
      }
     }
    }
    board[u][v]=1;//设定为计算机的棋子
    num[1]++;

    if (num[0]==50&&num[1]==50)
    {
     winner=2;
     over=true;
    }
    else
     for (i=0;i<192;i++)
     {
      if (ctab[u][v][i])
      {
       win[1][i]++;
       ptab[u][v][i]=false;
       win[0][i]=7;

       if (win[1][i]==5)
       {
        winner=1;
        over=true;
       }
      }
     }
  turn=true; //换由玩家下
}

void MyPaint(HDC hdc)
{
 int m,n;
 char *str;

 if (over)
 {
  switch(winner)
  {
  case 0:
   str="您赢了！";
   break;
  case 1:
   str="计算机赢了！";
   break;
  case 2:
   str="不分胜负！";
   break;
  }
  TextOut(hdc,10,470,str,strlen(str));
 }
 else if (!turn)
 {
  str="计算机思考中...";
        TextOut(hdc,10,470,str,strlen(str));
  ComTurn();
 }
 else
 {
  str="该您下了...";
  TextOut(hdc,10,470,str,strlen(str));
 }
 for (m=0;m<10;m++)
  for (n=0;n<10;n++)
  {
   if (board[m][n]==0)
   {
    SelectObject(bufdc,chess[0]);
    BitBlt(mdc,m*45+3,n*45+3,38,38,bufdc,0,0,SRCCOPY);
   }
   else if (board[m][n]==1)
   {
    SelectObject(bufdc,chess[1]);
    BitBlt(mdc,m*45+3,n*45+3,38,38,bufdc,0,0,SRCCOPY);
   }
   else
   {
    SelectObject(bufdc,chess[1]);
    BitBlt(mdc,m*45+3,n*45+3,38,38,bufdc,0,0,WHITENESS);
   }
  }
  BitBlt(hdc,10,10,450,450,mdc,0,0,SRCCOPY);
  tPre=GetTickCount();
}