/* -*- mode: c; tab-width: 4; c-basic-offset: 3; c-file-style: "linux" -*- */ // // Copyright (c) 2009, Wei Mingzhi . // All rights reserved. // // This file is part of SDLPAL. // // SDLPAL is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation, either version 3 of the License, or // (at your option) any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see . // // Modified by Lou Yihua with Unicode support, 2015 // #include "main.h" #if defined (NDS) && defined (GEKKO) # include #endif #if defined(LONGJMP_EXIT) #include static jmp_buf g_exit_jmp_buf; #endif #define BITMAPNUM_SPLASH_UP (gConfig.fIsWIN95 ? 0x03 : 0x26) #define BITMAPNUM_SPLASH_DOWN (gConfig.fIsWIN95 ? 0x04 : 0x27) #define SPRITENUM_SPLASH_TITLE 0x47 #define SPRITENUM_SPLASH_CRANE 0x49 #define NUM_RIX_TITLE 0x05 static VOID PAL_Init( VOID ) /*++ Purpose: Initialize everything needed by the game. Parameters: None. Return value: None. --*/ { int e; #if defined (NDS) && defined (GEKKO) fatInitDefault(); #endif // // Initialize defaults, video and audio // #if defined(DINGOO) if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_JOYSTICK) == -1) #elif defined (__WINRT__) if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO) == -1) #else if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_CDROM | SDL_INIT_NOPARACHUTE | SDL_INIT_JOYSTICK) == -1) #endif { #if defined (_WIN32) && SDL_MAJOR_VERSION == 1 && SDL_MINOR_VERSION <= 2 // // Try the WINDIB driver if DirectX failed. // putenv("SDL_VIDEODRIVER=windib"); if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_NOPARACHUTE | SDL_INIT_JOYSTICK) == -1) { TerminateOnError("Could not initialize SDL: %s.\n", SDL_GetError()); } #else TerminateOnError("Could not initialize SDL: %s.\n", SDL_GetError()); #endif } // // Initialize subsystems. // e = PAL_InitGlobals(); if (e != 0) { TerminateOnError("Could not initialize global data: %d.\n", e); } e = VIDEO_Startup(); if (e != 0) { TerminateOnError("Could not initialize Video: %d.\n", e); } SDL_WM_SetCaption("Loading...", NULL); e = PAL_InitFont(!gConfig.fIsWIN95 && gConfig.fUseEmbeddedFonts); if (e != 0) { TerminateOnError("Could not load fonts: %d.\n", e); } e = PAL_InitUI(); if (e != 0) { TerminateOnError("Could not initialize UI subsystem: %d.\n", e); } e = PAL_InitText(); if (e != 0) { TerminateOnError("Could not initialize text subsystem: %d.\n", e); } PAL_InitInput(); PAL_InitResources(); SOUND_OpenAudio(); if (gConfig.fIsWIN95) { #ifdef _DEBUG SDL_WM_SetCaption("Pal WIN95 (Debug Build)", NULL); #else SDL_WM_SetCaption("Pal WIN95", NULL); #endif } else { #ifdef _DEBUG SDL_WM_SetCaption("Pal (Debug Build)", NULL); #else SDL_WM_SetCaption("Pal", NULL); #endif } } VOID PAL_Shutdown( int exit_code ) /*++ Purpose: Free everything needed by the game. Parameters: exit_code - The exit code return to OS. Return value: None. --*/ { SOUND_CloseAudio(); PAL_FreeFont(); PAL_FreeResources(); PAL_FreeGlobals(); PAL_FreeUI(); PAL_FreeText(); PAL_ShutdownInput(); VIDEO_Shutdown(); UTIL_CloseLog(); SDL_Quit(); #if defined(GPH) chdir("/usr/gp2x"); execl("./gp2xmenu", "./gp2xmenu", NULL); #endif UTIL_Platform_Quit(); #if defined(LONGJMP_EXIT) longjmp(g_exit_jmp_buf, exit_code); #else # if defined (NDS) while (1); # else exit(exit_code); # endif #endif } VOID PAL_TrademarkScreen( VOID ) /*++ Purpose: Show the trademark screen. Parameters: None. Return value: None. --*/ { PAL_SetPalette(3, FALSE); PAL_RNGPlay(6, 0, 1000, 25); UTIL_Delay(1000); PAL_FadeOut(1); } VOID PAL_SplashScreen( VOID ) /*++ Purpose: Show the splash screen. Parameters: None. Return value: None. --*/ { SDL_Color *palette = PAL_GetPalette(1, FALSE); SDL_Color rgCurrentPalette[256]; SDL_Surface *lpBitmapDown, *lpBitmapUp; SDL_Rect srcrect, dstrect; LPSPRITE lpSpriteCrane; LPBITMAPRLE lpBitmapTitle; LPBYTE buf, buf2; int cranepos[9][3], i, iImgPos = 200, iCraneFrame = 0, iTitleHeight; DWORD dwTime, dwBeginTime; BOOL fUseCD = TRUE; if (palette == NULL) { fprintf(stderr, "ERROR: PAL_SplashScreen(): palette == NULL\n"); return; } // // Allocate all the needed memory at once for simplification // buf = (LPBYTE)UTIL_calloc(1, 320 * 200 * 2); buf2 = (LPBYTE)(buf + 320 * 200); lpSpriteCrane = (LPSPRITE)buf2 + 32000; // // Create the surfaces // lpBitmapDown = SDL_CreateRGBSurface(gpScreen->flags, 320, 200, 8, gpScreen->format->Rmask, gpScreen->format->Gmask, gpScreen->format->Bmask, gpScreen->format->Amask); lpBitmapUp = SDL_CreateRGBSurface(gpScreen->flags, 320, 200, 8, gpScreen->format->Rmask, gpScreen->format->Gmask, gpScreen->format->Bmask, gpScreen->format->Amask); #if SDL_VERSION_ATLEAST(2, 0, 0) SDL_SetSurfacePalette(lpBitmapDown, gpScreen->format->palette); SDL_SetSurfacePalette(lpBitmapUp, gpScreen->format->palette); #else SDL_SetPalette(lpBitmapDown, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256); SDL_SetPalette(lpBitmapUp, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256); #endif // // Read the bitmaps // PAL_MKFReadChunk(buf, 320 * 200, BITMAPNUM_SPLASH_UP, gpGlobals->f.fpFBP); Decompress(buf, buf2, 320 * 200); PAL_FBPBlitToSurface(buf2, lpBitmapUp); PAL_MKFReadChunk(buf, 320 * 200, BITMAPNUM_SPLASH_DOWN, gpGlobals->f.fpFBP); Decompress(buf, buf2, 320 * 200); PAL_FBPBlitToSurface(buf2, lpBitmapDown); PAL_MKFReadChunk(buf, 32000, SPRITENUM_SPLASH_TITLE, gpGlobals->f.fpMGO); Decompress(buf, buf2, 32000); lpBitmapTitle = (LPBITMAPRLE)PAL_SpriteGetFrame(buf2, 0); PAL_MKFReadChunk(buf, 32000, SPRITENUM_SPLASH_CRANE, gpGlobals->f.fpMGO); Decompress(buf, lpSpriteCrane, 32000); iTitleHeight = PAL_RLEGetHeight(lpBitmapTitle); lpBitmapTitle[2] = 0; lpBitmapTitle[3] = 0; // HACKHACK // // Generate the positions of the cranes // for (i = 0; i < 9; i++) { cranepos[i][0] = RandomLong(300, 600); cranepos[i][1] = RandomLong(0, 80); cranepos[i][2] = RandomLong(0, 8); } // // Play the title music // if (!SOUND_PlayCDA(7)) { fUseCD = FALSE; SOUND_PlayMUS(NUM_RIX_TITLE, TRUE, 2); } // // Clear all of the events and key states // PAL_ProcessEvent(); PAL_ClearKeyState(); dwBeginTime = SDL_GetTicks(); srcrect.x = 0; srcrect.w = 320; dstrect.x = 0; dstrect.w = 320; while (TRUE) { PAL_ProcessEvent(); dwTime = SDL_GetTicks() - dwBeginTime; // // Set the palette // if (dwTime < 15000) { for (i = 0; i < 256; i++) { rgCurrentPalette[i].r = (BYTE)(palette[i].r * ((float)dwTime / 15000)); rgCurrentPalette[i].g = (BYTE)(palette[i].g * ((float)dwTime / 15000)); rgCurrentPalette[i].b = (BYTE)(palette[i].b * ((float)dwTime / 15000)); } } VIDEO_SetPalette(rgCurrentPalette); #if SDL_VERSION_ATLEAST(2, 0, 0) SDL_SetSurfacePalette(lpBitmapDown, gpScreen->format->palette); SDL_SetSurfacePalette(lpBitmapUp, gpScreen->format->palette); #else SDL_SetPalette(lpBitmapDown, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256); SDL_SetPalette(lpBitmapUp, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256); #endif // // Draw the screen // if (iImgPos > 1) { iImgPos--; } // // The upper part... // srcrect.y = iImgPos; srcrect.h = 200 - iImgPos; dstrect.y = 0; dstrect.h = srcrect.h; SDL_BlitSurface(lpBitmapUp, &srcrect, gpScreen, &dstrect); // // The lower part... // srcrect.y = 0; srcrect.h = iImgPos; dstrect.y = 200 - iImgPos; dstrect.h = srcrect.h; SDL_BlitSurface(lpBitmapDown, &srcrect, gpScreen, &dstrect); // // Draw the cranes... // for (i = 0; i < 9; i++) { LPCBITMAPRLE lpFrame = PAL_SpriteGetFrame(lpSpriteCrane, cranepos[i][2] = (cranepos[i][2] + (iCraneFrame & 1)) % 8); cranepos[i][1] += ((iImgPos > 1) && (iImgPos & 1)) ? 1 : 0; PAL_RLEBlitToSurface(lpFrame, gpScreen, PAL_XY(cranepos[i][0], cranepos[i][1])); cranepos[i][0]--; } iCraneFrame++; // // Draw the title... // if (PAL_RLEGetHeight(lpBitmapTitle) < iTitleHeight) { // // HACKHACK // WORD w = lpBitmapTitle[2] | (lpBitmapTitle[3] << 8); w++; lpBitmapTitle[2] = (w & 0xFF); lpBitmapTitle[3] = (w >> 8); } PAL_RLEBlitToSurface(lpBitmapTitle, gpScreen, PAL_XY(255, 10)); VIDEO_UpdateScreen(NULL); // // Check for keypress... // if (g_InputState.dwKeyPress & (kKeyMenu | kKeySearch)) { // // User has pressed a key... // lpBitmapTitle[2] = iTitleHeight & 0xFF; lpBitmapTitle[3] = iTitleHeight >> 8; // HACKHACK PAL_RLEBlitToSurface(lpBitmapTitle, gpScreen, PAL_XY(255, 10)); VIDEO_UpdateScreen(NULL); if (dwTime < 15000) { // // If the picture has not completed fading in, complete the rest // while (dwTime < 15000) { for (i = 0; i < 256; i++) { rgCurrentPalette[i].r = (BYTE)(palette[i].r * ((float)dwTime / 15000)); rgCurrentPalette[i].g = (BYTE)(palette[i].g * ((float)dwTime / 15000)); rgCurrentPalette[i].b = (BYTE)(palette[i].b * ((float)dwTime / 15000)); } VIDEO_SetPalette(rgCurrentPalette); #if SDL_VERSION_ATLEAST(2, 0, 0) SDL_SetSurfacePalette(lpBitmapDown, gpScreen->format->palette); SDL_SetSurfacePalette(lpBitmapUp, gpScreen->format->palette); #else SDL_SetPalette(lpBitmapDown, SDL_PHYSPAL | SDL_LOGPAL, VIDEO_GetPalette(), 0, 256); SDL_SetPalette(lpBitmapUp, SDL_PHYSPAL | SDL_LOGPAL, VIDEO_GetPalette(), 0, 256); #endif UTIL_Delay(8); dwTime += 250; } UTIL_Delay(500); } // // Quit the splash screen // break; } // // Delay a while... // PAL_ProcessEvent(); while (SDL_GetTicks() - dwBeginTime < dwTime + 85) { SDL_Delay(1); PAL_ProcessEvent(); } } SDL_FreeSurface(lpBitmapDown); SDL_FreeSurface(lpBitmapUp); free(buf); if (!fUseCD) { SOUND_PlayMUS(0, FALSE, 1); } PAL_FadeOut(1); } int main( int argc, char *argv[] ) /*++ Purpose: Program entry. Parameters: argc - Number of arguments. argv - Array of arguments. Return value: Integer value. --*/ { #if defined(LONGJMP_EXIT) int exit_code; if (exit_code = setjmp(g_exit_jmp_buf)) return exit_code != 1 ? exit_code : 0; #endif #if defined(__APPLE__) && !defined(__IOS__) char *p = strstr(argv[0], "/Pal.app/"); if (p != NULL) { char buf[4096]; strcpy(buf, argv[0]); buf[p - argv[0]] = '\0'; chdir(buf); } #endif UTIL_OpenLog(); #if defined(_WIN32) && SDL_MAJOR_VERSION == 1 && SDL_MINOR_VERSION <= 2 putenv("SDL_VIDEODRIVER=directx"); #endif PAL_LoadConfig(TRUE); // // Platform-specific initialization // if (UTIL_Platform_Init(argc, argv) != 0) return -1; // // Should launch setting // However, it may arrive here through the activatation event on WinRT platform // So close the current process so that the new process can go to setting // if (gConfig.fLaunchSetting) return 0; // // Initialize everything // PAL_Init(); // // Show the trademark screen and splash screen // PAL_TrademarkScreen(); PAL_SplashScreen(); // // Run the main game routine // PAL_GameMain(); // // Should not really reach here... // assert(FALSE); return 255; }