main.cpp

一个自己编写的贪食蛇游戏.

//////////////////////////////////////////////////////////////////
//																//
//               * 中国象棋2.0 (C) 2003 *						//
//																//
// * 作    者:rh												//
// * 开发时间:2003.3.29											//
//																//	
// * 说    明:该程序只提供二人对弈功能,并未实现人机对弈功能.	//
//																//
//////////////////////////////////////////////////////////////////

// Win6_0Move.cpp : 
// 1. 程序入口，产生窗口(显示象棋，接受用户消息，转发象棋对象)
// 2. 创建象棋对象 (窗口过程中的全局对象，负责处理用户消息)


#include "stdafx.h"
#include "resource.h"
#include "GSnake.h"

#define MAX_LOADSTRING 100

// Global Variables:
HINSTANCE hInst;								// current instance
TCHAR szTitle[MAX_LOADSTRING];					// The title bar text
TCHAR szWindowClass[MAX_LOADSTRING];			// The title bar text

// Foward declarations of functions included in this code module:
ATOM				MyRegisterClass(HINSTANCE hInstance);
BOOL				InitInstance(HINSTANCE, int);
LRESULT CALLBACK	WndProc(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	About(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	GameOver(HWND, UINT, WPARAM, LPARAM);




int APIENTRY WinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPSTR     lpCmdLine,
                     int       nCmdShow)
{
 	// TODO: Place code here.
	MSG msg;
	HACCEL hAccelTable;

	// Initialize global strings
	LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
	LoadString(hInstance, IDC_WIN6_0MOVE, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

	// Perform application initialization:
	if (!InitInstance (hInstance, nCmdShow)) 
	{
		return FALSE;
	}

	hAccelTable = LoadAccelerators(hInstance, (LPCTSTR)IDC_WIN6_0MOVE);

	// Main message loop:
	while (GetMessage(&msg, NULL, 0, 0)) 
	{
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) 
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}

	return msg.wParam;
}



ATOM MyRegisterClass(HINSTANCE hInstance)
{
	WNDCLASSEX wcex;
	
	wcex.cbSize = sizeof(WNDCLASSEX); 

	wcex.style			= CS_HREDRAW | CS_VREDRAW;
	wcex.lpfnWndProc	= (WNDPROC)WndProc;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, (LPCTSTR)IDI_WIN6_0MOVE);
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName	= (LPCSTR)IDC_WIN6_0MOVE;
	wcex.lpszClassName	= szWindowClass;
	wcex.hIconSm		= LoadIcon(wcex.hInstance, (LPCTSTR)IDI_SMALL);
	
	return RegisterClassEx(&wcex);
}

BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;

   hInst = hInstance; // Store instance handle in our global variable

   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPED | WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX ,
      60, 60, 550 , 470, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);

   return TRUE;
}

LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	int wmId, wmEvent;
	static GSnake theGSnake(hWnd);
	static int iSelection = IDM_LEVEL1 ;
	static char *str[]={"继续","暂停"};

	PAINTSTRUCT ps;
	HDC hdc;
	TCHAR szHello[MAX_LOADSTRING];
	LoadString(hInst, IDS_HELLO, szHello, MAX_LOADSTRING);
	static bool bMouseDown = false;

	HMENU      hMenu ;



	switch (message) 
	{
		case WM_TIMER:
		   switch (wParam)
			{
			case TIMER_SNAKE:
				if(!theGSnake.Move())
					if(DialogBox(hInst, (LPCTSTR)IDD_GAMEOVER, hWnd, (DLGPROC)GameOver)==IDOK)
					{
						theGSnake.Start();
					}
					else
						SendMessage(hWnd,WM_COMMAND,IDM_EXIT,0);
              break ;
			}
		   break;
		case WM_COMMAND:
			hMenu = GetMenu (hWnd) ;

			wmId    = LOWORD(wParam); 
			wmEvent = HIWORD(wParam); 

			// Parse the menu selections:
			switch (wmId)
			{
				case IDM_ABOUT:
				   DialogBox(hInst, (LPCTSTR)IDD_ABOUTBOX, hWnd, (DLGPROC)About);
				   break;
				case IDM_EXIT:
				   DestroyWindow(hWnd);
				   break;
				case IDM_PAUSE:
				   if(!theGSnake.Pause())
						ModifyMenu(hMenu,IDM_PAUSE,MF_BYCOMMAND,IDM_PAUSE,str[0]);
				   else
						ModifyMenu(hMenu,IDM_PAUSE,MF_BYCOMMAND,IDM_PAUSE,str[1]);
				   break;
				case IDM_START:
				   theGSnake.Start(); 
				   EnableMenuItem (hMenu, IDM_PAUSE, MF_ENABLED) ;
				   break;
   				case IDM_LEVEL1: 
				case IDM_LEVEL2: 
				case IDM_LEVEL3: 
				   CheckMenuItem (hMenu, iSelection, MF_UNCHECKED) ;
				   iSelection = LOWORD (wParam) ;
                   CheckMenuItem (hMenu, iSelection, MF_CHECKED) ;
				   theGSnake.SetLevel(iSelection);
				   break;
				default:
				   return DefWindowProc(hWnd, message, wParam, lParam);
			}
			break;

		case WM_KEYDOWN:
			switch (wParam)
			{
			case VK_UP:		theGSnake.ChangeDirect(SNK_UP   );	break;
			case VK_DOWN:	theGSnake.ChangeDirect(SNK_DOWN );	break;
			case VK_RIGHT:	theGSnake.ChangeDirect(SNK_RIGHT);	break;
			case VK_LEFT:	theGSnake.ChangeDirect(SNK_LEFT );	break;
			}
			break;

		case WM_PAINT:
			hdc = BeginPaint(hWnd, &ps);
			//象棋对象负责显示自身
			theGSnake.Show(hdc);
			EndPaint(hWnd, &ps);
			break;
		case WM_DESTROY:
			PostQuitMessage(0);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
   }
   return 0;
}

// Mesage handler for about box.
LRESULT CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
		case WM_INITDIALOG:
				return TRUE;

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

LRESULT CALLBACK GameOver(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
		case WM_INITDIALOG:
				return TRUE;

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