细节层次的随机行走.cpp

游戏的 人工智能

// 细节层次的随机行走.cpp : 定义应用程序的入口点。
//第1级或第2级的生物，采用完全的路径搜索。 
//第3级的生物，只简单地让它从所在位置沿直线走到目标位置。
//此案例相对简单，建议学员独立完成

#include "stdafx.h"
#include "细节层次的随机行走.h"
#include <stdio.h>
#include <math.h>
#define MAX_LOADSTRING 100


HDC memDC;
HBITMAP m[4],p[4],hBitmap;
BITMAP bmp;
RECT rect;
double xvector,yvector;
int xnow,ynow,xdest,ydest,xlast,ylast,i,c,xp;
float xstep,ystep;

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

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

int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
 	// TODO: 在此放置代码。
	MSG msg;
	HACCEL hAccelTable;

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

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

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

	// 主消息循环:
	while (GetMessage(&msg, NULL, 0, 0)) 
	{
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) 
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}

	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)WndProc;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, (LPCTSTR)IDI_MY);
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName	= (LPCTSTR)IDC_MY;
	wcex.lpszClassName	= szWindowClass;
	wcex.hIconSm		= LoadIcon(wcex.hInstance, (LPCTSTR)IDI_SMALL);

	return RegisterClassEx(&wcex);
}

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

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

   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
      100,100,600,500, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

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

   return TRUE;
}

//
//  函数: WndProc(HWND, unsigned, WORD, LONG)
//
//  目的: 处理主窗口的消息。
//
//  WM_COMMAND	- 处理应用程序菜单
//  WM_PAINT	- 绘制主窗口
//  WM_DESTROY	- 发送退出消息并返回
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	int wmId, wmEvent;
	PAINTSTRUCT ps;
	HDC hdc;
	switch (message) 
	{
	case WM_COMMAND:
		wmId    = LOWORD(wParam); 
		wmEvent = HIWORD(wParam); 
		// 分析菜单选择:
		switch (wmId)
		{
		case IDM_ABOUT:
			DialogBox(hInst, (LPCTSTR)IDD_ABOUTBOX, hWnd, (DLGPROC)About);
			break;
		case IDM_EXIT:
			DestroyWindow(hWnd);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
		}
		break;
	case WM_CREATE:
		memDC = CreateCompatibleDC(GetDC(hWnd));
		char str[40];
		for(i=0;i<4;i++)              
		{
			sprintf(str,"m%d.bmp",i);
			m[i] = (HBITMAP)LoadImage(hInst,str ,IMAGE_BITMAP, 440, 74, LR_LOADFROMFILE|LR_CREATEDIBSECTION);
			sprintf(str,"p%d.bmp",i);
			p[i] = (HBITMAP)LoadImage(hInst,str ,IMAGE_BITMAP, 440, 74, LR_LOADFROMFILE|LR_CREATEDIBSECTION);
		}
		POINT point;
		point.x = 250;
		point.y = 150;
		ClientToScreen(hWnd, &point);
		SetCursorPos(point.x, point.y);
		ShowCursor(FALSE);
		xnow = 100;
		ynow = 100;
		xdest = 400;
		ydest = 300;
		xstep = (float)(xdest - xnow)/100;
		ystep = (float)(ydest - ynow)/100;
		SetTimer(hWnd,1,100,NULL);
 		break;
	case WM_PAINT:
		hdc = BeginPaint(hWnd, &ps);
		EndPaint(hWnd, &ps);
		break;
	case WM_TIMER:
		xlast = xnow;   
		ylast = ynow;
		xnow += (int)xstep;   
		ynow += (int)ystep;
		if(xnow>xdest||ynow>ydest)
		{
			xnow = 100;
			ynow = 100;
			KillTimer(hWnd,1);
		}
		c++;
		if(c==8)
			c=0;
		xp=55*c;
		SelectObject(memDC,m[1]);
		BitBlt(GetDC(hWnd),xlast,ylast,55,74,memDC,0,0,WHITENESS);
		if(fabs((float)(xnow-xlast)) >= fabs((float)(ynow-ylast)))
		{
			if(xnow-xlast>=0)
			{
				SelectObject(memDC,m[1]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCAND);
				SelectObject(memDC,p[1]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCPAINT);
			}
			else
			{
				SelectObject(memDC,m[2]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCAND);
				SelectObject(memDC,p[2]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCPAINT);
			}
		}
		else
		{
			if(ynow-ylast >= 0)          
			{
				SelectObject(memDC,m[3]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCAND);
				SelectObject(memDC,p[3]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCPAINT);
			}
			else                       
			{
				SelectObject(memDC,m[0]);			
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCAND);
				SelectObject(memDC,p[0]);
				BitBlt(GetDC(hWnd),xnow,ynow,55,74,memDC,xp,0,SRCPAINT);
			}
		}
		break;
	case WM_DESTROY:
		KillTimer(hWnd,1);
		if(memDC) ReleaseDC(hWnd,memDC);
		PostQuitMessage(0);
		break;
	default:
		return DefWindowProc(hWnd, message, wParam, lParam);
	}
	return 0;
}

// “关于”框的消息处理程序。
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;
}