15eb0001 |
1 | \r |
58db92b9 |
2 | // This file is part of the PicoDrive Megadrive Emulator\r |
3 | \r |
4 | // This code is licensed under the GNU General Public License version 2.0 and the MAME License.\r |
5 | // You can choose the license that has the most advantages for you.\r |
6 | \r |
7 | // SVN repository can be found at http://code.google.com/p/cyclone68000/\r |
8 | \r |
15eb0001 |
9 | #include "stdafx.h"\r |
10 | #include <stdarg.h>\r |
11 | \r |
12 | static FILE *DebugFile=NULL;\r |
13 | int Main3800=0;\r |
14 | int WINAPI WinMain(HINSTANCE,HINSTANCE,LPTSTR,int)\r |
15 | {\r |
16 | MSG msg; int ret=0;\r |
17 | TCHAR device[260];\r |
18 | \r |
19 | memset(&msg,0,sizeof(msg));\r |
20 | memset(device,0,sizeof(device));\r |
21 | \r |
22 | // Check if this program is running already:\r |
23 | FrameWnd=FindWindow(APP_TITLE,NULL);\r |
24 | if (FrameWnd!=NULL) { SetForegroundWindow(FrameWnd); return 0; }\r |
25 | \r |
26 | DeleteFile(L"zout.txt");\r |
27 | \r |
28 | SystemParametersInfo(SPI_GETOEMINFO,sizeof(device)>>1,device,0);\r |
29 | if (_wcsicmp(device,L"compaq ipaq h3800")==0) Main3800=1;\r |
30 | \r |
31 | FrameInit();\r |
32 | \r |
33 | ConfigInit();\r |
34 | ConfigLoad();\r |
35 | \r |
36 | WaveRate=44100; WaveLen=735;\r |
37 | WaveInit();\r |
38 | \r |
39 | for(;;)\r |
40 | {\r |
41 | ret=PeekMessage(&msg,NULL,0,0,PM_REMOVE);\r |
42 | if (ret)\r |
43 | {\r |
44 | if (msg.message==WM_QUIT) break;\r |
45 | TranslateMessage(&msg);\r |
46 | DispatchMessage(&msg);\r |
47 | }\r |
48 | else\r |
49 | {\r |
50 | EmulateFrame();\r |
51 | //WaveUpdate();\r |
52 | Sleep(1);\r |
53 | }\r |
54 | }\r |
55 | \r |
56 | WaveExit();\r |
57 | EmulateExit();\r |
58 | \r |
59 | ConfigSave();\r |
60 | \r |
61 | DestroyWindow(FrameWnd);\r |
62 | \r |
63 | if (DebugFile) fclose(DebugFile);\r |
64 | DebugFile=NULL;\r |
65 | return 0;\r |
66 | }\r |
67 | \r |
68 | extern "C" int dprintf(char *Format, ...)\r |
69 | {\r |
70 | va_list VaList=NULL;\r |
71 | va_start(VaList,Format);\r |
72 | \r |
73 | if (DebugFile==NULL) DebugFile=fopen("zout.txt","wt");\r |
74 | if (DebugFile) vfprintf(DebugFile,Format,VaList);\r |
75 | \r |
76 | va_end(VaList);\r |
77 | return 0;\r |
78 | }\r |