Don't include dead code when linking program (saves 48kB)
[picodrive.git] / platform / win32 / main.c
1 #include <windows.h>\r
2 #include <commdlg.h>\r
3 #include <stdio.h>\r
4 \r
5 #include "../../pico/pico.h"\r
6 #include "../common/readpng.h"\r
7 #include "../common/config.h"\r
8 #include "../common/lprintf.h"\r
9 #include "../common/emu.h"\r
10 #include "../common/menu.h"\r
11 #include "../common/input.h"\r
12 #include "../common/plat.h"\r
13 #include "version.h"\r
14 #include "direct.h"\r
15 #include "in_vk.h"\r
16 \r
17 char *romname=NULL;\r
18 HWND FrameWnd=NULL;\r
19 RECT FrameRectMy;\r
20 RECT EmuScreenRect = { 0, 0, 320, 224 };\r
21 int lock_to_1_1 = 1;\r
22 static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;\r
23 \r
24 static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;\r
25 static HBITMAP ppad_bmp = 0;\r
26 static HBITMAP ppage_bmps[7] = { 0, };\r
27 static char rom_name[0x20*3+1];\r
28 static int main_wnd_as_pad = 0;\r
29 \r
30 static HANDLE loop_enter_event, loop_end_event;\r
31 \r
32 void error(char *text)\r
33 {\r
34   MessageBox(FrameWnd, text, "Error", 0);\r
35 }\r
36 \r
37 static void UpdateRect(void)\r
38 {\r
39   WINDOWINFO wi;\r
40   memset(&wi, 0, sizeof(wi));\r
41   wi.cbSize = sizeof(wi);\r
42   GetWindowInfo(FrameWnd, &wi);\r
43   FrameRectMy = wi.rcClient;\r
44 }\r
45 \r
46 static int extract_rom_name(char *dest, const unsigned char *src, int len)\r
47 {\r
48         char *p = dest, s_old = 0x20;\r
49         int i;\r
50 \r
51         for (i = len - 1; i >= 0; i--)\r
52         {\r
53                 if (src[i^1] != ' ') break;\r
54         }\r
55         len = i + 1;\r
56 \r
57         for (i = 0; i < len; i++)\r
58         {\r
59                 unsigned char s = src[i^1];\r
60                 if (s == 0x20 && s_old == 0x20) continue;\r
61                 else if (s >= 0x20 && s < 0x7f && s != '%')\r
62                 {\r
63                         *p++ = s;\r
64                 }\r
65                 else\r
66                 {\r
67                         sprintf(p, "%%%02x", s);\r
68                         p += 3;\r
69                 }\r
70                 s_old = s;\r
71         }\r
72         *p = 0;\r
73 \r
74         return p - dest;\r
75 }\r
76 \r
77 static void check_name_alias(const char *afname)\r
78 {\r
79   char buff[256], *var, *val;\r
80   FILE *f;\r
81   int ret;\r
82 \r
83   f = fopen(afname, "r");\r
84   if (f == NULL) return;\r
85 \r
86   while (1)\r
87   {\r
88     ret = config_get_var_val(f, buff, sizeof(buff), &var, &val);\r
89     if (ret ==  0) break;\r
90     if (ret == -1) continue;\r
91 \r
92     if (strcmp(rom_name, var) == 0) {\r
93       lprintf("rom aliased: \"%s\" -> \"%s\"\n", rom_name, val);\r
94       strncpy(rom_name, val, sizeof(rom_name));\r
95       break;\r
96     }\r
97   }\r
98   fclose(f);\r
99 }\r
100 \r
101 static HBITMAP png2hb(const char *fname, int is_480)\r
102 {\r
103   BITMAPINFOHEADER bih;\r
104   HBITMAP bmp;\r
105   void *bmem;\r
106   int ret;\r
107 \r
108   bmem = calloc(1, is_480 ? 480*240*3 : 320*240*3);\r
109   if (bmem == NULL) return NULL;\r
110   ret = readpng(bmem, fname, READPNG_24, is_480 ? 480 : 320, 240);\r
111   if (ret != 0) {\r
112     free(bmem);\r
113     return NULL;\r
114   }\r
115 \r
116   memset(&bih, 0, sizeof(bih));\r
117   bih.biSize = sizeof(bih);\r
118   bih.biWidth = is_480 ? 480 : 320;\r
119   bih.biHeight = -240;\r
120   bih.biPlanes = 1;\r
121   bih.biBitCount = 24;\r
122   bih.biCompression = BI_RGB;\r
123   bmp = CreateDIBitmap(GetDC(FrameWnd), &bih, CBM_INIT, bmem, (BITMAPINFO *)&bih, 0);\r
124   if (bmp == NULL)\r
125     lprintf("CreateDIBitmap failed with %i", GetLastError());\r
126 \r
127   free(bmem);\r
128   return bmp;\r
129 }\r
130 \r
131 static void PrepareForROM(void)\r
132 {\r
133   unsigned char *rom_data = NULL;\r
134   int i, ret, show = PicoAHW & PAHW_PICO;\r
135   \r
136   PicoGetInternal(PI_ROM, (pint_ret_t *) &rom_data);\r
137   EnableMenuItem(mmain, 2, MF_BYPOSITION|(show ? MF_ENABLED : MF_GRAYED));\r
138   ShowWindow(PicoPadWnd, show ? SW_SHOWNA : SW_HIDE);\r
139   ShowWindow(PicoSwWnd, show ? SW_SHOWNA : SW_HIDE);\r
140   CheckMenuItem(mpicohw, 1210, show ? MF_CHECKED : MF_UNCHECKED);\r
141   CheckMenuItem(mpicohw, 1211, show ? MF_CHECKED : MF_UNCHECKED);\r
142   PostMessage(FrameWnd, WM_COMMAND, 1220 + PicoPicohw.page, 0);\r
143   DrawMenuBar(FrameWnd);\r
144   InvalidateRect(PicoSwWnd, NULL, 1);\r
145 \r
146   PicoPicohw.pen_pos[0] =\r
147   PicoPicohw.pen_pos[1] = 0x8000;\r
148   in_vk_add_pl12 = 0;\r
149 \r
150   ret = extract_rom_name(rom_name, rom_data + 0x150, 0x20);\r
151   if (ret == 0)\r
152     extract_rom_name(rom_name, rom_data + 0x130, 0x20);\r
153 \r
154   if (show)\r
155   {\r
156     char path[MAX_PATH], *p;\r
157     GetModuleFileName(NULL, path, sizeof(path) - 32);\r
158     p = strrchr(path, '\\');\r
159     if (p == NULL) p = path;\r
160     else p++;\r
161     if (ppad_bmp == NULL) {\r
162       strcpy(p, "pico\\pad.png");\r
163       ppad_bmp = png2hb(path, 0);\r
164     }\r
165 \r
166     strcpy(p, "pico\\alias.txt");\r
167     check_name_alias(path);\r
168 \r
169     for (i = 0; i < 7; i++) {\r
170       if (ppage_bmps[i] != NULL) DeleteObject(ppage_bmps[i]);\r
171       sprintf(p, "pico\\%s_%i.png", rom_name, i);\r
172       ppage_bmps[i] = png2hb(path, 1);\r
173     }\r
174     // games usually don't have page 6, so just duplicate page 5.\r
175     if (ppage_bmps[6] == NULL && ppage_bmps[5] != NULL) {\r
176       sprintf(p, "pico\\%s_5.png", rom_name);\r
177       ppage_bmps[6] = png2hb(path, 1);\r
178     }\r
179   }\r
180 }\r
181 \r
182 static void LoadROM(const char *cmdpath)\r
183 {\r
184   char rompath[MAX_PATH];\r
185   int ret;\r
186 \r
187   if (cmdpath != NULL && strlen(cmdpath)) {\r
188     strcpy(rompath, cmdpath + (cmdpath[0] == '\"' ? 1 : 0));\r
189     if (rompath[strlen(rompath)-1] == '\"')\r
190       rompath[strlen(rompath)-1] = 0;\r
191   }\r
192   else {\r
193     OPENFILENAME of; ZeroMemory(&of, sizeof(of));\r
194     rompath[sizeof(rompath) - 1] = 0;\r
195     strncpy(rompath, rom_fname_loaded, sizeof(rompath) - 1);\r
196     of.lStructSize = sizeof(of);\r
197     of.lpstrFilter = "ROMs, CD images\0*.smd;*.bin;*.gen;*.zip;*.32x;*.sms;*.iso;*.cso;*.cue\0"\r
198                      "whatever\0*.*\0";\r
199     of.lpstrFile = rompath;\r
200     of.nMaxFile = MAX_PATH;\r
201     of.Flags = OFN_FILEMUSTEXIST|OFN_HIDEREADONLY;\r
202     of.hwndOwner = FrameWnd;\r
203     if (!GetOpenFileName(&of))\r
204       return;\r
205   }\r
206 \r
207   if (engineState == PGS_Running) {\r
208     engineState = PGS_Paused;\r
209     WaitForSingleObject(loop_end_event, 5000);\r
210   }\r
211 \r
212   ret = emu_reload_rom(rompath);\r
213   if (ret == 0) {\r
214     extern char menu_error_msg[]; // HACK..\r
215     error(menu_error_msg);\r
216     return;\r
217   }\r
218 \r
219   PrepareForROM();\r
220   engineState = PGS_Running;\r
221   SetEvent(loop_enter_event);\r
222 }\r
223 \r
224 static const int rect_widths[4]  = { 320, 256, 640, 512 };\r
225 static const int rect_heights[4] = { 224, 224, 448, 448 };\r
226 \r
227 // Window proc for the frame window:\r
228 static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
229 {\r
230   POINT pt;\r
231   RECT rc;\r
232   int i;\r
233   switch (msg)\r
234   {\r
235     case WM_CLOSE:\r
236       PostQuitMessage(0);\r
237       return 0;\r
238     case WM_DESTROY:\r
239       FrameWnd = NULL; // Blank the handle\r
240       break;\r
241     case WM_SIZE:\r
242     case WM_MOVE:\r
243     case WM_SIZING:\r
244       UpdateRect();\r
245       if (lock_to_1_1 && FrameRectMy.right - FrameRectMy.left != 0 &&\r
246           (FrameRectMy.right - FrameRectMy.left != EmuScreenRect.right - EmuScreenRect.left ||\r
247            FrameRectMy.bottom - FrameRectMy.top != EmuScreenRect.bottom - EmuScreenRect.top)) {\r
248         lock_to_1_1 = 0;\r
249         CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);\r
250       }\r
251       break;\r
252     case WM_COMMAND:\r
253       switch (LOWORD(wparam))\r
254       {\r
255         case 1000:\r
256           LoadROM(NULL);\r
257           break;\r
258         case 1001:\r
259           emu_reset_game();\r
260           return 0;\r
261         case 1002:\r
262           PostQuitMessage(0);\r
263           return 0;\r
264         case 1100:\r
265         case 1101:\r
266         case 1102:\r
267         case 1103:\r
268 //          LoopWait=1; // another sync hack\r
269 //          for (i = 0; !LoopWaiting && i < 10; i++) Sleep(10);\r
270           FrameRectMy.right  = FrameRectMy.left + rect_widths[wparam&3];\r
271           FrameRectMy.bottom = FrameRectMy.top  + rect_heights[wparam&3];\r
272           AdjustWindowRect(&FrameRectMy, WS_OVERLAPPEDWINDOW, 1);\r
273           MoveWindow(hwnd, FrameRectMy.left, FrameRectMy.top,\r
274             FrameRectMy.right-FrameRectMy.left, FrameRectMy.bottom-FrameRectMy.top, 1);\r
275           UpdateRect();\r
276           lock_to_1_1 = 0;\r
277           CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);\r
278 //          if (rom_loaded) LoopWait=0;\r
279           return 0;\r
280         case 1104:\r
281           lock_to_1_1 = !lock_to_1_1;\r
282           CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);\r
283           /* FALLTHROUGH */\r
284         case 2000: // EmuScreenRect/FrameRectMy sync request\r
285           if (!lock_to_1_1)\r
286             return 0;\r
287           FrameRectMy.right  = FrameRectMy.left + (EmuScreenRect.right - EmuScreenRect.left);\r
288           FrameRectMy.bottom = FrameRectMy.top  + (EmuScreenRect.bottom - EmuScreenRect.top);\r
289           AdjustWindowRect(&FrameRectMy, WS_OVERLAPPEDWINDOW, 1);\r
290           MoveWindow(hwnd, FrameRectMy.left, FrameRectMy.top,\r
291             FrameRectMy.right-FrameRectMy.left, FrameRectMy.bottom-FrameRectMy.top, 1);\r
292           UpdateRect();\r
293           return 0;\r
294         case 1210:\r
295         case 1211:\r
296           i = IsWindowVisible((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd);\r
297           i = !i;\r
298           ShowWindow((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd, i ? SW_SHOWNA : SW_HIDE);\r
299           CheckMenuItem(mpicohw, LOWORD(wparam), i ? MF_CHECKED : MF_UNCHECKED);\r
300           return 0;\r
301         case 1212:\r
302           main_wnd_as_pad = !main_wnd_as_pad;\r
303           CheckMenuItem(mpicohw, 1212, main_wnd_as_pad ? MF_CHECKED : MF_UNCHECKED);\r
304           return 0;\r
305         case 1220:\r
306         case 1221:\r
307         case 1222:\r
308         case 1223:\r
309         case 1224:\r
310         case 1225:\r
311         case 1226:\r
312           PicoPicohw.page = LOWORD(wparam) % 10;\r
313           for (i = 0; i < 7; i++)\r
314             CheckMenuItem(mpicohw, 1220 + i, MF_UNCHECKED);\r
315           CheckMenuItem(mpicohw, 1220 + PicoPicohw.page, MF_CHECKED);\r
316           InvalidateRect(PicoSwWnd, NULL, 1);\r
317           return 0;\r
318         case 1300:\r
319           MessageBox(FrameWnd, plat_get_credits(), "About", 0);\r
320           return 0;\r
321       }\r
322       break;\r
323     case WM_TIMER:\r
324       GetCursorPos(&pt);\r
325       GetWindowRect(PicoSwWnd, &rc);\r
326       if (PtInRect(&rc, pt)) break;\r
327       GetWindowRect(PicoPadWnd, &rc);\r
328       if (PtInRect(&rc, pt)) break;\r
329       PicoPicohw.pen_pos[0] |= 0x8000;\r
330       PicoPicohw.pen_pos[1] |= 0x8000;\r
331       in_vk_add_pl12 = 0;\r
332       break;\r
333     case WM_LBUTTONDOWN: in_vk_add_pl12 |=  0x20; return 0;\r
334     case WM_LBUTTONUP:   in_vk_add_pl12 &= ~0x20; return 0;\r
335     case WM_MOUSEMOVE:\r
336       if (!main_wnd_as_pad) break;\r
337       PicoPicohw.pen_pos[0] = 0x03c + (320 * LOWORD(lparam) / (FrameRectMy.right - FrameRectMy.left));\r
338       PicoPicohw.pen_pos[1] = 0x1fc + (232 * HIWORD(lparam) / (FrameRectMy.bottom - FrameRectMy.top));\r
339       SetTimer(FrameWnd, 100, 1000, NULL);\r
340       break;\r
341     case WM_KEYDOWN:\r
342       if (wparam == VK_TAB) {\r
343         emu_reset_game();\r
344         break;\r
345       }\r
346       if (wparam == VK_ESCAPE) {\r
347         LoadROM(NULL);\r
348         break;\r
349       }\r
350       in_vk_keydown(wparam);\r
351       break;\r
352     case WM_KEYUP:\r
353       in_vk_keyup(wparam);\r
354       break;\r
355   }\r
356 \r
357   return DefWindowProc(hwnd,msg,wparam,lparam);\r
358 }\r
359 \r
360 static LRESULT CALLBACK PicoSwWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
361 {\r
362   PAINTSTRUCT ps;\r
363   HDC hdc, hdc2;\r
364 \r
365   switch (msg)\r
366   {\r
367     case WM_DESTROY: PicoSwWnd=NULL; break;\r
368     case WM_LBUTTONDOWN: in_vk_add_pl12 |=  0x20; return 0;\r
369     case WM_LBUTTONUP:   in_vk_add_pl12 &= ~0x20; return 0;\r
370     case WM_MOUSEMOVE:\r
371       if (HIWORD(lparam) < 0x20) break;\r
372       PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam) * 2/3;\r
373       PicoPicohw.pen_pos[1] = 0x2f8 + HIWORD(lparam) - 0x20;\r
374       SetTimer(FrameWnd, 100, 1000, NULL);\r
375       break;\r
376     case WM_KEYDOWN: in_vk_keydown(wparam); break;\r
377     case WM_KEYUP:   in_vk_keyup(wparam);   break;\r
378     case WM_PAINT:\r
379       hdc = BeginPaint(hwnd, &ps);\r
380       if (ppage_bmps[PicoPicohw.page] == NULL)\r
381       {\r
382         SelectObject(hdc, GetStockObject(DEFAULT_GUI_FONT));\r
383         SetTextColor(hdc, RGB(255, 255, 255));\r
384         SetBkColor(hdc, RGB(0, 0, 0));\r
385         TextOut(hdc, 2,  2, "missing PNGs for", 16);\r
386         TextOut(hdc, 2, 18, rom_name, strlen(rom_name));\r
387       }\r
388       else\r
389       {\r
390         hdc2 = CreateCompatibleDC(GetDC(FrameWnd));\r
391         SelectObject(hdc2, ppage_bmps[PicoPicohw.page]);\r
392         BitBlt(hdc, 0, 0, 480, 240, hdc2, 0, 0, SRCCOPY);\r
393         DeleteDC(hdc2);\r
394       }\r
395       EndPaint(hwnd, &ps);\r
396       return 0;\r
397     case WM_CLOSE:\r
398       ShowWindow(hwnd, SW_HIDE);\r
399       CheckMenuItem(mpicohw, 1210, MF_UNCHECKED);\r
400       return 0;\r
401   }\r
402 \r
403   return DefWindowProc(hwnd,msg,wparam,lparam);\r
404 }\r
405 \r
406 static LRESULT CALLBACK PicoPadWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
407 {\r
408   PAINTSTRUCT ps;\r
409   HDC hdc, hdc2;\r
410 \r
411   switch (msg)\r
412   {\r
413     case WM_DESTROY: PicoPadWnd=NULL; break;\r
414     case WM_LBUTTONDOWN: in_vk_add_pl12 |=  0x20; return 0;\r
415     case WM_LBUTTONUP:   in_vk_add_pl12 &= ~0x20; return 0;\r
416     case WM_MOUSEMOVE:\r
417       PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam);\r
418       PicoPicohw.pen_pos[1] = 0x1fc + HIWORD(lparam);\r
419       SetTimer(FrameWnd, 100, 1000, NULL);\r
420       break;\r
421     case WM_KEYDOWN: in_vk_keydown(wparam); break;\r
422     case WM_KEYUP:   in_vk_keyup(wparam);   break;\r
423     case WM_PAINT:\r
424       if (ppad_bmp == NULL) break;\r
425       hdc = BeginPaint(hwnd, &ps);\r
426       hdc2 = CreateCompatibleDC(GetDC(FrameWnd));\r
427       SelectObject(hdc2, ppad_bmp);\r
428       BitBlt(hdc, 0, 0, 320, 240, hdc2, 0, 0, SRCCOPY);\r
429       EndPaint(hwnd, &ps);\r
430       DeleteDC(hdc2);\r
431       return 0;\r
432     case WM_CLOSE:\r
433       ShowWindow(hwnd, SW_HIDE);\r
434       CheckMenuItem(mpicohw, 1211, MF_UNCHECKED);\r
435       return 0;\r
436   }\r
437 \r
438   return DefWindowProc(hwnd,msg,wparam,lparam);\r
439 }\r
440 \r
441 \r
442 static int FrameInit()\r
443 {\r
444   WNDCLASS wc;\r
445   RECT rect={0,0,0,0};\r
446   HMENU mfile;\r
447   int style=0;\r
448   int left=0,top=0,width=0,height=0;\r
449 \r
450   memset(&wc,0,sizeof(wc));\r
451 \r
452   // Register the window class:\r
453   wc.lpfnWndProc=WndProc;\r
454   wc.hInstance=GetModuleHandle(NULL);\r
455   wc.hCursor=LoadCursor(NULL,IDC_ARROW);\r
456   wc.hbrBackground=CreateSolidBrush(0);\r
457   wc.lpszClassName="PicoMainFrame";\r
458   RegisterClass(&wc);\r
459 \r
460   wc.lpszClassName="PicoSwWnd";\r
461   wc.lpfnWndProc=PicoSwWndProc;\r
462   RegisterClass(&wc);\r
463 \r
464   wc.lpszClassName="PicoPadWnd";\r
465   wc.lpfnWndProc=PicoPadWndProc;\r
466   RegisterClass(&wc);\r
467 \r
468   rect.right =320;\r
469   rect.bottom=224;\r
470 \r
471   // Adjust size of windows based on borders:\r
472   style=WS_OVERLAPPEDWINDOW;\r
473   AdjustWindowRect(&rect,style,1);\r
474   width =rect.right-rect.left;\r
475   height=rect.bottom-rect.top;\r
476 \r
477   // Place window in the centre of the screen:\r
478   SystemParametersInfo(SPI_GETWORKAREA,0,&rect,0);\r
479   left=rect.left+rect.right;\r
480   top=rect.top+rect.bottom;\r
481 \r
482   left-=width; left>>=1;\r
483   top-=height; top>>=1;\r
484 \r
485   // Create menu:\r
486   mfile = CreateMenu();\r
487   InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1000, "&Load ROM");\r
488   InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1001, "&Reset");\r
489   InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1002, "E&xit");\r
490   mdisplay = CreateMenu();\r
491   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1100, "320x224");\r
492   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1101, "256x224");\r
493   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1102, "640x448");\r
494   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1103, "512x448");\r
495   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1104, "Lock to 1:1");\r
496   mpicohw = CreateMenu();\r
497   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1210, "Show &Storyware");\r
498   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1211, "Show &Drawing pad");\r
499   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1212, "&Main window as pad");\r
500   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_SEPARATOR, 0, NULL);\r
501   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1220, "Title page (&0)");\r
502   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1221, "Page &1");\r
503   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1222, "Page &2");\r
504   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1223, "Page &3");\r
505   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1224, "Page &4");\r
506   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1225, "Page &5");\r
507   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1226, "Page &6");\r
508   mmain = CreateMenu();\r
509   InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mfile,    "&File");\r
510   InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mdisplay, "&Display");\r
511   InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mpicohw,  "&Pico");\r
512   EnableMenuItem(mmain, 2, MF_BYPOSITION|MF_GRAYED);\r
513 //  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, 1200, "&Config");\r
514   InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING, 1300, "&About");\r
515 \r
516   // Create the window:\r
517   FrameWnd=CreateWindow("PicoMainFrame","PicoDrive " VERSION,style|WS_VISIBLE,\r
518     left,top,width,height,NULL,mmain,NULL,NULL);\r
519 \r
520   CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);\r
521   ShowWindow(FrameWnd, SW_NORMAL);\r
522   UpdateWindow(FrameWnd);\r
523   UpdateRect();\r
524 \r
525   // create Pico windows\r
526   style = WS_OVERLAPPED|WS_CAPTION|WS_BORDER|WS_SYSMENU;\r
527   rect.left=rect.top=0;\r
528   rect.right =320;\r
529   rect.bottom=224;\r
530 \r
531   AdjustWindowRect(&rect,style,1);\r
532   width =rect.right-rect.left;\r
533   height=rect.bottom-rect.top;\r
534 \r
535   left += 326;\r
536   PicoSwWnd=CreateWindow("PicoSwWnd","Storyware",style,\r
537     left,top,width+160,height,FrameWnd,NULL,NULL,NULL);\r
538 \r
539   top += 266;\r
540   PicoPadWnd=CreateWindow("PicoPadWnd","Drawing Pad",style,\r
541     left,top,width,height,FrameWnd,NULL,NULL,NULL);\r
542 \r
543   return 0;\r
544 }\r
545 \r
546 // --------------------\r
547 \r
548 static DWORD WINAPI work_thread(void *x)\r
549 {\r
550   while (engineState != PGS_Quit) {\r
551     WaitForSingleObject(loop_enter_event, INFINITE);\r
552     if (engineState != PGS_Running)\r
553       continue;\r
554 \r
555     printf("loop..\n");\r
556     emu_loop();\r
557     SetEvent(loop_end_event);\r
558   }\r
559 \r
560   return 0;\r
561 }\r
562 \r
563 // XXX: use main.c\r
564 void xxinit(void)\r
565 {\r
566   /* in_init() must go before config, config accesses in_ fwk */\r
567   in_init();\r
568   emu_prep_defconfig();\r
569   emu_read_config(NULL, 0);\r
570   config_readlrom(PicoConfigFile);\r
571 \r
572   plat_init();\r
573   in_probe();\r
574 \r
575   emu_init();\r
576   menu_init();\r
577 }\r
578 \r
579 \r
580 int WINAPI WinMain(HINSTANCE p1, HINSTANCE p2, LPSTR cmdline, int p4)\r
581 {\r
582   MSG msg;\r
583   DWORD tid = 0;\r
584   HANDLE thread;\r
585   int ret;\r
586 \r
587   xxinit();\r
588   FrameInit();\r
589   ret = DirectInit();\r
590   if (ret)\r
591     goto end0;\r
592 \r
593   loop_enter_event = CreateEvent(NULL, 0, 0, NULL);\r
594   if (loop_enter_event == NULL)\r
595     goto end0;\r
596 \r
597   loop_end_event = CreateEvent(NULL, 0, 0, NULL);\r
598   if (loop_end_event == NULL)\r
599     goto end0;\r
600 \r
601   thread = CreateThread(NULL, 0, work_thread, NULL, 0, &tid);\r
602   if (thread == NULL)\r
603     goto end0;\r
604 \r
605   LoadROM(cmdline);\r
606 \r
607   // Main window loop:\r
608   for (;;)\r
609   {\r
610     GetMessage(&msg,NULL,0,0);\r
611     if (msg.message==WM_QUIT) break;\r
612 \r
613     TranslateMessage(&msg);\r
614     DispatchMessage(&msg);\r
615   }\r
616 \r
617   // Signal thread to quit and wait for it to exit:\r
618   if (engineState == PGS_Running) {\r
619     engineState = PGS_Quit;\r
620     WaitForSingleObject(loop_end_event, 5000);\r
621   }\r
622   CloseHandle(thread); thread=NULL;\r
623 \r
624   emu_write_config(0);\r
625   emu_finish();\r
626   //plat_finish();\r
627 \r
628 end0:\r
629   DirectExit();\r
630   DestroyWindow(FrameWnd);\r
631 \r
632 //  _CrtDumpMemoryLeaks();\r
633   return 0;\r
634 }\r
635 \r