【游戏程序设计】运动型AI

运行结果：

星星追随小人移动。

源代码：

#include <windows.h>
#include <tchar.h>
#pragma comment(lib, "winmm.lib")									//调用PlaySound函数所需库文件t

#define WINDOW_WIDTH 640
#define WINDOW_HEIGHT 480
#define WINDOW_TITLE L"【游戏程序设计】运动型AI"

HINSTANCE hInst;
HDC hdc, mdc, bufdc;
HBITMAP hbg, hgo[4], hbird;
POINT p[3];															//记录三只小鸟的贴图坐标
DWORD g_tNow, g_tPre;
//x，y为人物贴图坐标，dirdir为人物移动方向，
//这里我们中以0，1，2，3代表人物上，下，左，右方向上的移动：num为连续贴图中的小图编号  
int x, y, dir, g_iNum;												

int  MyWindowClass(HINSTANCE);
BOOL InitInstance(HINSTANCE, int);
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
void MyDraw(HDC);

/*****************************************************************************************************************
在不同的应用程序中，在此处添加相关的全局变量
******************************************************************************************************************/
int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPreInstace,
									LPSTR lpCmdLine, int nCmdShow) 
{
	MyWindowClass(hInstance);
	PlaySound(L"sound.wav", NULL, SND_FILENAME| SND_ASYNC| SND_LOOP);	//循环播放背景音乐
	if(!InitInstance(hInstance, nCmdShow))
		return FALSE;
	MSG msg = {};

	while(msg.message != WM_QUIT) 
	{
		if(PeekMessage(&msg, NULL, 0, 0, PM_REMOVE))
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
		else
		{
			g_tNow = GetTickCount();
			if(g_tNow - g_tPre >= 40)
			{
				MyDraw(hdc);
				g_tPre = GetTickCount();								//记录此次绘图时间
			}
		}
	}

	return msg.wParam;
}

int MyWindowClass(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 = NULL;
	wcex.hCursor = LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName = NULL;
	wcex.lpszClassName = L"gamebase";
	wcex.hIconSm = NULL;

	return RegisterClassEx(&wcex); 
}

BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
	hInst = hInstance;
	HWND hwnd = CreateWindow(L"gamebase", WINDOW_TITLE, WS_OVERLAPPEDWINDOW, 
		CW_USEDEFAULT, CW_USEDEFAULT, WINDOW_WIDTH, WINDOW_HEIGHT, NULL, NULL, hInstance, NULL);
	if(!hwnd)
		return FALSE;
	MoveWindow(hwnd, 10, 10, WINDOW_WIDTH, WINDOW_HEIGHT, true);
	ShowWindow(hwnd, nCmdShow);
	UpdateWindow(hwnd);

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

	//载入各连续移动位图及背景图
	wchar_t filename[20] = {};
	for(int i = 0; i < 4; ++i)
	{
		swprintf_s(filename, L"go%d.bmp", i);
		hgo[i] = (HBITMAP)LoadImage(NULL, filename, IMAGE_BITMAP, 480, 216, LR_LOADFROMFILE);
	}
	hbg = (HBITMAP)LoadImage(NULL, L"bg.bmp", IMAGE_BITMAP, WINDOW_WIDTH, WINDOW_HEIGHT, LR_LOADFROMFILE);
	hbird = (HBITMAP)LoadImage(NULL, L"bird.bmp", IMAGE_BITMAP, 61, 122, LR_LOADFROMFILE);
	//建立新的位图并置于mdc中
	HBITMAP bmg = CreateCompatibleBitmap(hdc, WINDOW_WIDTH, WINDOW_HEIGHT);
	SelectObject(mdc, bmg);

	p[0].x = 30;
	p[0].y = 100;
	p[1].x = 250;
	p[1].y = 250;
	p[2].x = 500;
	p[2].y = 400;
	
	//设定人物贴图的初始位置和移动方向
	x = 300;
	y = 250;
	dir = 0;
	g_iNum = 0;

	return TRUE;
}

LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch(message)
	{
	case WM_KEYDOWN:													//按下键盘消息
	//判断按键的虚拟键码并加入人物往上移动的量（每次按下一次按键移动10个单位），
	//来决定人物贴图坐标的X与Y值，接着判断坐标是否超出窗口区域，若有则再次修正 
		switch(wParam)
		{
		case VK_UP:														//按下【↑】键  
			y -=10;
			if(y < 0)
				y = 0;
			dir = 0;
			break;														//按下【↓】键  
		case VK_DOWN:
			y += 10;
			if(y > WINDOW_HEIGHT - 108)
				y = WINDOW_HEIGHT - 108;
			dir = 1;
			break;
		case VK_LEFT:													 //按下【←】键  
			x -=10;
			if(x < 0)
				x = 0;
			dir = 2;
			break;
		case VK_RIGHT:													//按下【→】键  
			x += 10;
			if(x > WINDOW_WIDTH - 60)
				x = WINDOW_WIDTH - 60;
			dir = 3;
			break;
		}
	break;
/**************************************************************************************************************
在退出程序前，往往在此处删除创建的相关资源
***************************************************************************************************************/
	case WM_DESTROY:													//窗口结束消息
		DeleteDC(mdc);
		DeleteDC(bufdc);
		ReleaseDC(hwnd, hdc);
		DeleteObject(hbg);
		DeleteObject(hbird);
		for(int i = 0; i < 4; ++i)
			DeleteObject(hgo[i]);
		PostQuitMessage(0);
		break;
	default:															//其他消息
		return DefWindowProc(hwnd, message, wParam, lParam);
	}
	return 0;
}
/***************************************************************************************************************
在函数MyDraw（）中进行相关绘制工作
****************************************************************************************************************/
void MyDraw(HDC hdc)
{
	//先在mdc中贴上背景图
	SelectObject(bufdc, hbg);
	BitBlt(mdc, 0, 0, WINDOW_WIDTH, WINDOW_HEIGHT, bufdc, 0, 0, SRCCOPY);
	//按照目前的移动方向取出对应人物的连续走动图，并确定截取人物图的宽度和高度
	SelectObject(bufdc, hgo[dir]);
	//按照目前的x，y的值，在mdc上进行透明贴图，然后显示在窗口画面上
	BitBlt(mdc, x, y, 60, 108, bufdc, g_iNum*60, 108, SRCAND);
	BitBlt(mdc, x, y, 60, 108, bufdc, g_iNum*60, 0, SRCPAINT);
	//贴上鸟的图片
	SelectObject(bufdc, hbird);
	for(int i = 0; i < 3; ++i)
	{
		BitBlt(mdc, p[i].x, p[i].y, 61, 61, bufdc, 0, 61, SRCAND);
		BitBlt(mdc, p[i].x, p[i].y, 61, 61, bufdc, 0, 0, SRCPAINT);
	}
	BitBlt(hdc, 0, 0, WINDOW_WIDTH, WINDOW_HEIGHT, mdc, 0, 0, SRCCOPY);

	++g_iNum;
	if(g_iNum == 8)
		g_iNum = 0;

	for(int i = 0; i < 3; ++i)
		if(rand() %3)													//有2/3几率进行追踪
		{
			if(p[i].x < x)
				p[i].x += 5;
			else if(p[i].x > x)
				p[i].x -= 5;
			if(p[i].y < y)
				p[i].y += 5;
			else if(p[i].y > y)
				p[i].y -= 5;
		}
}