X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=platform%2Fwin32%2FGenaDrive%2FMain.cpp;h=d54666056cd686f13ed7491d9e0d216de3c9ca39;hb=4609d0cdb87fcdd5f419153d7a76e2b06242b294;hp=4fbbf029d8ace36ae437230a8c3e4cdd55bbedf2;hpb=1b0ac8adc97d65c686a48c4375c07907de86be24;p=picodrive.git

diff --git a/platform/win32/GenaDrive/Main.cpp b/platform/win32/GenaDrive/Main.cpp
index 4fbbf02..d546660 100644
--- a/platform/win32/GenaDrive/Main.cpp
+++ b/platform/win32/GenaDrive/Main.cpp
@@ -2,15 +2,23 @@
 #include "version.h"
 #include <crtdbg.h>
 #include <commdlg.h>
+#include "../../common/readpng.h"
+#include "../../common/config.h"
 
 char *romname=NULL;
 HWND FrameWnd=NULL;
 RECT FrameRectMy;
 int lock_to_1_1 = 1;
+static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;
 
 int MainWidth=720,MainHeight=480;
 
-static HMENU mdisplay = 0;
+static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;
+static int rom_loaded = 0;
+static HBITMAP ppad_bmp = 0;
+static HBITMAP ppage_bmps[7] = { 0, };
+static char rom_name[0x20*3+1];
+static int main_wnd_as_pad = 0;
 
 static void UpdateRect()
 {
@@ -21,10 +29,145 @@ static void UpdateRect()
   FrameRectMy = wi.rcClient;
 }
 
+static int extract_rom_name(char *dest, const unsigned char *src, int len)
+{
+	char *p = dest, s_old = 0x20;
+	int i;
+
+	for (i = len - 1; i >= 0; i--)
+	{
+		if (src[i^1] != ' ') break;
+	}
+	len = i + 1;
+
+	for (i = 0; i < len; i++)
+	{
+		unsigned char s = src[i^1];
+		if (s == 0x20 && s_old == 0x20) continue;
+		else if (s >= 0x20 && s < 0x7f && s != '%')
+		{
+			*p++ = s;
+		}
+		else
+		{
+			sprintf(p, "%%%02x", s);
+			p += 3;
+		}
+		s_old = s;
+	}
+	*p = 0;
+
+	return p - dest;
+}
+
+static void check_name_alias(const char *afname)
+{
+  char buff[256], *var, *val;
+  FILE *f;
+  int ret;
+
+  f = fopen(afname, "r");
+  if (f == NULL) return;
+
+  while (1)
+  {
+    ret = config_get_var_val(f, buff, sizeof(buff), &var, &val);
+    if (ret ==  0) break;
+    if (ret == -1) continue;
+
+    if (strcmp(rom_name, var) == 0) {
+      lprintf("rom aliased: \"%s\" -> \"%s\"\n", rom_name, val);
+      strncpy(rom_name, val, sizeof(rom_name));
+      break;
+    }
+  }
+  fclose(f);
+}
+
+static HBITMAP png2hb(const char *fname, int is_480)
+{
+  BITMAPINFOHEADER bih;
+  HBITMAP bmp;
+  void *bmem;
+  int ret;
+
+  bmem = calloc(1, is_480 ? 480*240*3 : 320*240*3);
+  if (bmem == NULL) return NULL;
+  ret = readpng(bmem, fname, is_480 ? READPNG_480_24 : READPNG_320_24);
+  if (ret != 0) {
+    free(bmem);
+    return NULL;
+  }
+
+  memset(&bih, 0, sizeof(bih));
+  bih.biSize = sizeof(bih);
+  bih.biWidth = is_480 ? 480 : 320;
+  bih.biHeight = -240;
+  bih.biPlanes = 1;
+  bih.biBitCount = 24;
+  bih.biCompression = BI_RGB;
+  bmp = CreateDIBitmap(GetDC(FrameWnd), &bih, CBM_INIT, bmem, (BITMAPINFO *)&bih, 0);
+  if (bmp == NULL)
+    lprintf("CreateDIBitmap failed with %i", GetLastError());
+
+  free(bmem);
+  return bmp;
+}
+
+static void PrepareForROM(void)
+{
+  unsigned char *rom_data = NULL;
+  int i, ret, show = PicoAHW & PAHW_PICO;
+  
+  PicoGetInternal(PI_ROM, (pint_ret_t *) &rom_data);
+  EnableMenuItem(mmain, 2, MF_BYPOSITION|(show ? MF_ENABLED : MF_GRAYED));
+  ShowWindow(PicoPadWnd, show ? SW_SHOWNA : SW_HIDE);
+  ShowWindow(PicoSwWnd, show ? SW_SHOWNA : SW_HIDE);
+  CheckMenuItem(mpicohw, 1210, show ? MF_CHECKED : MF_UNCHECKED);
+  CheckMenuItem(mpicohw, 1211, show ? MF_CHECKED : MF_UNCHECKED);
+  PostMessage(FrameWnd, WM_COMMAND, 1220 + PicoPicohw.page, 0);
+  DrawMenuBar(FrameWnd);
+  InvalidateRect(PicoSwWnd, NULL, 1);
+
+  PicoPicohw.pen_pos[0] =
+  PicoPicohw.pen_pos[1] = 0x8000;
+  PicoPadAdd = 0;
+
+  ret = extract_rom_name(rom_name, rom_data + 0x150, 0x20);
+  if (ret == 0)
+    extract_rom_name(rom_name, rom_data + 0x130, 0x20);
+
+  if (show)
+  {
+    char path[MAX_PATH], *p;
+    GetModuleFileName(NULL, path, sizeof(path) - 32);
+    p = strrchr(path, '\\');
+    if (p == NULL) p = path;
+    else p++;
+    if (ppad_bmp == NULL) {
+      strcpy(p, "pico\\pad.png");
+      ppad_bmp = png2hb(path, 0);
+    }
+
+    strcpy(p, "pico\\alias.txt");
+    check_name_alias(path);
+
+    for (i = 0; i < 7; i++) {
+      if (ppage_bmps[i] != NULL) DeleteObject(ppage_bmps[i]);
+      sprintf(p, "pico\\%s_%i.png", rom_name, i);
+      ppage_bmps[i] = png2hb(path, 1);
+    }
+    // games usually don't have page 6, so just duplicate page 5.
+    if (ppage_bmps[6] == NULL && ppage_bmps[5] != NULL) {
+      sprintf(p, "pico\\%s_5.png", rom_name);
+      ppage_bmps[6] = png2hb(path, 1);
+    }
+  }
+}
+
 static void LoadROM(const char *cmdpath)
 {
   static char rompath[MAX_PATH] = { 0, };
-  static unsigned char *rom_data = NULL;
   unsigned char *rom_data_new = NULL;
   unsigned int rom_size = 0;
   pm_file *rom = NULL;
@@ -63,10 +206,12 @@ static void LoadROM(const char *cmdpath)
   LoopWait=1;
   for (i = 0; LoopWaiting == 0 && i < 10; i++) Sleep(100);
 
+  PicoCartUnload();
   PicoCartInsert(rom_data_new, rom_size);
 
-  if (rom_data) free(rom_data);
-  rom_data = rom_data_new;
+  PrepareForROM();
+
+  rom_loaded = 1;
   romname = rompath;
   LoopWait=0;
 }
