// 鍵盤控制圖片移動.cpp : 定義應用程序的入口點。
//

#include "stdafx.h"
#include "鍵盤控制圖片移動.h"
#include <Math.h>
#pragma comment(lib,"msimg32.lib")

#define MAX_LOADSTRING 100

// 全局變量:
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);
INT_PTR CALLBACK	About(HWND, UINT, WPARAM, LPARAM);

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_MY, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

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

	hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(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;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, MAKEINTRESOURCE(IDI_MY));
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+2);
	wcex.lpszMenuName	= MAKEINTRESOURCE(IDC_MY);
	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;

   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);
   UpdateWindow(hWnd);

   return TRUE;
}

//
//  函數: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  目的: 處理主窗口的消息。
//
//  WM_COMMAND	- 處理應用程序菜單
//  WM_PAINT	- 繪制主窗口
//  WM_DESTROY	- 發送退出消息并返回
//
//


float iX = 0,iY = 0;
int iCnd = 0;
POINT mypoint[16];
int point = 0;
float speed = 10;
float nX = 0, nY = 0;
float s;
float time = 30;
float speed_x,speed_y;
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	int wmId, wmEvent;
	PAINTSTRUCT ps;
	HDC hdc;
	static HBITMAP s_hBitmap = NULL;
	HDC mydc;
	
	switch (message)
	{
	case WM_CREATE:
		{
			TCHAR* p = _T("001.bmp");
			s_hBitmap = (HBITMAP)LoadImage(NULL,p,IMAGE_BITMAP,0,0,LR_LOADFROMFILE);
			for(int i = 0; i < 16;i++)
			{
				mypoint[i].x = i%4 * 64;
				mypoint[i].y = i/4 * 64;
			}
			SetTimer(hWnd,1,time,NULL);
		}
		break;
		
	case WM_TIMER:
		{
			
			s = sqrt((nX - iX)*(nX - iX) + (nY-iY)*(nY-iY));
			if(s > abs(speed))
			{
				iX += speed_x;
				iY += speed_y;

			}
			/*else
			{
				iX	=	nX;
				iY	=	nY;
			}*/
			InvalidateRect(hWnd,NULL,TRUE);
		}
		break;
	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: 在此添加任意繪圖代碼...
		mydc = CreateCompatibleDC(hdc);
		::SelectObject(mydc,s_hBitmap);
		BITMAP	bmpInf;
		GetObject(s_hBitmap,sizeof(bmpInf),&bmpInf);
		
		iCnd++;
		iCnd%=4;
		TransparentBlt(hdc,iX,iY,64,64,mydc,mypoint[point + iCnd].x,mypoint[point + iCnd].y,64,64,RGB(255,255,255));
		//BitBlt(hdc,iX,iY,64,64,mydc,mypoint[point + iCnd].x,mypoint[point + iCnd].y,SRCCOPY);
		
		DeleteObject(mydc);
		EndPaint(hWnd, &ps);
		break;
	case WM_DESTROY:
		PostQuitMessage(0);
		break;
	
	case WM_LBUTTONDOWN:
		{
			nX = LOWORD(lParam);
			nY = HIWORD(lParam);
			s = sqrt((nX - iX)*(nX - iX) + (nY-iY)*(nY-iY));
			time = s / speed;
			
			speed_x = (nX - iX) / time;
			speed_y = (nY - iY) / time;
		}
		break;

	case WM_KEYDOWN:
		{
			RECT rect;
			GetClientRect(hWnd,&rect);
			switch(wParam)
			{
			case VK_LEFT:
				point = 4;
				iX -= 10;
				iX = max(rect.left,iX);
				break;
			case VK_RIGHT:
				point = 8;
				iX += 10;
				iX = min(rect.right - 64,iX);
				break;
			case VK_UP:
				point = 12;
				iY	-=	10;
				iY	=	max(rect.top,iY);
				break;
			case VK_DOWN:
				point = 0;
				iY+=	10;
				iY	=	min(rect.bottom - 64,iY);
				break;
			}
		}
		InvalidateRect(hWnd,NULL,TRUE);
		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;
}