// PhilVaz Bare Game Loop Test 1
// Copied from Lamothe Tricks of the Windows Game Programming Gurus
// DEMO 2_4.cpp in Lamothe with some format changes
// Feb 28, 2003

// INCLUDES ///////////////////////////////////////////////

#define WIN32_LEAN_AND_MEAN

#include <windows.h>   // include all the windows headers
#include <windowsx.h>  // include useful macros
#include <stdio.h>     
#include <math.h>

// DEFINES ////////////////////////////////////////////////

// defines for windows

#define WINDOW_CLASS_NAME "WINCLASS1"

#define WINDOW_WIDTH   640   // size of game window
#define WINDOW_HEIGHT  480

// MACROS /////////////////////////////////////////////////

#define KEYDOWN(vk_code) ((GetAsyncKeyState(vk_code) & 0x8000) ? 1 : 0)
#define KEYUP(vk_code)   ((GetAsyncKeyState(vk_code) & 0x8000) ? 0 : 1)

// GLOBALS ////////////////////////////////////////////////

// FUNCTIONS //////////////////////////////////////////////

// WINPROC ////////////////////////////////////////////////

LRESULT CALLBACK WinProc(HWND hwnd, 
                         UINT msg, 
                         WPARAM wparam, 
                         LPARAM lparam)
{  // this is the main message handler of the system

   HDC         hdc; // handle to a device context
   PAINTSTRUCT ps;  // used in WM_PAINT

   switch(msg) // what is the message
   {	
      case WM_CREATE: 
      {
         // do initialization stuff here

         
         return(0); // return success
      } break;

      case WM_PAINT: 
      {
         hdc = BeginPaint(hwnd, &ps); // validate the window
         
         // you would do all your painting here
         
         EndPaint(hwnd, &ps);

         return(0); // return success
      }  break;

      case WM_DESTROY: 
      {
         PostQuitMessage(0); // kill the application, sends a WM_QUIT message 
         
         return(0); // return success
      }  break;

      default:break;

   } // end switch

// process any messages that we didn't take care of 

return (DefWindowProc(hwnd, msg, wparam, lparam));

} // end WinProc

// WINMAIN ////////////////////////////////////////////////

int WINAPI WinMain(HINSTANCE hinstance,
                   HINSTANCE hprevinstance,
                   LPSTR lpcmdline,
                   int ncmdshow)
{

   WNDCLASSEX winclass; // this will hold the class we create
   HWND hwnd;           // generic window handle
   MSG msg;             // generic message
   
   // first fill in the window class stucture

   winclass.cbSize        = sizeof(WNDCLASSEX);
   winclass.style         = CS_DBLCLKS | CS_OWNDC | 
                            CS_HREDRAW | CS_VREDRAW;
   winclass.lpfnWndProc   = WinProc;
   winclass.cbClsExtra    = 0;
   winclass.cbWndExtra    = 0;
   winclass.hInstance     = hinstance;
   winclass.hIcon         = LoadIcon(NULL, IDI_APPLICATION);
   winclass.hIconSm       = LoadIcon(NULL, IDI_APPLICATION);   
   winclass.hCursor       = LoadCursor(NULL, IDC_ARROW);
   winclass.hbrBackground = (HBRUSH)GetStockObject(BLACK_BRUSH);
   winclass.lpszMenuName  = NULL;
   winclass.lpszClassName = WINDOW_CLASS_NAME;

   // register the window class
   if (!RegisterClassEx(&winclass)) return(0);

   // create the window
   if (!(hwnd = CreateWindowEx(NULL,                 // extended style
                               WINDOW_CLASS_NAME,    // class
                               "My Basic Game Loop", // title
                               WS_OVERLAPPEDWINDOW | WS_VISIBLE,
                               0,0,           // initial game window x,y
                               WINDOW_WIDTH,  // initial game width
                               WINDOW_HEIGHT, // initial game height
                               NULL,          // handle to parent 
                               NULL,          // handle to menu
                               hinstance,     // instance of this application
                               NULL)))        // extra creation parms
   return(0);
      
   // GameInit(); goes here
   
   // enter main event loop using PeekMessage()
   // instead of GetMessage() to retrieve messages
   
   while(TRUE)
   {
      // is there a message in queue, if so get it
      if (PeekMessage(&msg,NULL,0,0,PM_REMOVE))
      { 
         // test if this is a quit
         if (msg.message == WM_QUIT) break;
      	
         // translate any accelerator keys
         TranslateMessage(&msg);

         // send the message to WinProc
         DispatchMessage(&msg);

      } // end if
    
      // main game processing goes here
      // GameMain(); or whatever your main loop is called

   } // end while
   
   // GameQuit(); goes here
   
   return(msg.wParam); // return to Windows

} // end WinMain

// GAME CODE STARTS HERE //////////////////////////////////

// END OF GAME CODE ///////////////////////////////////////