@@ -77,6 +222,8 @@ static int rect_heights[4] = { 224, 224, 448, 448 };
 // Window proc for the frame window:
 static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
 {
+  POINT pt;
+  RECT rc;
   int i;
   switch (msg)
   {
@@ -89,7 +236,8 @@ static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
       switch (LOWORD(wparam))
       {
         case 1000: LoadROM(NULL); break;
-        case 1001: PostQuitMessage(0); return 0;
+        case 1001: PicoReset(); return 0;
+        case 1002: PostQuitMessage(0); return 0;
         case 1100:
         case 1101:
         case 1102:
@@ -106,37 +254,175 @@ static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
             lock_to_1_1=0;
             CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);
           }
-          LoopWait=0;
+          if (rom_loaded) LoopWait=0;
           return 0;
         case 1104:
           lock_to_1_1=!lock_to_1_1;
           CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);
           return 0;
-        case 1200: break;
+        case 1210:
+        case 1211:
+          i = IsWindowVisible((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd);
+          i = !i;
+          ShowWindow((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd, i ? SW_SHOWNA : SW_HIDE);
+          CheckMenuItem(mpicohw, LOWORD(wparam), i ? MF_CHECKED : MF_UNCHECKED);
+          return 0;
+        case 1212:
+          main_wnd_as_pad = !main_wnd_as_pad;
+          CheckMenuItem(mpicohw, 1212, main_wnd_as_pad ? MF_CHECKED : MF_UNCHECKED);
+          return 0;
+        case 1220:
+        case 1221:
+        case 1222:
+        case 1223:
+        case 1224:
+        case 1225:
+        case 1226:
+          PicoPicohw.page = LOWORD(wparam) % 10;
+          for (i = 0; i < 7; i++)
+            CheckMenuItem(mpicohw, 1220 + i, MF_UNCHECKED);
+          CheckMenuItem(mpicohw, 1220 + PicoPicohw.page, MF_CHECKED);
+          InvalidateRect(PicoSwWnd, NULL, 1);
+          return 0;
         case 1300:
           MessageBox(FrameWnd, "PicoDrive v" VERSION " (c) notaz, 2006-2008\n"
-              "SVP demo edition\n\n"
+              "SVP and Pico demo edition\n\n"
               "Credits:\n"
               "fDave: base code of PicoDrive, GenaDrive (the frontend)\n"
               "Chui: Fame/C\n"
               "NJ: CZ80\n"
               "MAME devs: YM2612 and SN76496 cores\n"
               "Stéphane Dallongeville: Gens code, base of Fame/C (C68K), CZ80\n"
-              "Tasco Deluxe: SVP RE work\n",
+              "Tasco Deluxe: SVP RE work\n"
+              "Pierpaolo Prazzoli: info about SSP16 chips\n",
               "About", 0);
           return 0;
       }
       break;
+    case WM_TIMER:
+      GetCursorPos(&pt);
+      GetWindowRect(PicoSwWnd, &rc);
+      if (PtInRect(&rc, pt)) break;
+      GetWindowRect(PicoPadWnd, &rc);
+      if (PtInRect(&rc, pt)) break;
+      PicoPicohw.pen_pos[0] |= 0x8000;
+      PicoPicohw.pen_pos[1] |= 0x8000;
+      PicoPadAdd = 0;
+      break;
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;
+    case WM_MOUSEMOVE:
+      if (!main_wnd_as_pad) break;
+      PicoPicohw.pen_pos[0] = 0x03c + (320 * LOWORD(lparam) / (FrameRectMy.right - FrameRectMy.left));
+      PicoPicohw.pen_pos[1] = 0x1fc + (232 * HIWORD(lparam) / (FrameRectMy.bottom - FrameRectMy.top));
+      SetTimer(FrameWnd, 100, 1000, NULL);
+      break;
+  }
+
+  return DefWindowProc(hwnd,msg,wparam,lparam);
+}
+
+static void key_down(WPARAM key)
+{
+  switch (key) {
+    case VK_LEFT:  PicoPadAdd |=    4; break;
+    case VK_RIGHT: PicoPadAdd |=    8; break;
+    case VK_UP:    PicoPadAdd |=    1; break;
+    case VK_DOWN:  PicoPadAdd |=    2; break;
+    case 'X':      PicoPadAdd |= 0x10; break;
+  }
+}
+
+static void key_up(WPARAM key)
+{
+  switch (key) {
+    case VK_LEFT:  PicoPadAdd &= ~0x04; break;
+    case VK_RIGHT: PicoPadAdd &= ~0x08; break;
+    case VK_UP:    PicoPadAdd &= ~0x01; break;
+    case VK_DOWN:  PicoPadAdd &= ~0x02; break;
+    case 'X':      PicoPadAdd &= ~0x10; break;
+  }
+}
+
+static LRESULT CALLBACK PicoSwWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
+{
+  PAINTSTRUCT ps;
+  HDC hdc, hdc2;
+
+  switch (msg)
+  {
+    case WM_DESTROY: PicoSwWnd=NULL; break;
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;
+    case WM_MOUSEMOVE:
+      if (HIWORD(lparam) < 0x20) break;
+      PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam) * 2/3;
+      PicoPicohw.pen_pos[1] = 0x2f8 + HIWORD(lparam) - 0x20;
+      SetTimer(FrameWnd, 100, 1000, NULL);
+      break;
+    case WM_KEYDOWN: key_down(wparam); break;
+    case WM_KEYUP:   key_up(wparam);   break;
+    case WM_PAINT:
+      hdc = BeginPaint(hwnd, &ps);
+      if (ppage_bmps[PicoPicohw.page] == NULL)
+      {
+        SelectObject(hdc, GetStockObject(DEFAULT_GUI_FONT));
+        SetTextColor(hdc, RGB(255, 255, 255));
+        SetBkColor(hdc, RGB(0, 0, 0));
+        TextOut(hdc, 2,  2, "missing PNGs for", 16);
+        TextOut(hdc, 2, 18, rom_name, strlen(rom_name));
+      }
+      else
+      {
+        hdc2 = CreateCompatibleDC(GetDC(FrameWnd));
+        SelectObject(hdc2, ppage_bmps[PicoPicohw.page]);
+        BitBlt(hdc, 0, 0, 480, 240, hdc2, 0, 0, SRCCOPY);
+        DeleteDC(hdc2);
+      }
+      EndPaint(hwnd, &ps);
+      return 0;
+  }
+
+  return DefWindowProc(hwnd,msg,wparam,lparam);
+}
+
+static LRESULT CALLBACK PicoPadWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
+{
+  PAINTSTRUCT ps;
+  HDC hdc, hdc2;
+
+  switch (msg)
+  {
+    case WM_DESTROY: PicoPadWnd=NULL; break;
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;
+    case WM_MOUSEMOVE:
+      PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam);
+      PicoPicohw.pen_pos[1] = 0x1fc + HIWORD(lparam);
+      SetTimer(FrameWnd, 100, 1000, NULL);
+      break;
+    case WM_KEYDOWN: key_down(wparam); break;
+    case WM_KEYUP:   key_up(wparam);   break;
+    case WM_PAINT:
+      if (ppad_bmp == NULL) break;
+      hdc = BeginPaint(hwnd, &ps);
+      hdc2 = CreateCompatibleDC(GetDC(FrameWnd));
+      SelectObject(hdc2, ppad_bmp);
+      BitBlt(hdc, 0, 0, 320, 240, hdc2, 0, 0, SRCCOPY);
+      EndPaint(hwnd, &ps);
+      DeleteDC(hdc2);
+      return 0;
   }
 
   return DefWindowProc(hwnd,msg,wparam,lparam);
 }
 
