1.45a Pico win32, code move
[picodrive.git] / platform / win32 / GenaDrive / Main.cpp
index a25d89f..d546660 100644 (file)
@@ -3,6 +3,7 @@
 #include <crtdbg.h>\r
 #include <commdlg.h>\r
 #include "../../common/readpng.h"\r
+#include "../../common/config.h"\r
 \r
 char *romname=NULL;\r
 HWND FrameWnd=NULL;\r
@@ -15,8 +16,9 @@ int MainWidth=720,MainHeight=480;
 static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;\r
 static int rom_loaded = 0;\r
 static HBITMAP ppad_bmp = 0;\r
-static HBITMAP ppage_bmps[6] = { 0, };\r
+static HBITMAP ppage_bmps[7] = { 0, };\r
 static char rom_name[0x20*3+1];\r
+static int main_wnd_as_pad = 0;\r
 \r
 static void UpdateRect()\r
 {\r
@@ -29,7 +31,7 @@ static void UpdateRect()
 \r
 static int extract_rom_name(char *dest, const unsigned char *src, int len)\r
 {\r
-       char *p = dest, s_old = 0;\r
+       char *p = dest, s_old = 0x20;\r
        int i;\r
 \r
        for (i = len - 1; i >= 0; i--)\r
@@ -58,6 +60,29 @@ static int extract_rom_name(char *dest, const unsigned char *src, int len)
        return p - dest;\r
 }\r
 \r
+static void check_name_alias(const char *afname)\r
+{\r
+  char buff[256], *var, *val;\r
+  FILE *f;\r
+  int ret;\r
+\r
+  f = fopen(afname, "r");\r
+  if (f == NULL) return;\r
+\r
+  while (1)\r
+  {\r
+    ret = config_get_var_val(f, buff, sizeof(buff), &var, &val);\r
+    if (ret ==  0) break;\r
+    if (ret == -1) continue;\r
+\r
+    if (strcmp(rom_name, var) == 0) {\r
+      lprintf("rom aliased: \"%s\" -> \"%s\"\n", rom_name, val);\r
+      strncpy(rom_name, val, sizeof(rom_name));\r
+      break;\r
+    }\r
+  }\r
+  fclose(f);\r
+}\r
 \r
 static HBITMAP png2hb(const char *fname, int is_480)\r
 {\r
@@ -89,9 +114,12 @@ static HBITMAP png2hb(const char *fname, int is_480)
   return bmp;\r
 }\r
 \r
-static void PrepareForROM(unsigned char *rom_data)\r
+static void PrepareForROM(void)\r
 {\r
+  unsigned char *rom_data = NULL;\r
   int i, ret, show = PicoAHW & PAHW_PICO;\r
+  \r
+  PicoGetInternal(PI_ROM, (pint_ret_t *) &rom_data);\r
   EnableMenuItem(mmain, 2, MF_BYPOSITION|(show ? MF_ENABLED : MF_GRAYED));\r
   ShowWindow(PicoPadWnd, show ? SW_SHOWNA : SW_HIDE);\r
   ShowWindow(PicoSwWnd, show ? SW_SHOWNA : SW_HIDE);\r
@@ -103,7 +131,7 @@ static void PrepareForROM(unsigned char *rom_data)
 \r
   PicoPicohw.pen_pos[0] =\r
   PicoPicohw.pen_pos[1] = 0x8000;\r
-  picohw_pen_pressed = 0;\r
+  PicoPadAdd = 0;\r
 \r
   ret = extract_rom_name(rom_name, rom_data + 0x150, 0x20);\r
   if (ret == 0)\r
@@ -121,11 +149,19 @@ static void PrepareForROM(unsigned char *rom_data)
       ppad_bmp = png2hb(path, 0);\r
     }\r
 \r
-    for (i = 0; i < 6; i++) {\r
+    strcpy(p, "pico\\alias.txt");\r
+    check_name_alias(path);\r
+\r
+    for (i = 0; i < 7; i++) {\r
       if (ppage_bmps[i] != NULL) DeleteObject(ppage_bmps[i]);\r
       sprintf(p, "pico\\%s_%i.png", rom_name, i);\r
       ppage_bmps[i] = png2hb(path, 1);\r
     }\r
+    // games usually don't have page 6, so just duplicate page 5.\r
+    if (ppage_bmps[6] == NULL && ppage_bmps[5] != NULL) {\r
+      sprintf(p, "pico\\%s_5.png", rom_name);\r
+      ppage_bmps[6] = png2hb(path, 1);\r
+    }\r
   }\r
 }\r
 \r
@@ -173,7 +209,7 @@ static void LoadROM(const char *cmdpath)
   PicoCartUnload();\r
   PicoCartInsert(rom_data_new, rom_size);\r
 \r
-  PrepareForROM(rom_data_new);\r
+  PrepareForROM();\r
 \r
   rom_loaded = 1;\r
   romname = rompath;\r
