Added 0.030 of PicoDrive and moved license files into root

[cyclone68000.git] / PicoDrive / WinMain.cpp

\r
#include "stdafx.h"\r
#include <stdarg.h>\r
\r
static FILE *DebugFile=NULL;\r
int Main3800=0;\r
int WINAPI WinMain(HINSTANCE,HINSTANCE,LPTSTR,int)\r
{\r
  MSG msg; int ret=0;\r
  TCHAR device[260];\r
\r
  memset(&msg,0,sizeof(msg));\r
  memset(device,0,sizeof(device));\r
\r
  // Check if this program is running already:\r
  FrameWnd=FindWindow(APP_TITLE,NULL);\r
  if (FrameWnd!=NULL) { SetForegroundWindow(FrameWnd); return 0; }\r
\r
  DeleteFile(L"zout.txt");\r
\r
  SystemParametersInfo(SPI_GETOEMINFO,sizeof(device)>>1,device,0);\r
  if (_wcsicmp(device,L"compaq ipaq h3800")==0) Main3800=1;\r
\r
  FrameInit();\r
\r
  ConfigInit();\r
  ConfigLoad();\r
\r
  WaveRate=44100; WaveLen=735;\r
  WaveInit();\r
\r
  for(;;)\r
  {\r
    ret=PeekMessage(&msg,NULL,0,0,PM_REMOVE);\r
    if (ret)\r
    {\r
      if (msg.message==WM_QUIT) break;\r
      TranslateMessage(&msg);\r
      DispatchMessage(&msg);\r
    }\r
    else\r
    {\r
      EmulateFrame();\r
      //WaveUpdate();\r
      Sleep(1);\r
    }\r
  }\r
\r
  WaveExit();\r
  EmulateExit();\r
\r
  ConfigSave();\r
\r
  DestroyWindow(FrameWnd);\r
\r
  if (DebugFile) fclose(DebugFile);\r
  DebugFile=NULL;\r
  return 0;\r
}\r
\r
extern "C" int dprintf(char *Format, ...)\r
{\r
  va_list VaList=NULL;\r
  va_start(VaList,Format);\r
\r
  if (DebugFile==NULL) DebugFile=fopen("zout.txt","wt");\r
  if (DebugFile) vfprintf(DebugFile,Format,VaList);\r
\r
  va_end(VaList);\r
  return 0;\r
}\r