+
 static int FrameInit()
 {
   WNDCLASS wc;
   RECT rect={0,0,0,0};
-  HMENU mmain, mfile;
+  HMENU mfile;
   int style=0;
   int left=0,top=0,width=0,height=0;
 
@@ -147,7 +433,15 @@ static int FrameInit()
   wc.hInstance=GetModuleHandle(NULL);
   wc.hCursor=LoadCursor(NULL,IDC_ARROW);
   wc.hbrBackground=CreateSolidBrush(0);
-  wc.lpszClassName="MainFrame";
+  wc.lpszClassName="PicoMainFrame";
+  RegisterClass(&wc);
+
+  wc.lpszClassName="PicoSwWnd";
+  wc.lpfnWndProc=PicoSwWndProc;
+  RegisterClass(&wc);
+
+  wc.lpszClassName="PicoPadWnd";
+  wc.lpfnWndProc=PicoPadWndProc;
   RegisterClass(&wc);
 
   rect.right =320;//MainWidth;
@@ -170,21 +464,36 @@ static int FrameInit()
   // Create menu:
   mfile = CreateMenu();
   InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1000, "&Load ROM");
-  InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1001, "E&xit");
+  InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1001, "&Reset");
+  InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1002, "E&xit");
   mdisplay = CreateMenu();
   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1100, "320x224");
   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1101, "256x224");
   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1102, "640x448");
   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1103, "512x448");
   InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1104, "Lock to 1:1");