@@ -231,6 +267,10 @@ static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
           ShowWindow((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd, i ? SW_SHOWNA : SW_HIDE);\r
           CheckMenuItem(mpicohw, LOWORD(wparam), i ? MF_CHECKED : MF_UNCHECKED);\r
           return 0;\r
+        case 1212:\r
+          main_wnd_as_pad = !main_wnd_as_pad;\r
+          CheckMenuItem(mpicohw, 1212, main_wnd_as_pad ? MF_CHECKED : MF_UNCHECKED);\r
+          return 0;\r
         case 1220:\r
         case 1221:\r
         case 1222:\r
@@ -267,13 +307,43 @@ static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
       if (PtInRect(&rc, pt)) break;\r
       PicoPicohw.pen_pos[0] |= 0x8000;\r
       PicoPicohw.pen_pos[1] |= 0x8000;\r
-      picohw_pen_pressed = 0;\r
+      PicoPadAdd = 0;\r
+      break;\r
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;\r
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;\r
+    case WM_MOUSEMOVE:\r
+      if (!main_wnd_as_pad) break;\r
+      PicoPicohw.pen_pos[0] = 0x03c + (320 * LOWORD(lparam) / (FrameRectMy.right - FrameRectMy.left));\r
+      PicoPicohw.pen_pos[1] = 0x1fc + (232 * HIWORD(lparam) / (FrameRectMy.bottom - FrameRectMy.top));\r
+      SetTimer(FrameWnd, 100, 1000, NULL);\r
       break;\r
   }\r
 \r
   return DefWindowProc(hwnd,msg,wparam,lparam);\r
 }\r
 \r
+static void key_down(WPARAM key)\r
+{\r
+  switch (key) {\r
+    case VK_LEFT:  PicoPadAdd |=    4; break;\r
+    case VK_RIGHT: PicoPadAdd |=    8; break;\r
+    case VK_UP:    PicoPadAdd |=    1; break;\r
+    case VK_DOWN:  PicoPadAdd |=    2; break;\r
+    case 'X':      PicoPadAdd |= 0x10; break;\r
+  }\r
+}\r
+\r
+static void key_up(WPARAM key)\r
+{\r
+  switch (key) {\r
+    case VK_LEFT:  PicoPadAdd &= ~0x04; break;\r
+    case VK_RIGHT: PicoPadAdd &= ~0x08; break;\r
+    case VK_UP:    PicoPadAdd &= ~0x01; break;\r
+    case VK_DOWN:  PicoPadAdd &= ~0x02; break;\r
+    case 'X':      PicoPadAdd &= ~0x10; break;\r
+  }\r
+}\r
+\r
 static LRESULT CALLBACK PicoSwWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
 {\r
   PAINTSTRUCT ps;\r
@@ -281,22 +351,24 @@ static LRESULT CALLBACK PicoSwWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lp
 \r
   switch (msg)\r
   {\r
-    case WM_CLOSE: return 0;\r
     case WM_DESTROY: PicoSwWnd=NULL; break;\r
-    case WM_LBUTTONDOWN: picohw_pen_pressed = 1; return 0;\r
-    case WM_LBUTTONUP:   picohw_pen_pressed = 0; return 0;\r
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;\r
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;\r
     case WM_MOUSEMOVE:\r
+      if (HIWORD(lparam) < 0x20) break;\r
       PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam) * 2/3;\r
-      PicoPicohw.pen_pos[1] = 0x2f8 + HIWORD(lparam);\r
+      PicoPicohw.pen_pos[1] = 0x2f8 + HIWORD(lparam) - 0x20;\r
       SetTimer(FrameWnd, 100, 1000, NULL);\r
       break;\r
+    case WM_KEYDOWN: key_down(wparam); break;\r
+    case WM_KEYUP:   key_up(wparam);   break;\r
     case WM_PAINT:\r
       hdc = BeginPaint(hwnd, &ps);\r
       if (ppage_bmps[PicoPicohw.page] == NULL)\r
       {\r
         SelectObject(hdc, GetStockObject(DEFAULT_GUI_FONT));\r
-       SetTextColor(hdc, RGB(255, 255, 255));\r
-       SetBkColor(hdc, RGB(0, 0, 0));\r
+        SetTextColor(hdc, RGB(255, 255, 255));\r
+        SetBkColor(hdc, RGB(0, 0, 0));\r
         TextOut(hdc, 2,  2, "missing PNGs for", 16);\r
         TextOut(hdc, 2, 18, rom_name, strlen(rom_name));\r
       }\r
@@ -321,15 +393,16 @@ static LRESULT CALLBACK PicoPadWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM l
 \r
   switch (msg)\r
   {\r
-    case WM_CLOSE: return 0;\r
     case WM_DESTROY: PicoPadWnd=NULL; break;\r
-    case WM_LBUTTONDOWN: picohw_pen_pressed = 1; return 0;\r
-    case WM_LBUTTONUP:   picohw_pen_pressed = 0; return 0;\r
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;\r
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;\r
     case WM_MOUSEMOVE:\r
       PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam);\r
       PicoPicohw.pen_pos[1] = 0x1fc + HIWORD(lparam);\r
       SetTimer(FrameWnd, 100, 1000, NULL);\r
       break;\r
+    case WM_KEYDOWN: key_down(wparam); break;\r
+    case WM_KEYUP:   key_up(wparam);   break;\r
     case WM_PAINT:\r
       if (ppad_bmp == NULL) break;\r
       hdc = BeginPaint(hwnd, &ps);\r
@@ -402,6 +475,7 @@ static int FrameInit()
   mpicohw = CreateMenu();\r
   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1210, "Show &Storyware");\r
   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1211, "Show &Drawing pad");\r
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1212, "&Main window as pad");\r
   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_SEPARATOR, 0, NULL);\r
   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1220, "Title page (&0)");\r
   InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1221, "Page &1");\r