#include "HeaderIncludes.h"

#pragma once // Just in case it gets called twice somehow
#include "HeaderIncludes.h"
#include "Engine.h"

#include <windows.h>
#include <windowsx.h>

#include "Main.h"
#include "Engine.h'

#include "Engine.h"

#include "New01Main.h"
 
/*****************************************/
RPGEngine *RPGEngine::cm_pEngine = NULL;     // This is where I forgot to declare the variable
/*****************************************/
 
LRESULT CALLBACK t1f_winprocedure(HWND hwnd, UINT umsg, WPARAM upperparam, LPARAM lowerparam)
{
  return RPGEngine::ReleaseEngine()->cf_winproc(hwnd, umsg, upperparam, lowerparam);
}
 
int WINAPI WinMain(HINSTANCE hinst, HINSTANCE hprevi, LPTSTR szcmdline, int ishow)
{
  MSG msg;
  static int iTrigger = 0;
 
  if(AppInit(hinst))
  {
    if(!RPGEngine::ReleaseEngine()->InitMech(ishow))
    {
      return false;
    }
 
    while(true)
    {
      if(PeekMessage(&msg, NULL, 0,0, PM_REMOVE))
      {
        if(msg.message == WM_QUIT)
        {
          TranslateMessage(&msg);
          DispatchMessage(&msg);
          break;
        }
      }
      else
      {
        AppIterate();
        TranslateMessage(&msg);
        DispatchMessage(&msg);
      }
    }//Close while
    //return (int)msg.wParam;
    return (int)msg.wParam;
  }//Close primary if statement
  //Support function
  AppEnd();
  return true;
}//Close WinMain
 
//The constructor
RPGEngine::RPGEngine(HINSTANCE hinst, LPTSTR classname, LPTSTR classtitle, WORD wicon, WORD wiconsm, int iwidth, int iheight)
{
  cm_pEngine  = this;//&cm_oEngine;
  cm_hinst    = hinst;
  cm_hwnd     = NULL;
 
  //If there is a text string in the name copy it into class member
  if(lstrlen(classname)>0)
  {
    lstrcpy(cm_classname, classname);
  }
 
  //If there is a text string in the title copy it into the class member
  if(lstrlen(classtitle)>0)
  {
    lstrcpy(cm_classtitle, classtitle);
  }
 
  cm_wicon    = wicon;
  cm_wiconsm  = wiconsm;
  cm_iwidth   = iwidth;
  cm_iheight  = iheight;
}
 
//The destructor
RPGEngine::~RPGEngine()
{
}
 
bool RPGEngine::InitMech(int ishow)
{
  wcx.cbSize = sizeof(wcx);
  wcx.style = CS_HREDRAW | CS_VREDRAW;
  wcx.lpfnWndProc = t1f_winprocedure;
  wcx.cbClsExtra = 0;
  wcx.cbWndExtra = 0;
  wcx.hInstance = cm_hinst;
  wcx.hIcon = LoadIcon(cm_hinst, MAKEINTRESOURCE(LeakIcon()));
  wcx.hIconSm = LoadIcon(cm_hinst, MAKEINTRESOURCE(LeakIconSm()));
  wcx.hCursor = LoadCursor(NULL, IDC_ARROW);
  wcx.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
  wcx.lpszMenuName = NULL;
  wcx.lpszClassName = cm_classname;
 
  //If register fails exit
  if(!RegisterClassEx(&wcx))
  {
    return false;
  }
 
  int iWindowWidth = cm_iwidth + GetSystemMetrics(SM_CXFIXEDFRAME)*2, iWindowHeight = cm_iheight + GetSystemMetrics(SM_CYFIXEDFRAME)*2 + GetSystemMetrics(SM_CYCAPTION);
 
  if(wcx.lpszMenuName != NULL)
  {
    iWindowHeight += GetSystemMetrics(SM_CYMENU);
  }
 
  int iXWindowPos = (GetSystemMetrics(SM_CXSCREEN) - iWindowWidth)/2, iYWindowPos = (GetSystemMetrics(SM_CYSCREEN) - iWindowHeight)/2;
 
  cm_hwnd = CreateWindow(cm_classname, cm_classtitle, WS_POPUPWINDOW | WS_CAPTION | WS_MINIMIZEBOX, iXWindowPos, iYWindowPos, iWindowWidth, iWindowHeight, NULL, NULL, cm_hinst, NULL);
 
  if(!cm_hwnd)
  {
    return false;
  }
 
  ShowWindow(cm_hwnd, ishow);
  UpdateWindow(cm_hwnd);
 
  return true;
}
 
LRESULT CALLBACK RPGEngine::cf_winproc(HWND hwnd, UINT umsg, WPARAM upperparam, LPARAM lowerparam)
{
  switch(umsg)
  {
    case WM_CREATE:
      SetWindow(hwnd);
      //Support function
      AppStart(hwnd);
      return 0;
 
    case WM_ACTIVATE:
      if(upperparam != WA_INACTIVE)
        {
          return 0;
        }
 
    case WM_PAINT:
      HDC hdc;
      PAINTSTRUCT ps;
      hdc = BeginPaint(hwnd, &ps);
 
      //Support function
      AppPaint(hdc);
 
      EndPaint(hwnd, &ps);
      return 0;
 
    case WM_DESTROY:
      //Support function
      AppEnd();
      PostQuitMessage(0);
      return 0;
  }
  return DefWindowProc(hwnd, umsg, upperparam, lowerparam);
}