+  mpicohw = CreateMenu();
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1210, "Show &Storyware");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1211, "Show &Drawing pad");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1212, "&Main window as pad");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_SEPARATOR, 0, NULL);
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1220, "Title page (&0)");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1221, "Page &1");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1222, "Page &2");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1223, "Page &3");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1224, "Page &4");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1225, "Page &5");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1226, "Page &6");
   mmain = CreateMenu();
-  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mfile, "&File");
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mfile,    "&File");
   InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mdisplay, "&Display");
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mpicohw,  "&Pico");
+  EnableMenuItem(mmain, 2, MF_BYPOSITION|MF_GRAYED);
 //  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, 1200, "&Config");
-  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, 1300, "&About");
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING, 1300, "&About");
 
   // Create the window:
-  FrameWnd=CreateWindow(wc.lpszClassName,"PicoDrive " VERSION,style|WS_VISIBLE,
+  FrameWnd=CreateWindow("PicoMainFrame","PicoDrive " VERSION,style|WS_VISIBLE,
     left,top,width,height,NULL,mmain,NULL,NULL);
 
   CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);
@@ -192,6 +501,24 @@ static int FrameInit()
   UpdateWindow(FrameWnd);
   UpdateRect();
 
+  // create Pico windows
+  style = WS_OVERLAPPED|WS_CAPTION|WS_BORDER;
+  rect.left=rect.top=0;
+  rect.right =320;
+  rect.bottom=224;
+
+  AdjustWindowRect(&rect,style,1);
+  width =rect.right-rect.left;
+  height=rect.bottom-rect.top;
+
+  left += 326;
+  PicoSwWnd=CreateWindow("PicoSwWnd","Storyware",style,
+    left,top,width+160,height,FrameWnd,NULL,NULL,NULL);
+
+  top += 266;
+  PicoPadWnd=CreateWindow("PicoPadWnd","Drawing Pad",style,
+    left,top,width,height,FrameWnd,NULL,NULL,NULL);
+
   return 0;
 }