// include the basic windows header files and the Direct3D header file
#include <windows.h>
#include <windowsx.h>
#include <d3d9.h>
#include <d3dx9.h>
#include <dinput.h>
// define the screen resolution and keyboard macros
#define SCREEN_WIDTH  640
#define SCREEN_HEIGHT 480
#define KEY_DOWN(vk_code) ((GetAsyncKeyState(vk_code) & 0x8000) ? 1 : 0)
#define KEY_UP(vk_code) ((GetAsyncKeyState(vk_code) & 0x8000) ? 0 : 1)
#define SAFE_RELEASE(n) if(n != NULL) {n->Release(); n = NULL;}
#define CUSTOMFVF (D3DFVF_XYZRHW | D3DFVF_DIFFUSE) 
#define MB(n, m) MessageBox(NULL, n,m, 0); 
// include the Direct3D Library file
#pragma comment (lib, "d3d9.lib")
#pragma comment (lib, "d3dx9.lib")
#pragma comment (lib, "dinput.lib")
#pragma comment (lib, "dinput8.lib")
#pragma comment (lib, "dxguid.lib")

// global declarations
LPDIRECT3D9 d3d; // the pointer to our Direct3D interface
LPDIRECT3DDEVICE9 d3ddev; // the pointer to the device class
LPD3DXSPRITE PacSprite;
LPDIRECT3DTEXTURE9 PacTexture = NULL;
LPDIRECT3DTEXTURE9 BackTexture = NULL;
LPDIRECT3DVERTEXBUFFER9 t_buffer = NULL;    // the pointer to the vertex buffer
LPDIRECT3DSURFACE9 z_buffer = NULL;
LPDIRECTINPUT8 din;    // the pointer to our DirectInput interface
LPDIRECTINPUTDEVICE8 dinkeyboard;
struct CUSTOMVERTEX {FLOAT X, Y, Z; DWORD COLOR;};

FLOAT posX, posY, posZ;
FLOAT speed;
FLOAT sChange = 0;
FLOAT sChange2 = 0;
bool movingLeft, movingRight, movingUp, movingDown;
bool fullscreen = true;
bool firstTime = true;
HWND hWnd;
RECT spriteType;
  CUSTOMVERTEX t_vert[] = 
    {
        { 0.0f, 0.0f, 50.0f, D3DCOLOR_XRGB(0, 0, 255), },
        { 0.0f, 480.0f, 50.0f, D3DCOLOR_XRGB(0, 255, 0), },
        { 640.f, 0.0f, 50.0f, D3DCOLOR_XRGB(255, 0, 0), },
		{ 640.f, 480.0f, 50.0f, D3DCOLOR_XRGB(255, 0, 0), },
    };
// function prototypes
void initD3D(HWND hWnd); // sets up and initializes Direct3D
void render_frame(void); // renders a single frame
void cleanD3D(void); // closes Direct3D and releases memory
void initDInput(HINSTANCE hInstance, HWND hWnd);    // sets up and initializes DirectInput
bool detect_keys(BYTE DIKVal);    // gets the current keys being pressed
void cleanDInput(void);
void wrapRoom();
void switchMode();
void setLogic(void);
void movementLogic(void);
void TranslationLogic(void);
void switchPacPics(void);
void init_graphics(void); 
void draw_background(void);
// the WindowProc function prototype
LRESULT CALLBACK WindowProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam);


