-\r
#include "app.h"\r
+#include "version.h"\r
#include <crtdbg.h>\r
#include <commdlg.h>\r
\r
-char *romname;\r
+char *romname=NULL;\r
HWND FrameWnd=NULL;\r
+RECT FrameRectMy;\r
+int lock_to_1_1 = 1;\r
\r
int MainWidth=720,MainHeight=480;\r
\r
-char AppName[]="GenaDrive";\r
-\r
-#ifdef STARSCREAM\r
- extern "C" int SekReset();\r
-#endif\r
-\r
-// ------------------------------------ XBox Main ------------------------------------------\r
-#ifdef _XBOX\r
+static HMENU mdisplay = 0;\r
+static int rom_loaded = 0;\r
\r
-static int MainCode()\r
+static void UpdateRect()\r
{\r
- int ret=0;\r
+ WINDOWINFO wi;\r
+ memset(&wi, 0, sizeof(wi));\r
+ wi.cbSize = sizeof(wi);\r
+ GetWindowInfo(FrameWnd, &wi);\r
+ FrameRectMy = wi.rcClient;\r
+}\r
\r
- ret=LoopInit(); if (ret) { LoopExit(); return 1; }\r
+static void LoadROM(const char *cmdpath)\r
+{\r
+ static char rompath[MAX_PATH] = { 0, };\r
+ unsigned char *rom_data_new = NULL;\r
+ unsigned int rom_size = 0;\r
+ pm_file *rom = NULL;\r
+ int oldwait=LoopWait;\r
+ int i, ret;\r
+\r
+ if (cmdpath) {\r
+ strcpy(rompath, cmdpath + (cmdpath[0] == '\"' ? 1 : 0));\r
+ if (rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;\r
+ if (strlen(rompath) > 4) rom = pm_open(rompath);\r
+ }\r
\r
- LoopQuit=0; LoopCode();\r
- LoopExit();\r
+ if (!rom) {\r
+ OPENFILENAME of; ZeroMemory(&of, sizeof(OPENFILENAME));\r
+ of.lStructSize = sizeof(OPENFILENAME);\r
+ of.lpstrFilter = "ROMs\0*.smd;*.bin;*.gen;*.zip\0";\r
+ of.lpstrFile = rompath; rompath[0] = 0;\r
+ of.nMaxFile = MAX_PATH;\r
+ of.Flags = OFN_FILEMUSTEXIST|OFN_HIDEREADONLY;\r
+ of.hwndOwner = FrameWnd;\r
+ if (!GetOpenFileName(&of)) return;\r
+ rom = pm_open(rompath);\r
+ if (!rom) { error("failed to open ROM"); return; }\r
+ }\r
\r
- return 0;\r
-}\r
+ ret=PicoCartLoad(rom, &rom_data_new, &rom_size);\r
+ pm_close(rom);\r
+ if (ret) {\r
+ error("failed to load ROM");\r
+ return;\r
+ }\r
\r
-int __cdecl main()\r
-{\r
- LD_LAUNCH_DASHBOARD launch;\r
+ // halt the work thread..\r
+ // just a hack, should've used proper sync. primitives here, but who will use this emu anyway..\r
+ LoopWaiting=0;\r
+ LoopWait=1;\r
+ for (i = 0; LoopWaiting == 0 && i < 10; i++) Sleep(100);\r
\r
- MainCode();\r
+ PicoUnloadCart();\r
+ PicoCartInsert(rom_data_new, rom_size);\r
\r
- // Go back to dashboard:\r
- memset(&launch,0,sizeof(launch));\r
- launch.dwReason=XLD_LAUNCH_DASHBOARD_MAIN_MENU;\r
- XLaunchNewImage(NULL,(LAUNCH_DATA *)&launch);\r
+ rom_loaded = 1;\r
+ romname = rompath;\r
+ LoopWait=0;\r
}\r
-#endif\r
\r
-// ----------------------------------- Windows Main ----------------------------------------\r
-#ifndef _XBOX\r
+static int rect_widths[4] = { 320, 256, 640, 512 };\r
+static int rect_heights[4] = { 224, 224, 448, 448 };\r
+\r
// Window proc for the frame window:\r
static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
{\r
- if (msg==WM_CLOSE) { PostQuitMessage(0); return 0; }\r
- if (msg==WM_DESTROY) FrameWnd=NULL; // Blank handle\r
+ int i;\r
+ switch (msg)\r
+ {\r
+ case WM_CLOSE: PostQuitMessage(0); return 0;\r
+ case WM_DESTROY: FrameWnd=NULL; break; // Blank handle\r
+ case WM_SIZE:\r
+ case WM_MOVE:\r
+ case WM_SIZING: UpdateRect(); break;\r
+ case WM_COMMAND:\r
+ switch (LOWORD(wparam))\r
+ {\r
+ case 1000: LoadROM(NULL); break;\r
+ case 1001: PostQuitMessage(0); return 0;\r
+ case 1100:\r
+ case 1101:\r
+ case 1102:\r
+ case 1103:\r
+ LoopWait=1; // another sync hack\r
+ for (i = 0; !LoopWaiting && i < 10; i++) Sleep(10);\r
+ FrameRectMy.right = FrameRectMy.left + rect_widths[wparam&3];\r
+ FrameRectMy.bottom = FrameRectMy.top + rect_heights[wparam&3];\r
+ AdjustWindowRect(&FrameRectMy, WS_OVERLAPPEDWINDOW, 1);\r
+ MoveWindow(hwnd, FrameRectMy.left, FrameRectMy.top,\r
+ FrameRectMy.right-FrameRectMy.left, FrameRectMy.bottom-FrameRectMy.top, 1);\r
+ UpdateRect();\r
+ if (HIWORD(wparam) == 0) { // locally sent\r
+ lock_to_1_1=0;\r
+ CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);\r
+ }\r
+ if (rom_loaded) LoopWait=0;\r
+ return 0;\r
+ case 1104:\r
+ lock_to_1_1=!lock_to_1_1;\r
+ CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);\r
+ return 0;\r
+ case 1200: break;\r
+ case 1300:\r
+ MessageBox(FrameWnd, "PicoDrive v" VERSION " (c) notaz, 2006-2008\n"\r
+ "SVP demo edition\n\n"\r
+ "Credits:\n"\r
+ "fDave: base code of PicoDrive, GenaDrive (the frontend)\n"\r
+ "Chui: Fame/C\n"\r
+ "NJ: CZ80\n"\r
+ "MAME devs: YM2612 and SN76496 cores\n"\r
+ "Stéphane Dallongeville: Gens code, base of Fame/C (C68K), CZ80\n"\r
+ "Tasco Deluxe: SVP RE work\n"\r
+ "Pierpaolo Prazzoli: info about SSP16 chips\n",\r
+ "About", 0);\r
+ return 0;\r
+ }\r
+ break;\r
+ }\r
\r
return DefWindowProc(hwnd,msg,wparam,lparam);\r
}\r
{\r
WNDCLASS wc;\r
RECT rect={0,0,0,0};\r
+ HMENU mmain, mfile;\r
int style=0;\r
int left=0,top=0,width=0,height=0;\r
\r
\r
// Adjust size of windows based on borders:\r
style=WS_OVERLAPPEDWINDOW;\r
- AdjustWindowRect(&rect,style,0);\r
+ AdjustWindowRect(&rect,style,1);\r
width =rect.right-rect.left;\r
height=rect.bottom-rect.top;\r
\r
left-=width; left>>=1;\r
top-=height; top>>=1;\r
\r
+ // Create menu:\r
+ mfile = CreateMenu();\r
+ InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1000, "&Load ROM");\r
+ InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1001, "E&xit");\r
+ mdisplay = CreateMenu();\r
+ InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1100, "320x224");\r
+ InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1101, "256x224");\r
+ InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1102, "640x448");\r
+ InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1103, "512x448");\r
+ InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1104, "Lock to 1:1");\r
+ mmain = CreateMenu();\r
+ InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mfile, "&File");\r
+ InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mdisplay, "&Display");\r
+// InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, 1200, "&Config");\r
+ InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING, 1300, "&About");\r
+\r
// Create the window:\r
- FrameWnd=CreateWindow(wc.lpszClassName,AppName,style|WS_VISIBLE,\r
- left,top,width,height,NULL,NULL,NULL,NULL);\r
+ FrameWnd=CreateWindow(wc.lpszClassName,"PicoDrive " VERSION,style|WS_VISIBLE,\r
+ left,top,width,height,NULL,mmain,NULL,NULL);\r
+\r
+ CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);\r
+ ShowWindow(FrameWnd, SW_NORMAL);\r
+ UpdateWindow(FrameWnd);\r
+ UpdateRect();\r
\r
return 0;\r
}\r
return 0;\r
}\r
\r
-// starscream needs this\r
-unsigned char *rom_data = 0;\r
-unsigned int rom_size = 0;\r
-\r
int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR cmdline,int)\r
{\r
MSG msg;\r
HANDLE thread=NULL;\r
\r
FrameInit();\r
- ret=LoopInit(); if (ret) { LoopExit(); return 1; }\r
-\r
- // notaz: load rom\r
- static char rompath[MAX_PATH]; rompath[0] = 0;\r
- strcpy(rompath, cmdline + (cmdline[0] == '\"' ? 1 : 0));\r
- if(rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;\r
-\r
- pm_file *rom = 0;\r
- if(strlen(rompath) > 4) rom = pm_open(rompath);\r
- if(!rom) {\r
- OPENFILENAME of; ZeroMemory(&of, sizeof(OPENFILENAME));\r
- of.lStructSize = sizeof(OPENFILENAME);\r
- of.lpstrFilter = "ROMs\0*.smd;*.bin;*.gen\0";\r
- of.lpstrFile = rompath; rompath[0] = 0;\r
- of.nMaxFile = MAX_PATH;\r
- of.Flags = OFN_FILEMUSTEXIST|OFN_HIDEREADONLY;\r
- if(!GetOpenFileName(&of)) return 1;\r
- rom = pm_open(rompath);\r
- if(!rom) return 1;\r
- }\r
- romname = rompath;\r
-\r
- if(PicoCartLoad(rom, &rom_data, &rom_size)) {\r
- //RDebug::Print(_L("PicoCartLoad() failed."));\r
- //goto cleanup;\r
- }\r
- pm_close(rom);\r
-\r
- PicoCartInsert(rom_data, rom_size);\r
-\r
- // only now we got the mode (pal/ntsc), so init sound now\r
- DSoundInit();\r
+ ret=LoopInit(); if (ret) goto end0;\r
\r
// Make another thread to run LoopCode():\r
LoopQuit=0;\r
+ LoopWait=1; // wait for ROM to be loaded\r
thread=CreateThread(NULL,0,ThreadCode,NULL,0,&tid);\r
\r
+ LoadROM(cmdline);\r
+\r
// Main window loop:\r
for (;;)\r
{\r
LoopQuit=1; WaitForSingleObject(thread,5000);\r
CloseHandle(thread); thread=NULL;\r
\r
+end0:\r
LoopExit();\r
DestroyWindow(FrameWnd);\r
\r
- free(rom_data);\r
-\r
_CrtDumpMemoryLeaks();\r
return 0;\r
}\r
{\r
MessageBox(FrameWnd, text, "Error", 0);\r
}\r
-#endif\r
\r