static void changescreen(UINT8 newmode) {
UINT8 change;
UINT8 renewal;
change = scrnmode ^ newmode;
renewal = (change & SCRNMODE_FULLSCREEN);
if (newmode & SCRNMODE_FULLSCREEN) {
renewal |= (change & SCRNMODE_HIGHCOLOR);
}
else {
renewal |= (change & SCRNMODE_ROTATEMASK);
}
if (renewal) {
soundmng_stop();
mousemng_disable(MOUSEPROC_WINUI);
scrnmng_destroy();
if (scrnmng_create(newmode) == SUCCESS) {
scrnmode = newmode;
}
else {
if (scrnmng_create(scrnmode) != SUCCESS) {
PostQuitMessage(0);
return;
}
}
scrndraw_redraw();
mousemng_enable(MOUSEPROC_WINUI);
soundmng_play();
}
else {
scrnmode = newmode;
}
}
static void eventproc(EventRecord *event) {
int keycode;
keycode = (event->message & keyCodeMask) >> 8;
switch(event->what) {
case mouseDown:
HandleMouseDown(event);
break;
case updateEvt:
HandleUpdateEvent(event);
break;
case keyDown:
case autoKey:
if (!np2running) {
break;
}
#if !TARGET_API_MAC_CARBON
if ((keycode == 0x6f) && (np2oscfg.F12KEY == 0)) {
HandleMenuChoice(IDM_MOUSE);
break;
}
#endif
if (event->modifiers & cmdKey) {
#if !TARGET_API_MAC_CARBON
if (mackbd_keydown(keycode, TRUE)) {
break;
}
#endif
soundmng_stop();
mousemng_disable(MOUSEPROC_MACUI);
#if TARGET_API_MAC_CARBON
HandleMenuChoice(MenuEvent(event));
#else
HandleMenuChoice(MenuKey(event->message & charCodeMask));
#endif
mousemng_enable(MOUSEPROC_MACUI);
soundmng_play();
}
else {
mackbd_keydown(keycode, FALSE);
}
break;
case keyUp:
mackbd_keyup(keycode);
break;
case mouseUp:
mousemng_buttonevent(MOUSEMNG_LEFTUP);
mousemng_buttonevent(MOUSEMNG_RIGHTUP);
break;
case activateEvt:
mackbd_activate((event->modifiers & activeFlag)?TRUE:FALSE);
break;
}
}
static void HandleMouseDown(EventRecord *pevent) {
WindowPtr hWnd;
Rect rDrag;
switch(FindWindow(pevent->where, &hWnd)) {
case inMenuBar:
if (np2running) {
soundmng_stop();
mousemng_disable(MOUSEPROC_MACUI);
HandleMenuChoice(MenuSelect(pevent->where));
mousemng_enable(MOUSEPROC_MACUI);
soundmng_play();
}
break;
case inDrag:
#if TARGET_API_MAC_CARBON
{
BitMap gscreenBits;
GetQDGlobalsScreenBits(&gscreenBits);
rDrag = gscreenBits.bounds;
InsetRect(&rDrag, DRAG_THRESHOLD, DRAG_THRESHOLD);
DragWindow(hWnd, pevent->where, &rDrag);
}
#else
rDrag = qd.screenBits.bounds;
InsetRect(&rDrag, DRAG_THRESHOLD, DRAG_THRESHOLD);
DragWindow(hWnd, pevent->where, &rDrag);
#endif
break;
case inContent:
mousemng_buttonevent((pevent->modifiers & (1 << 12))
?MOUSEMNG_RIGHTDOWN:MOUSEMNG_LEFTDOWN);
break;
case inGoAway:
if (TrackGoAway(hWnd, pevent->where)) { }
np2running = FALSE;
break;
}
}
int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPreInst,
LPSTR lpszCmdLine, int nCmdShow) {
WNDCLASS wc;
MSG msg;
HWND hWnd;
int i;
#ifdef OPENING_WAIT
UINT32 tick;
#endif
_MEM_INIT();
GetModuleFileName(NULL, modulefile, NELEMENTS(modulefile));
dosio_init();
file_setcd(modulefile);
np2arg_analize();
initload();
memdbg_readini();
skbdwin_readini();
rand_setseed((unsigned)time(NULL));
if ((hWnd = FindWindow(szClassName, NULL)) != NULL) {
ShowWindow(hWnd, SW_RESTORE);
SetForegroundWindow(hWnd);
dosio_term();
return(FALSE);
}
hInst = hInstance;
hPrev = hPreInst;
TRACEINIT();
if (np2oscfg.KEYBOARD >= KEY_TYPEMAX) { // ver0.28
int keytype = GetKeyboardType(1);
if ((keytype & 0xff00) == 0x0d00) {
np2oscfg.KEYBOARD = KEY_PC98;
}
else if (!keytype) {
np2oscfg.KEYBOARD = KEY_KEY101;
}
else {
np2oscfg.KEYBOARD = KEY_KEY106;
}
}
keystat_initialize();
if (!hPreInst) {
wc.style = CS_BYTEALIGNCLIENT | CS_HREDRAW | CS_VREDRAW;
wc.lpfnWndProc = WndProc;
wc.cbClsExtra = 0;
wc.cbWndExtra = 0;
wc.hInstance = hInstance;
wc.hIcon = LoadIcon(hInstance, MAKEINTRESOURCE(IDI_ICON1));
wc.hCursor = LoadCursor(NULL, IDC_ARROW);
wc.hbrBackground = (HBRUSH)GetStockObject(BLACK_BRUSH);
wc.lpszMenuName = MAKEINTRESOURCE(IDR_MAIN);
wc.lpszClassName = szClassName;
if (!RegisterClass(&wc)) {
return(FALSE);
}
}
memdbg_initialize(hInstance);
skbdwin_initialize(hInstance);
mousemng_initialize();
hWnd = CreateWindowEx(0, szClassName, szAppCaption,
WS_OVERLAPPED | WS_SYSMENU | WS_CAPTION |
WS_MINIMIZEBOX,
np2oscfg.winx, np2oscfg.winy, 640, 400,
NULL, NULL, hInstance, NULL);
hWndMain = hWnd;
scrnmng_initialize();
xmenu_setroltate(0);
xmenu_setdispmode(np2cfg.DISPSYNC);
xmenu_setraster(np2cfg.RASTER);
xmenu_setwaitflg(np2oscfg.NOWAIT);
xmenu_setframe(np2oscfg.DRAW_SKIP);
xmenu_setkey(0);
xmenu_setxshift(0);
xmenu_setf12copy(np2oscfg.F12COPY);
xmenu_setbeepvol(np2cfg.BEEP_VOL);
xmenu_setsound(np2cfg.SOUND_SW);
xmenu_setjastsound(np2oscfg.jastsnd);
xmenu_setmotorflg(np2cfg.MOTOR);
xmenu_setextmem(np2cfg.EXTMEM);
xmenu_setmouse(np2oscfg.MOUSE_SW);
xmenu_setbtnmode(np2cfg.BTN_MODE);
xmenu_setbtnrapid(np2cfg.BTN_RAPID);
xmenu_setmsrapid(np2cfg.MOUSERAPID);
ShowWindow(hWnd, nCmdShow);
UpdateWindow(hWnd);
#ifdef OPENING_WAIT
tick = GetTickCount();
#endif
sysmenu_initialize();
xmenu_initialize();
DrawMenuBar(hWnd);
// ver0.30
if (file_attr_c(np2help) == (short)-1) {
EnableMenuItem(GetMenu(hWnd), IDM_HELP, MF_GRAYED);
}
scrnmode = 0;
if (np2arg.fullscreen) {
scrnmode |= SCRNMODE_FULLSCREEN;
}
if (np2cfg.RASTER) {
scrnmode |= SCRNMODE_HIGHCOLOR;
}
if (scrnmng_create(scrnmode) != SUCCESS) {
scrnmode ^= SCRNMODE_FULLSCREEN;
if (scrnmng_create(scrnmode) != SUCCESS) {
MessageBox(hWnd, _T("Couldn't create DirectDraw Object"),
szAppCaption, MB_OK | MB_ICONSTOP);
return(FALSE);
}
}
soundmng_initialize();
if (np2oscfg.MOUSE_SW) { // ver0.30
mousemng_enable(MOUSEPROC_SYSTEM);
}
commng_initialize();
sysmng_initialize();
joy_init();
pccore_init();
S98_init();
#ifdef OPENING_WAIT
while((GetTickCount() - tick) < OPENING_WAIT);
#endif
scrndraw_redraw();
pccore_reset();
np2opening = 0;
// れじうむ
#if defined(SUPPORT_RESUME)
if (np2oscfg.resume) {
int id;
id = flagload(str_sav, str_resume, FALSE);
if (id == IDYES) {
for (i=0; i<4; i++) np2arg.disk[i] = NULL;
}
else if (id == IDCANCEL) {
DestroyWindow(hWnd);
mousemng_disable(MOUSEPROC_WINUI);
S98_trash();
pccore_term();
soundmng_deinitialize();
scrnmng_destroy();
TRACETERM();
dosio_term();
return(0);
}
}
#endif
// リセットしてから… コマンドラインのディスク挿入。 // ver0.29
for (i=0; i<4; i++) {
if (np2arg.disk[i]) {
diskdrv_readyfdd((REG8)i, np2arg.disk[i], 0);
}
}
memdbg_create();
skbdwin_create();
while(1) {
if (PeekMessage(&msg, 0, 0, 0, PM_NOREMOVE)) {
if (!GetMessage(&msg, NULL, 0, 0)) {
break;
}
if ((msg.message != WM_SYSKEYDOWN) &&
(msg.message != WM_SYSKEYUP)) {
TranslateMessage(&msg);
}
DispatchMessage(&msg);
}
else {
if (np2oscfg.NOWAIT) {
joy_flash();
mousemng_sync();
pccore_exec(framecnt == 0);
if (np2oscfg.DRAW_SKIP) { // nowait frame skip
framecnt++;
if (framecnt >= np2oscfg.DRAW_SKIP) {
processwait(0);
}
}
else { // nowait auto skip
framecnt = 1;
if (timing_getcount()) {
processwait(0);
}
}
}
else if (np2oscfg.DRAW_SKIP) { // frame skip
if (framecnt < np2oscfg.DRAW_SKIP) {
joy_flash();
mousemng_sync();
pccore_exec(framecnt == 0);
framecnt++;
}
else {
processwait(np2oscfg.DRAW_SKIP);
}
}
else { // auto skip
if (!waitcnt) {
UINT cnt;
joy_flash();
mousemng_sync();
pccore_exec(framecnt == 0);
framecnt++;
cnt = timing_getcount();
if (framecnt > cnt) {
waitcnt = framecnt;
if (framemax > 1) {
framemax--;
}
}
else if (framecnt >= framemax) {
if (framemax < 12) {
framemax++;
}
if (cnt >= 12) {
timing_reset();
}
else {
timing_setcount(cnt - framecnt);
}
framereset();
}
}
else {
processwait(waitcnt);
waitcnt = framecnt;
}
}
}
}
pccore_cfgupdate();
mousemng_disable(MOUSEPROC_WINUI);
S98_trash();
#if defined(SUPPORT_RESUME)
if (np2oscfg.resume) {
flagsave(str_sav);
}
else {
flagdelete(str_sav);
}
#endif
pccore_term();
memdbg_destroy();
skbdwin_destroy();
soundmng_deinitialize();
scrnmng_destroy();
if (sys_updates & (SYS_UPDATECFG | SYS_UPDATEOSCFG)) {
initsave();
memdbg_writeini();
skbdwin_writeini();
}
skbdwin_deinitialize();
TRACETERM();
_MEM_USED("report.txt");
dosio_term();
return static_cast<int>(msg.wParam);
}
LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) {
PAINTSTRUCT ps;
RECT rc;
HDC hdc;
UINT update;
switch (msg) {
case WM_CREATE:
#ifndef __GNUC__
WINNLSEnableIME(hWnd, FALSE);
#endif
break;
case WM_SYSCOMMAND:
update = 0;
switch(wParam) {
case IDM_MEMORYDUMP:
debugsub_memorydump();
break;
default:
return(DefWindowProc(hWnd, msg, wParam, lParam));
}
sysmng_update(update);
break;
case WM_COMMAND:
np2cmd(hWnd, LOWORD(wParam));
break;
case WM_ACTIVATE:
if (LOWORD(wParam) != WA_INACTIVE) {
scrnmng_update();
keystat_allrelease();
mousemng_enable(MOUSEPROC_BG);
}
else {
mousemng_disable(MOUSEPROC_BG);
}
break;
case WM_PAINT:
hdc = BeginPaint(hWnd, &ps);
if (np2opening) {
HINSTANCE hinst;
RECT rect;
int width;
int height;
HBITMAP hbmp;
BITMAP bmp;
HDC hmdc;
HBRUSH hbrush;
#if defined(_WIN64)
hinst = reinterpret_cast<HINSTANCE>(::GetWindowLongPtr(hWnd, GWLP_HINSTANCE));
#else
hinst = reinterpret_cast<HINSTANCE>(::GetWindowLong(hWnd, GWL_HINSTANCE));
#endif
GetClientRect(hWnd, &rect);
width = rect.right - rect.left;
height = rect.bottom - rect.top;
hbmp = LoadBitmap(hinst, _T("NP2BMP"));
GetObject(hbmp, sizeof(BITMAP), &bmp);
hbrush = (HBRUSH)SelectObject(hdc,
GetStockObject(BLACK_BRUSH));
PatBlt(hdc, 0, 0, width, height, PATCOPY);
SelectObject(hdc, hbrush);
hmdc = CreateCompatibleDC(hdc);
SelectObject(hmdc, hbmp);
BitBlt(hdc, (width - bmp.bmWidth) / 2,
(height - bmp.bmHeight) / 2,
bmp.bmWidth, bmp.bmHeight, hmdc, 0, 0, SRCCOPY);
DeleteDC(hmdc);
DeleteObject(hbmp);
}
else {
// scrnmng_update();
scrndraw_redraw();
}
EndPaint(hWnd, &ps);
break;
case WM_QUERYNEWPALETTE:
scrnmng_querypalette();
break;
case WM_MOVE:
if ((!scrnmng_isfullscreen()) &&
(!(GetWindowLong(hWnd, GWL_STYLE) &
(WS_MAXIMIZE | WS_MINIMIZE)))) {
GetWindowRect(hWnd, &rc);
np2oscfg.winx = rc.left;
np2oscfg.winy = rc.top;
sysmng_update(SYS_UPDATEOSCFG);
}
break;
case WM_SIZE:
if (wParam == SIZE_RESTORED) {
scrnmng_restoresize();
}
break;
case WM_ENTERMENULOOP:
winuienter();
if (scrnmng_isfullscreen()) {
DrawMenuBar(hWnd);
}
break;
case WM_EXITMENULOOP:
winuileave();
break;
case WM_ENTERSIZEMOVE:
soundmng_disable(SNDPROC_MAIN);
mousemng_disable(MOUSEPROC_WINUI);
break;
case WM_EXITSIZEMOVE:
mousemng_enable(MOUSEPROC_WINUI);
soundmng_enable(SNDPROC_MAIN);
break;
case WM_KEYDOWN:
if (wParam == VK_F11) {
return(DefWindowProc(hWnd, WM_SYSKEYDOWN, VK_F10, lParam));
}
if ((wParam == VK_F12) && (!np2oscfg.F12COPY)) {
mousemng_toggle(MOUSEPROC_SYSTEM);
xmenu_setmouse(np2oscfg.MOUSE_SW ^ 1);
sysmng_update(SYS_UPDATECFG);
}
else {
winkbd_keydown(wParam, lParam);
}
break;
case WM_KEYUP:
if (wParam == VK_F11) {
return(DefWindowProc(hWnd, WM_SYSKEYUP, VK_F10, lParam));
}
if ((wParam != VK_F12) || (np2oscfg.F12COPY)) {
winkbd_keyup(wParam, lParam);
}
break;
case WM_SYSKEYDOWN:
winkbd_keydown(wParam, lParam);
break;
case WM_SYSKEYUP:
winkbd_keyup(wParam, lParam);
break;
case WM_LBUTTONDOWN:
if (!mousemng_buttonevent(MOUSEMNG_LEFTDOWN)) {
return(DefWindowProc(hWnd, msg, wParam, lParam));
}
break;
case WM_LBUTTONUP:
if (!mousemng_buttonevent(MOUSEMNG_LEFTUP)) {
return(DefWindowProc(hWnd, msg, wParam, lParam));
}
break;
case WM_MBUTTONDOWN: // ver0.26
mousemng_toggle(MOUSEPROC_SYSTEM);
xmenu_setmouse(np2oscfg.MOUSE_SW ^ 1);
sysmng_update(SYS_UPDATECFG);
break;
case WM_RBUTTONDOWN:
if (!mousemng_buttonevent(MOUSEMNG_RIGHTDOWN)) {
return(DefWindowProc(hWnd, msg, wParam, lParam));
}
break;
case WM_RBUTTONUP:
if (!mousemng_buttonevent(MOUSEMNG_RIGHTUP)) {
return(DefWindowProc(hWnd, msg, wParam, lParam));
}
break;
case WM_CLOSE:
DestroyWindow(hWnd);
break;
case WM_DESTROY:
PostQuitMessage(0);
break;
case WM_NP2CMD:
switch(LOWORD(lParam)) {
case NP2CMD_EXIT:
np2quitmsg = 1;
PostQuitMessage(0);
break;
case NP2CMD_EXIT2:
np2quitmsg = 2;
PostQuitMessage(0);
break;
case NP2CMD_RESET:
pccore_cfgupdate();
pccore_reset();
break;
}
break;
default:
return(DefWindowProc(hWnd, msg, wParam, lParam));
}
return(0L);
}
int main(int argc, char *argv[]) {
Rect wRect;
EventRecord event;
UINT t;
GrafPtr saveport;
Point pt;
dosio_init();
file_setcd(target);
InitToolBox();
macossub_init();
initload();
MenuBarInit();
TRACEINIT();
keystat_initialize();
SetRect(&wRect, np2oscfg.posx, np2oscfg.posy, 100, 100);
#if !defined(SUPPORT_PC9821)
hWndMain = NewWindow(0, &wRect, "\pNeko Project II", FALSE,
noGrowDocProc, (WindowPtr)-1, TRUE, 0);
#else
hWndMain = NewWindow(0, &wRect, "\pNeko Project 21", FALSE,
noGrowDocProc, (WindowPtr)-1, TRUE, 0);
#endif
if (!hWndMain) {
TRACETERM();
macossub_term();
dosio_term();
return(0);
}
scrnmng_initialize();
SizeWindow(hWndMain, 640, 400, TRUE);
ShowWindow(hWndMain);
menu_setrotate(0);
menu_setdispmode(np2cfg.DISPSYNC);
menu_setraster(np2cfg.RASTER);
menu_setwaitflg(np2oscfg.NOWAIT);
menu_setframe(np2oscfg.DRAW_SKIP);
menu_setkey(0);
menu_setxshift(0);
menu_setf11key(np2oscfg.F11KEY);
menu_setf12key(np2oscfg.F12KEY);
menu_setbeepvol(np2cfg.BEEP_VOL);
menu_setsound(np2cfg.SOUND_SW);
menu_setjastsnd(np2oscfg.jastsnd);
menu_setmotorflg(np2cfg.MOTOR);
menu_setextmem(np2cfg.EXTMEM);
menu_setdispclk(np2oscfg.DISPCLK);
menu_setbtnrapid(np2cfg.BTN_RAPID);
menu_setbtnmode(np2cfg.BTN_MODE);
scrnmode = 0;
if (scrnmng_create(scrnmode) != SUCCESS) {
TRACETERM();
macossub_term();
dosio_term();
DisposeWindow(hWndMain);
return(0);
}
np2open();
t = GETTICK();
while((GETTICK() - t) < 100) {
if (WaitNextEvent(everyEvent, &event, 0, 0)) {
eventproc(&event);
}
}
commng_initialize();
sysmng_initialize();
mackbd_initialize();
pccore_init();
S98_init();
mousemng_initialize();
if (np2oscfg.MOUSE_SW) { // ver0.30
mousemng_enable(MOUSEPROC_SYSTEM);
}
// scrndraw_redraw();
pccore_reset();
#if defined(SUPPORT_RESUME)
if (np2oscfg.resume) {
flagload(np2resumeext, FALSE);
}
#endif
SetEventMask(everyEvent);
np2running = TRUE;
while(np2running) {
if (WaitNextEvent(everyEvent, &event, 0, 0)) {
eventproc(&event);
}
else {
if (np2oscfg.NOWAIT) {
mackbd_callback();
mousemng_callback();
pccore_exec(framecnt == 0);
if (np2oscfg.DRAW_SKIP) { // nowait frame skip
framecnt++;
if (framecnt >= np2oscfg.DRAW_SKIP) {
processwait(0);
}
}
else { // nowait auto skip
framecnt = 1;
if (timing_getcount()) {
processwait(0);
}
}
}
else if (np2oscfg.DRAW_SKIP) { // frame skip
if (framecnt < np2oscfg.DRAW_SKIP) {
mackbd_callback();
mousemng_callback();
pccore_exec(framecnt == 0);
framecnt++;
}
else {
processwait(np2oscfg.DRAW_SKIP);
}
}
else { // auto skip
if (!waitcnt) {
UINT cnt;
mackbd_callback();
mousemng_callback();
pccore_exec(framecnt == 0);
framecnt++;
cnt = timing_getcount();
if (framecnt > cnt) {
waitcnt = framecnt;
if (framemax > 1) {
framemax--;
}
}
else if (framecnt >= framemax) {
if (framemax < 12) {
framemax++;
}
if (cnt >= 12) {
timing_reset();
}
else {
timing_setcount(cnt - framecnt);
}
framereset();
}
}
else {
processwait(waitcnt);
waitcnt = framecnt;
}
}
}
}
GetPort(&saveport);
#if TARGET_API_MAC_CARBON
SetPortWindowPort(hWndMain);
#else
SetPort(hWndMain);
#endif
pt.h = 0;
pt.v = 0;
LocalToGlobal(&pt);
SetPort(saveport);
if ((np2oscfg.posx != pt.h) || (np2oscfg.posy != pt.v)) {
np2oscfg.posx = pt.h;
np2oscfg.posy = pt.v;
sysmng_update(SYS_UPDATEOSCFG);
}
np2running = FALSE;
pccore_cfgupdate();
#if defined(SUPPORT_RESUME)
if (np2oscfg.resume) {
flagsave(np2resumeext);
}
else {
flagdelete(np2resumeext);
}
#endif
pccore_term();
S98_trash();
mousemng_disable(MOUSEPROC_SYSTEM);
scrnmng_destroy();
if (sys_updates & (SYS_UPDATECFG | SYS_UPDATEOSCFG)) {
initsave();
}
TRACETERM();
macossub_term();
dosio_term();
DisposeWindow(hWndMain);
(void)argc;
(void)argv;
return(0);
}