// the entry point for any Windows program
int WINAPI WinMain(HINSTANCE hInstance,
                   HINSTANCE hPrevInstance,
                   LPSTR lpCmdLine,
                   int nCmdShow)
{
	
    WNDCLASSEX wc;

    ZeroMemory(&wc, sizeof(WNDCLASSEX));

    wc.cbSize = sizeof(WNDCLASSEX);
    wc.style = CS_HREDRAW | CS_VREDRAW;
    wc.lpfnWndProc = (WNDPROC)WindowProc;
    wc.hInstance = hInstance;
    wc.hCursor = LoadCursor(NULL, IDC_ARROW);
    // wc.hbrBackground = (HBRUSH)COLOR_WINDOW;    // not needed any more
    wc.lpszClassName = L"WindowClass1";

    RegisterClassEx(&wc);

    hWnd = CreateWindowEx(NULL,
                          L"WindowClass1",
                          L"Our Direct3D Program",
                          WS_EX_TOPMOST | WS_POPUP,    // fullscreen values
                          0, 0,    // the starting x and y positions should be 0
                          SCREEN_WIDTH, SCREEN_HEIGHT,    // set the window to 640 x 480
                          NULL,
                          NULL,
                          hInstance,
                          NULL);

    ShowWindow(hWnd, nCmdShow);

    // set up and initialize Direct3D
    initD3D(hWnd);
    initDInput(hInstance, hWnd);
   
    // enter the main loop:

    MSG msg;

    while(TRUE)
    {
        DWORD starting_point = GetTickCount();

        if (PeekMessage(&msg, NULL, 0, 0, PM_REMOVE))
        {
            if (msg.message == WM_QUIT)
                break;

            TranslateMessage(&msg);
            DispatchMessage(&msg);
        }

        render_frame();
        if(detect_keys(DIK_SPACE)) 
			switchMode();
        // check the 'escape' key
        if(KEY_DOWN(VK_ESCAPE))
            PostMessage(hWnd, WM_DESTROY, 0, 0);

        while ((GetTickCount() - starting_point) < 25);
    }

    // clean up DirectX and COM
    cleanD3D();
    cleanDInput();
    return msg.wParam;
}


// this is the main message handler for the program
LRESULT CALLBACK WindowProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    switch(message)
    {
        case WM_DESTROY:
            {
                PostQuitMessage(0);
                return 0;
            } break;
    }

    return DefWindowProc (hWnd, message, wParam, lParam);
}


// this function initializes and prepares Direct3D for use
void initD3D(HWND hWnd)
{
    d3d = Direct3DCreate9(D3D_SDK_VERSION); // create the Direct3D interface

    D3DPRESENT_PARAMETERS d3dpp; // create a struct to hold various device information

    ZeroMemory(&d3dpp, sizeof(d3dpp));    // clear out the struct for use
    d3dpp.Windowed = FALSE;    // program fullscreen, not windowed
    d3dpp.SwapEffect = D3DSWAPEFFECT_DISCARD;    // discard old frames
    d3dpp.hDeviceWindow = hWnd;    // set the window to be used by Direct3D
    d3dpp.BackBufferFormat = D3DFMT_X8R8G8B8;    // set the back buffer format to 32-bit
    d3dpp.BackBufferWidth = SCREEN_WIDTH;    // set the width of the buffer
    d3dpp.BackBufferHeight = SCREEN_HEIGHT;    // set the height of the buffer
    d3dpp.EnableAutoDepthStencil = TRUE;
    d3dpp.AutoDepthStencilFormat = D3DFMT_D16;
     // create a device class using this information and the info from the d3dpp stuct
    d3d->CreateDevice(D3DADAPTER_DEFAULT,
                      D3DDEVTYPE_HAL,
                      hWnd,
                      D3DCREATE_SOFTWARE_VERTEXPROCESSING,
                      &d3dpp,
                      &d3ddev);
	
	D3DXIMAGE_INFO d3dxImageInfo;

	D3DXCreateTextureFromFileEx(d3ddev, L"pacman.bmp", 
		                         335, 60,
								 1, 
		                         D3DPOOL_DEFAULT,
                                 D3DFMT_UNKNOWN,
                                 D3DPOOL_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DCOLOR_COLORVALUE(0.0f,0.0f,0.0f,1.0f),
                                 &d3dxImageInfo,
                                 NULL,
                                 &PacTexture);
    D3DXIMAGE_INFO d3dxImageInfo2;
  
	D3DXCreateTextureFromFileEx(d3ddev, L"PacBack.bmp", 
		                         640, 480,
								 1, 
		                         D3DPOOL_DEFAULT,
                                 D3DFMT_UNKNOWN,
                                 D3DPOOL_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DCOLOR_COLORVALUE(0.0f,0.0f,0.0f,1.0f),
                                 &d3dxImageInfo2,
                                 NULL,
                                 &BackTexture);
	d3ddev->CreateDepthStencilSurface(SCREEN_WIDTH,    // the z-buffer width
                                  SCREEN_HEIGHT,    // the z-buffer height
                                  D3DFMT_D16,    // 16-bit pixel format for the z-buffer
                                  D3DMULTISAMPLE_NONE,    // no multisampling
                                  0,    // no multisampling quality
                                  TRUE,    // discard old buffer data
                                  &z_buffer,    // the address of the buffer
                                  NULL);    // reserved...we don't use this.
								  
    d3ddev->SetRenderState(D3DRS_ZENABLE, TRUE);
	d3ddev->SetRenderState(D3DRS_LIGHTING, FALSE);
	init_graphics();    
	D3DXCreateSprite(d3ddev, &PacSprite);
	
    return;
}


