#define D3D_DEBUG_INFO                          //Enable enhanced D3D debugging in debug mode

#define _CRTDBG_MAP_ALLOC                       //Enable memory leak detection

 

#if defined (DEBUG) | defined (_DEBUG)         //If debug build is used

   #include <stdlib.h>

   #include <crtdbg.h>                          //Include declaration for _CrtSetDbgFlag

#endif

// Add general-purpose memory leak detection for debug builds

 

#if defined (DEBUG) | defined (_DEBUG)         //If debug version is used

   _CrtSetDbgFlag (_CRTDBG_ALLOC_MEM_DF | _CRTDBG_LEAK_CHECK_DF); //Set debug flags

#endif

// The PlayAnimation function below plays an animation pointed by g_pAnim

// until the end of animation. The function uses windows multimedia and installs

// a custom MMIO procedure for reading the AVI file from the pointer in memory.

 

void FX_PlayAnimation (void)

{

MCIERROR MCIErr;                                //Result returned from play

LPMMIOPROC lpMMIOProc;                          //Pointer to the custom installed MMIO procedure

char szMCICommand[100];                        //MCI command string

 

if (g_pAnim==NULL) return;                     //Check for NULL pointer

 

// Prepare the window handle command, which have to include the window handle that

// we redirect video output to. By default MCI opens a window of it own, but I can't

// manage to play the animation in fullscreen in it.

 

sprintf_s ((char*)&szMCICommand,_countof (szMCICommand),

   "window test handle %d\0",Init.hwnd);

 

lpMMIOProc=mmioInstallIOProc                    //Install a custom MMIO procedure

   (mmioFOURCC ('Z','Y','K',' '),               //Four character code for installed procedure

   (LPMMIOPROC)FX_AnimIO,                       //Pointer to callback procedure

   MMIOFLAGS);                                 //Flags for installing the procedure

 

if (lpMMIOProc==NULL)                           //If custom MMIO procedure install failed

   AppError (10,0);                             //Call error function

 

MCIErr=mciSendString                           //Send an open "file" call to the avi file

   ((LPCSTR)"open test.ZYK+ type avivideo alias test\0", //Open with custom procedure with alias

   NULL,                                       //No buffer with returning info is needed

   0,                                          //Buffersize for return buffer

   NULL);                                       //No callback is needed

 

if (MCIErr) AppError (11,0);                    //Call error function if failed

 

MCIErr=mciSendString                           //Send a window command

   ((LPCSTR)&szMCICommand,                     //Window command with HWND handle

   NULL,                                       //No buffer with returning info is needed

   0,                                          //Buffersize for return buffer

   NULL);                                       //No callback is needed

 

if (MCIErr) AppError (48,0);                    //Call error function if failed

 

SetCursor (NULL);                              //Remove mouse cursor from animation window

 

MCIErr=mciSendString                           //Send a cue command

   ((LPCSTR)"cue test output\0",               //Send a cue command to prepare output

   NULL,                                       //No return buffer with returning info is needed

   0,                                          //Buffer size for return buffer

   NULL);                                       //No callback is needed

 

if (MCIErr) AppError (61,0);                    //Call error function if failed

 

MCIErr=mciSendString                           //Send a play command to the opened avi "file"

   ((LPCSTR)"play test wait\0",                 //Play command, wait until finished. Fullscreen?

   NULL,                                       //No buffer with returning info is needed

   0,                                          //Buffersize for return buffer

   NULL);                                       //No callback is needed

 

if (MCIErr) AppError (13,0);                    //Call error function if failed

 

MCIErr=mciSendString                           //Send close command to the avi "file"

   ((LPCSTR)"close test\0",                     //Close command

   NULL,                                       //No buffer with returning info is needed

   0,                                          //Buffersize for return buffer

   NULL);                                       //No callback is needed

 

if (MCIErr) AppError (16,0);                    //Call error function if failed

 

lpMMIOProc=mmioInstallIOProc                    //Remove the custom MMIO procedure

   (mmioFOURCC ('Z','Y','K',' '),               //Four character code for installed procedure

   NULL,                                       //Pointer is NULL, we are removing procedure

   MMIO_REMOVEPROC);                           //Flags for removing procedure

 

if (lpMMIOProc==NULL)                           //If custom MMIO procedure remove failed

   AppError (17,0);                             //Call error function

}

// The function below is the callback routine for reading

// AVI files from memory through Windows multimedia. The

// normal Windows Multimedia functions are simulated, and

// all operations with the specified type are handled through

