frodo-wii/Src/main_WIN32.i

114 lines
2.0 KiB
OpenEdge ABL
Raw Normal View History

2008-12-31 17:16:24 +01:00
/*
* main_WIN32.i - Main program, WIN32 specific stuff
*
* Frodo (C) 1994-1997,2002 Christian Bauer
* WIN32 code by J. Richard Sladkey <jrs@world.std.com>
*/
#include <math.h>
// The application.
Frodo *TheApp;
// WinMain args.
HINSTANCE hInstance;
int nCmdShow;
HWND hwnd;
int PASCAL WinMain(HINSTANCE hInstance_arg, HINSTANCE /* hPrevInstance */, LPSTR lpCmdLine, int nCmdShow_arg)
{
hInstance = hInstance_arg;
nCmdShow = nCmdShow_arg;
TheApp = new Frodo();
TheApp->ArgvReceived(__argc, __argv);
TheApp->ReadyToRun();
delete TheApp;
DestroyWindow(hwnd);
return 0;
}
/*
* Constructor: Initialize member variables
*/
Frodo::Frodo()
{
TheC64 = NULL;
prefs_path[0] = 0;
}
Frodo::~Frodo()
{
delete TheC64;
}
/*
* Process command line arguments
*/
void Frodo::ArgvReceived(int argc, char **argv)
{
char *progname = argv[0];
argc--, argv++;
if (argc >= 1 && argv[0][0] != '\0') {
// XXX: This should be a function.
char cwd[256];
GetCurrentDirectory(sizeof(cwd), cwd);
int cwd_len = strlen(cwd);
if (cwd_len > 0 && cwd[cwd_len - 1] != '\\') {
strcat(cwd, "\\");
cwd_len++;
}
if (strnicmp(argv[0], cwd, cwd_len) == 0)
strncpy(prefs_path, argv[0] + cwd_len, 255);
else
strncpy(prefs_path, argv[0], 255);
int length = strlen(prefs_path);
if (length > 4 && strchr(prefs_path, '.') == NULL)
strcat(prefs_path, ".fpr");
}
}
/*
* Arguments processed, run emulation
*/
void Frodo::ReadyToRun(void)
{
getcwd(AppDirPath, 256);
// Load preferences
if (!prefs_path[0])
strcpy(prefs_path, "Frodo.fpr");
ThePrefs.Load(prefs_path);
if (ThePrefs.PrefsAtStartup) {
if (!ThePrefs.ShowEditor(TRUE, prefs_path))
return;
}
// Create and start C64
TheC64 = new C64;
if (load_rom_files())
TheC64->Run();
}
/*
* Run preferences editor
*/
void Frodo::RunPrefsEditor(void)
{
Prefs *prefs = new Prefs(ThePrefs);
if (prefs->ShowEditor(FALSE, prefs_path)) {
TheC64->NewPrefs(prefs);
ThePrefs = *prefs;
}
delete prefs;
}