// this is the function used to render a single frame
void render_frame(void)
{
    // clear the window to a deep blue
    d3ddev->Clear(0, NULL, D3DCLEAR_TARGET, D3DCOLOR_XRGB(0, 40, 100), 1.0f, 0);
    d3ddev->Clear(0, NULL, D3DCLEAR_ZBUFFER, D3DCOLOR_XRGB(0, 0, 0), 1.0f, 0);
    d3ddev->BeginScene();    // begins the 3D scene
    draw_background();
    PacSprite->Begin(D3DXSPRITE_ALPHABLEND);
   
    setLogic();
    movementLogic();
	TranslationLogic();
	switchPacPics();
	D3DXVECTOR3 vPosition(posX, posY, posZ);

    PacSprite->Draw(PacTexture, &spriteType, NULL, &vPosition, D3DCOLOR_COLORVALUE(1.0f,1.0f,1.0f,1.0f));
    

	PacSprite->End();
    
    d3ddev->EndScene();    // ends the 3D scene

    d3ddev->Present(NULL, NULL, NULL, NULL);   // displays the created frame on the screen

    return;
}


// this is the function that cleans up Direct3D and COM
void cleanD3D(void)
{
    SAFE_RELEASE(d3ddev); // close and release the 3D device
    SAFE_RELEASE(d3d); // close and release Direct3D
    SAFE_RELEASE(PacSprite);
	
	//SAFE_RELEASE(PacTexture);
	//SAFE_RELEASE(BackTexture);
	SAFE_RELEASE(z_buffer);
	
    return;
}
void initDInput(HINSTANCE hInstance, HWND hWnd)
{
    // create the DirectInput interface
    DirectInput8Create(hInstance,    // the handle to the application
                       DIRECTINPUT_VERSION,    // the compatible version
                       IID_IDirectInput8,    // the DirectInput interface version
                       (void**)&din,    // the pointer to the interface
                       NULL);    // COM stuff, so we'll set it to NULL

    // create the keyboard device
    din->CreateDevice(GUID_SysKeyboard,    // the default keyboard ID being used
                      &dinkeyboard,    // the pointer to the device interface
                      NULL);    // COM stuff, so we'll set it to NULL

    dinkeyboard->SetDataFormat(&c_dfDIKeyboard); // set the data format to keyboard format

    // set the control you will have over the keyboard
    dinkeyboard->SetCooperativeLevel(hWnd,
                                     DISCL_NONEXCLUSIVE | DISCL_BACKGROUND);

      return;    // return to WinMain()
}
bool detect_keys(BYTE DIKVal)
{
    static BYTE keystate[256];    // create a static storage for the key-states

    dinkeyboard->Acquire();    // get access if we don't have it already

    dinkeyboard->GetDeviceState(256, (LPVOID)keystate);    // fill keystate with values

    return (keystate[DIKVal] & 0x80);    // if the 'A' key was pressed...
}
void cleanDInput(void)
{
    dinkeyboard->Unacquire();    // make sure the keyboard is unacquired
    SAFE_RELEASE(din);    // close DirectInput before exiting

    return;
}
void switchMode(void)
{
	if(fullscreen == true)
	{
PacSprite->OnLostDevice();
SAFE_RELEASE(PacTexture);
SAFE_RELEASE(BackTexture);
SAFE_RELEASE(t_buffer);
D3DPRESENT_PARAMETERS d3dpp; // create a struct to hold various device information
    ZeroMemory(&d3dpp, sizeof(d3dpp));    // clear out the struct for use
    d3dpp.Windowed = TRUE;    // program fullscreen, not windowed
    d3dpp.SwapEffect = D3DSWAPEFFECT_DISCARD;    // discard old frames
    d3dpp.hDeviceWindow = hWnd;    // set the window to be used by Direct3D
    d3dpp.BackBufferFormat = D3DFMT_X8R8G8B8;    // set the back buffer format to 32-bit
    d3dpp.BackBufferWidth = SCREEN_WIDTH;    // set the width of the buffer
    d3dpp.BackBufferHeight = SCREEN_HEIGHT;    // set the height of the buffer
    d3dpp.EnableAutoDepthStencil = TRUE;
    d3dpp.AutoDepthStencilFormat = D3DFMT_D16;
	d3ddev->Reset(&d3dpp);
PacSprite->OnResetDevice();
D3DXIMAGE_INFO d3dxImageInfo;

	D3DXCreateTextureFromFileEx(d3ddev, L"pacman.bmp", 
		                         335, 60,
								 1, 
		                         D3DPOOL_DEFAULT,
                                 D3DFMT_UNKNOWN,
                                 D3DPOOL_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DCOLOR_COLORVALUE(0.0f,0.0f,0.0f,1.0f),
                                 &d3dxImageInfo,
                                 NULL,
                                 &PacTexture);
	
 D3DXIMAGE_INFO d3dxImageInfo2;

	D3DXCreateTextureFromFileEx(d3ddev, L"PacBack.bmp", 
		                         640, 480,
								 1, 
		                         D3DPOOL_DEFAULT,
                                 D3DFMT_UNKNOWN,
                                 D3DPOOL_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DCOLOR_COLORVALUE(0.0f,0.0f,0.0f,1.0f),
                                 &d3dxImageInfo2,
                                 NULL,
                                 &BackTexture);
d3ddev->CreateVertexBuffer(4*sizeof(CUSTOMVERTEX),
                               0,
                               CUSTOMFVF,
                               D3DPOOL_MANAGED,
                               &t_buffer,
                               NULL);
VOID* pVoid;    // a void pointer

    // lock t_buffer and load the vertices into it
    t_buffer->Lock(0, 0, (void**)&pVoid, 0);
    memcpy(pVoid, t_vert, sizeof(t_vert));
    t_buffer->Unlock();
fullscreen = false;
}
	else
	{
PacSprite->OnLostDevice();

SAFE_RELEASE(PacTexture);
SAFE_RELEASE(BackTexture);
SAFE_RELEASE(t_buffer);
 D3DPRESENT_PARAMETERS d3dpp; // create a struct to hold various device information

    ZeroMemory(&d3dpp, sizeof(d3dpp));    // clear out the struct for use
    d3dpp.Windowed = FALSE;    // program fullscreen, not windowed
    d3dpp.SwapEffect = D3DSWAPEFFECT_DISCARD;    // discard old frames
    d3dpp.hDeviceWindow = hWnd;    // set the window to be used by Direct3D
    d3dpp.BackBufferFormat = D3DFMT_X8R8G8B8;    // set the back buffer format to 32-bit
    d3dpp.BackBufferWidth = SCREEN_WIDTH;    // set the width of the buffer
    d3dpp.BackBufferHeight = SCREEN_HEIGHT;    // set the height of the buffer
d3ddev->Reset(&d3dpp);
PacSprite->OnResetDevice();

D3DXIMAGE_INFO d3dxImageInfo;

	D3DXCreateTextureFromFileEx(d3ddev, L"pacman.bmp", 
		                         335, 60,
								 1, 
		                         D3DPOOL_DEFAULT,
                                 D3DFMT_UNKNOWN,
                                 D3DPOOL_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DCOLOR_COLORVALUE(0.0f,0.0f,0.0f,1.0f),
                                 &d3dxImageInfo,
                                 NULL,
                                 &PacTexture);
	D3DXIMAGE_INFO d3dxImageInfo2;

	D3DXCreateTextureFromFileEx(d3ddev, L"PacBack.bmp", 
		                         640, 480,
								 1, 
		                         D3DPOOL_DEFAULT,
                                 D3DFMT_UNKNOWN,
                                 D3DPOOL_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DX_DEFAULT,
                                 D3DCOLOR_COLORVALUE(0.0f,0.0f,0.0f,1.0f),
                                 &d3dxImageInfo2,
                                 NULL,
                                 &BackTexture);

	d3ddev->CreateVertexBuffer(4*sizeof(CUSTOMVERTEX),
                               0,
                               CUSTOMFVF,
                               D3DPOOL_MANAGED,
                               &t_buffer,
                               NULL);

    VOID* pVoid;    // a void pointer

    // lock t_buffer and load the vertices into it
    t_buffer->Lock(0, 0, (void**)&pVoid, 0);
    memcpy(pVoid, t_vert, sizeof(t_vert));
    t_buffer->Unlock();
	fullscreen = true;
	}

	DWORD dwstyle = fullscreen ? WS_POPUP : WS_OVERLAPPEDWINDOW;
SetWindowLong(hWnd, GWL_STYLE, dwstyle);
SetWindowPos(hWnd, NULL, 0, 0, 0, 0,SWP_NOSIZE | SWP_NOZORDER | SWP_FRAMECHANGED);

}
void setLogic(void)
{
 if (firstTime == true)
	{
	posX = 200.0f;
	posY = 300.0f;
	posZ = 1.0f;
	 movingRight = false;
	movingLeft = false;
	movingUp = false;
	movingDown = false;
	firstTime = false;
	speed = 3.0f;
	}
   
if(detect_keys(DIK_LEFT))
	{
    movingRight = false;
	movingLeft = true;
	movingUp = false;
	movingDown = false;
    
	}
  else if(detect_keys(DIK_RIGHT))
	{
    movingRight = true;
	movingLeft = false;
	movingUp = false;
	movingDown = false;
	}
  else if(detect_keys(DIK_UP))
	{
     movingRight = false;
	movingLeft = false;
	movingUp = true;
	movingDown = false;
	}
  else if(detect_keys(DIK_DOWN))
	{
    movingRight = false;
	movingLeft = false;
	movingUp = false;
	movingDown = true;
	}
}
void movementLogic(void)
{
if(movingRight == true)
	{
posX += speed;
	}
	else if (movingLeft == true)
	{
  posX -= speed;
	}
	else if (movingUp == true)
	{
    posY -= speed;
	}
	else if (movingDown == true)
	{
    posY += speed;
	}
	
}
void TranslationLogic(void)
{

  if (posX < -70.0f)
  {
	posX = SCREEN_WIDTH;
  }
  else if (posX > SCREEN_WIDTH)
  {
    posX = -70.0f;
  }
  else if (posY < -70.0f)
  {
   posY = SCREEN_HEIGHT;
  }
  else if (posY > SCREEN_HEIGHT)
  {
  posY = -70.0f;
  }
}
void switchPacPics(void)
{
    if (movingRight == true)
	{
		spriteType.left = 0;
		spriteType.right = 67;
		spriteType.top = 0;
		spriteType.bottom = 60;
    }
	else if (movingLeft == true)
	{
		spriteType.left = 67;
		spriteType.right = 134;
		spriteType.top = 0;
		spriteType.bottom = 60;

	}
	else if (movingUp == true)
	{
		spriteType.left = 134;
		spriteType.right = 201;
		spriteType.top = 0;
		spriteType.bottom = 60;

	}
	else if (movingDown == true)
	{
		spriteType.left = 201;
		spriteType.right = 268;
		spriteType.top = 0;
		spriteType.bottom = 60;
   }
	else {
		spriteType.left = 268;
		spriteType.right = 335;
		spriteType.top = 0;
		spriteType.bottom = 60;
    
	}
}
void init_graphics(void)
{

    // create a vertex buffer interface called t_buffer
    d3ddev->CreateVertexBuffer(4*sizeof(CUSTOMVERTEX),
                               0,
                               CUSTOMFVF,
                               D3DPOOL_MANAGED,
                               &t_buffer,
                               NULL);

    VOID* pVoid;    // a void pointer

    // lock t_buffer and load the vertices into it
    t_buffer->Lock(0, 0, (void**)&pVoid, 0);
    memcpy(pVoid, t_vert, sizeof(t_vert));
    t_buffer->Unlock();

    return;
}
void draw_background(void){
d3ddev->SetFVF(CUSTOMFVF);

d3ddev->SetStreamSource(0, t_buffer, 0, sizeof(CUSTOMVERTEX));
d3ddev->DrawPrimitive(D3DPT_TRIANGLELIST, 0, 2);
}