// this callback routine.

 

LRESULT CALLBACK FX_AnimIO (

   LPMMIOINFO lpMMIOInfo,                       //MMIO structure

   UINT uiMessage,                              //MMIO command to process by callback

   LPARAM lParam1,                              //Parameter 1

   LPARAM lParam2)                              //Parameter 2

{

static bool bAlreadyOpen=FALSE;                 //Keep track if already opened

 

switch (uiMessage)                              //Check what type of operation to do

   {

   case MMIOM_OPEN:                             //Open avi memory file

      if (bAlreadyOpen) return 0;               //Check if already opened

      bAlreadyOpen=TRUE;                        //Set open flag

      if (lpMMIOInfo==NULL) return -1;         //Check for NULL pointer

      lpMMIOInfo->lDiskOffset=0;               //Set offset to start of "file"

      return 0;                                 //We are done, return

   break;

 

   case MMIOM_READ:                             //Reading avi "file"

      memcpy ((void *)lParam1,g_pAnim+lpMMIOInfo->lDiskOffset,lParam2); //Copy the data

      lpMMIOInfo->lDiskOffset=lpMMIOInfo->lDiskOffset+lParam2;         //Set new disk offset

      return (lParam2);                        //We are done, return

   break;

 

   case MMIOM_CLOSE:                           //Closing the "file"

      return 0;                                 //Return to caller

   break;

 

   case MMIOM_SEEK:                             //Seek within the "file"

      switch (lParam2)                          //Check what type of seek

         {

         if (lpMMIOInfo==NULL) return -1;      //Check for NULL pointer

 

         case SEEK_SET:                        //Seek set position

            lpMMIOInfo->lDiskOffset=(long)lParam1; //Set new position

         break;

 

         case SEEK_CUR:                        //Seek from current position

            lpMMIOInfo->lDiskOffset+=(long)lParam1; //Set new position

         break;

 

         case SEEK_END:                        //Seek to end

            lpMMIOInfo->lDiskOffset=((long)dwAnimSize)-lParam1-1;

         break;

         }

 

      if (lpMMIOInfo==NULL) return -1;         //Check for NULL pointer

      return lpMMIOInfo->lDiskOffset;           //Return the new offset

   break;

 

   default: AppError (22,0);                    //Call error function, unknown command

   }

 

return -1;                                      //Return error if reached here

}

// Flags for installing custom MMIO procedure:

#define MMIOFLAGS   MMIO_INSTALLPROC | MMIO_GLOBALPROC

// The Timer_QuerySpeed function checks how many timer ticks the

// computer makes per second. It is stored in the timing structure

// and is used for general game timing.

 

void Timer_QuerySpeed (void)

{

BOOL bSupported;                                //Set if the hardware supports a QueryPerformanceFrequency call

 

bSupported=QueryPerformanceFrequency ((LARGE_INTEGER*)&(Timing.liCountPerSec)); //Query speed

 

if (!bSupported)                                //The hardware didn't support a QueryPerformanceFrequency call

   AppError (51,0);                             //Call error function

 

Timing.fSecsPerCount=1.0f/(float)Timing.liCountPerSec; //Calculate seconds per timer tick

}

Fonts.hMainFont=AddFontMemResourceEx (         //Add font resource from memory to the system

   pFont,                                      //Pointer to font resource in memory

   Fonts.dwMainFontSize,                       //Font size of font to add

   0,                                          //Reserved, must be zero

   &dwNumFonts);                               //Pointer to number of fonts to install

// The cKeytable is a string table to keep track of what string to write on screen

// when the user presses a key with the corresponding virtal key code value when

// choosing keys for controls. This means that virtual keycode x is described by

// cKeytable[x] string.

 

char cKeytable[256][25]={

   "\0", "LEFT MOUSE BUTTON\0", "RIGHT MOUSE BUTTON\0", "\0", "MIDDLE MOUSE BUTTON\0",

   "X1 MOUSE BUTTON\0", "X2 MOUSE BUTTON\0", "\0", "BACKSPACE\0", "TAB\0",

   "\0", "\0", "CLEAR\0", "ENTER\0", "\0", "\0", "SHIFT\0", "CTRL\0", "ALT\0",

   "PAUSE\0", "CAPS LOCK\0", "\0", "\0", "\0", "\0", "\0", "\0", "ESCAPE\0", "\0",

   "\0", "\0", "\0", "SPACEBAR\0", "PAGE UP\0", "PAGE DOWN\0", "END\0", "HOME\0",

   "LEFT ARROW\0", "UP ARROW\0", "RIGHT ARROW\0", "DOWN ARROW\0", "SELECT\0", "PRINT\0",

   "EXECUTE\0", "PRINT SCREEN\0", "INSERT\0", "DELETE\0", "HELP\0", "0\0", "1\0", "2\0",

   "3\0", "4\0", "5\0", "6\0", "7\0", "8\0", "9\0", "\0", "\0", "\0", "\0", "\0", "\0",

   "\0", "A\0", "B\0", "C\0", "D\0", "E\0", "F\0", "G\0", "H\0", "I\0", "J\0", "K\0",

   "L\0", "M\0", "N\0", "O\0", "P\0", "Q\0", "R\0", "S\0", "T\0", "U\0", "V\0", "W\0",

   "X\0", "Y\0", "Z\0", "LEFT WIN KEY\0", "RIGHT WIN KEY\0", "APPLICATIONS KEY", "\0",

   "COMPUTER SLEEP\0", "KEYPAD 0\0", "KEYPAD 1\0", "KEYPAD 2\0", "KEYPAD 3\0", "KEYPAD 4\0",

   "KEYPAD 5\0", "KEYPAD 6\0", "KEYPAD 7\0", "KEYPAD 8\0", "KEYPAD 9\0", "MULTIPLY\0",

   "ADD\0", "SEPARATOR\0", "SUBTRACT\0", "DECIMAL\0", "DIVIDE\0", "F1\0", "F2\0", "F3\0",

   "F4\0", "F5\0", "F6\0", "F7\0", "F8\0", "F9\0", "F10\0", "F11\0", "F12\0", "F13\0",

   "F14\0", "F15\0", "F16\0", "F17\0", "F18\0", "F19\0", "F20\0", "F21\0", "F22\0",

   "F23\0", "F24\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "NUM LOCK\0",

   "SCROLL LOCK\0", "OEM SPECIFIC\0", "OEM SPECIFIC\0", "OEM SPECIFIC\0", "OEM SPECIFIC\0",

   "OEM SPECIFIC\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0",

   "LEFT SHIFT\0", "RIGHT SHIFT\0", "LEFT CONTROL\0", "RIGHT CONTROL\0", "LEFT MENU\0",

   "RIGHT MENU\0", "BROWSER BACK\0", "BROWSER FORWARD\0", "BROWSER REFRESH\0",

   "BROWSER STOP\0", "BROWSER SEARCH\0", "BROWSER FAVOURITES\0", "BROWSER HOME\0",

   "VOLUME MUTE\0", "VOLUME DOWN\0", "VOLUME UP\0", "NEXT TRACK\0", "PREVIOUS TRACK\0",

   "STOP MEDIA", "PLAY PAUSE MEDIA\0", "START MAIL\0", "SELECT MEDIA\0", "START APP 1",

   "START APP 2", "\0", "\0", "OEM 1\0", "PLUS\0", "COMMA\0", "MINUS\0", "PERIOD\0",

   "OEM 2\0", "OEM 3\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0",

   "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0",

   "\0", "\0", "OEM 4\0", "OEM 5\0", "OEM 6\0", "OEM 7\0", "OEM 8\0", "\0",

   "OEM SPECIFIC\0", "OEM 102\0", "OEM SPECIFIC\0", "OEM SPECIFIC\0", "PROCESS\0",

   "OEM SPECIFIC\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0", "\0",

   "\0", "\0", "\0", "\0", "ATTN\0", "CRSEL\0", "EXSEL\0", "ERASE EOF\0", "PLAY\0",

   "ZOOM\0", "\0", "PA1\0", "CLEAR\0", "\0" };

// The virtual keys for volume control doesn't seem to be defined,

// so I'm adding them manually here.

 

#define VK_VOLUME_MUTE     0xAD                 //Virtual keycode for sound mute

#define VK_VOLUME_UP       0xAF                 //Virtual keycode for volume up

#define VK_VOLUME_DOWN     0xAE                 //Virtual keycode for volume down

MSG msg;                                       //Windows message structure

 

PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE);   //Read message in queue without removing it

 

while (msg.message!=WM_QUIT)                    //Process messages until we quit

   {

   while (PeekMessage (&msg, NULL, 0, 0, PM_REMOVE)) //While messages in queue, first remove

      {

      TranslateMessage (&msg);                  //Then translate the message...

      DispatchMessage (&msg);                   //And dispatch it to the callback function

      }

 

   // Here we do our game stuff

   }