// WL_INTER.C #include "wl_def.h" #pragma hdrstop LRstruct LevelRatios[LRpack]; int32_t lastBreathTime = 0; void Write (int x, int y, const char *string); //========================================================================== /* ================== = = CLearSplitVWB = ================== */ void ClearSplitVWB (void) { WindowX = 0; WindowY = 0; WindowW = 320; WindowH = 160; } //========================================================================== #ifdef SPEAR #ifndef SPEARDEMO //////////////////////////////////////////////////////// // // End of Spear of Destiny // //////////////////////////////////////////////////////// void EndScreen (int palette, int screen) { SDL_Color pal[256]; CA_CacheScreen (screen); VW_UpdateScreen (); CA_CacheGrChunk (palette); VL_ConvertPalette(grsegs[palette], pal, 256); VL_FadeIn (0, 255, pal, 30); UNCACHEGRCHUNK (palette); IN_ClearKeysDown (); IN_Ack (); VW_FadeOut (); } void EndSpear (void) { SDL_Color pal[256]; EndScreen (END1PALETTE, ENDSCREEN11PIC); CA_CacheScreen (ENDSCREEN3PIC); VW_UpdateScreen (); CA_CacheGrChunk (END3PALETTE); VL_ConvertPalette(grsegs[END3PALETTE], pal, 256); VL_FadeIn (0, 255, pal, 30); UNCACHEGRCHUNK (END3PALETTE); fontnumber = 0; fontcolor = 0xd0; WindowX = 0; WindowW = 320; PrintX = 0; PrintY = 180; US_CPrint (STR_ENDGAME1 "\n"); US_CPrint (STR_ENDGAME2); VW_UpdateScreen (); IN_UserInput(700); PrintX = 0; PrintY = 180; VWB_Bar (0, 180, 320, 20, 0); US_CPrint (STR_ENDGAME3 "\n"); US_CPrint (STR_ENDGAME4); VW_UpdateScreen (); IN_UserInput(700); VW_FadeOut (); EndScreen (END4PALETTE, ENDSCREEN4PIC); EndScreen (END5PALETTE, ENDSCREEN5PIC); EndScreen (END6PALETTE, ENDSCREEN6PIC); EndScreen (END7PALETTE, ENDSCREEN7PIC); EndScreen (END8PALETTE, ENDSCREEN8PIC); EndScreen (END9PALETTE, ENDSCREEN9PIC); EndScreen (END2PALETTE, ENDSCREEN12PIC); MainMenu[savegame].active = 0; } #endif #endif //========================================================================== /* ================== = = Victory = ================== */ void Victory (void) { #ifndef SPEARDEMO int32_t sec; int i, min, kr, sr, tr, x; char tempstr[8]; #define RATIOX 6 #define RATIOY 14 #define TIMEX 14 #define TIMEY 8 #ifdef SPEAR StartCPMusic (XTHEEND_MUS); CA_CacheGrChunk (BJCOLLAPSE1PIC); CA_CacheGrChunk (BJCOLLAPSE2PIC); CA_CacheGrChunk (BJCOLLAPSE3PIC); CA_CacheGrChunk (BJCOLLAPSE4PIC); VWB_Bar (0, 0, 320, 200, VIEWCOLOR); VWB_DrawPic (124, 44, BJCOLLAPSE1PIC); VW_UpdateScreen (); VW_FadeIn (); VW_WaitVBL (2 * 70); VWB_DrawPic (124, 44, BJCOLLAPSE2PIC); VW_UpdateScreen (); VW_WaitVBL (105); VWB_DrawPic (124, 44, BJCOLLAPSE3PIC); VW_UpdateScreen (); VW_WaitVBL (105); VWB_DrawPic (124, 44, BJCOLLAPSE4PIC); VW_UpdateScreen (); VW_WaitVBL (3 * 70); UNCACHEGRCHUNK (BJCOLLAPSE1PIC); UNCACHEGRCHUNK (BJCOLLAPSE2PIC); UNCACHEGRCHUNK (BJCOLLAPSE3PIC); UNCACHEGRCHUNK (BJCOLLAPSE4PIC); VL_FadeOut (0, 255, 0, 17, 17, 5); #endif StartCPMusic (URAHERO_MUS); ClearSplitVWB (); CacheLump (LEVELEND_LUMP_START, LEVELEND_LUMP_END); CA_CacheGrChunk (STARTFONT); #ifndef SPEAR CA_CacheGrChunk (C_TIMECODEPIC); #endif VWB_Bar (0, 0, 320, screenHeight / scaleFactor - STATUSLINES + 1, VIEWCOLOR); if (bordercol != VIEWCOLOR) DrawStatusBorder (VIEWCOLOR); #ifdef JAPAN #ifndef JAPDEMO CA_CacheGrChunk (C_ENDRATIOSPIC); VWB_DrawPic (0, 0, C_ENDRATIOSPIC); UNCACHEGRCHUNK (C_ENDRATIOSPIC); #endif #else Write (18, 2, STR_YOUWIN); Write (TIMEX, TIMEY - 2, STR_TOTALTIME); Write (12, RATIOY - 2, "averages"); #ifdef SPANISH Write (RATIOX + 2, RATIOY, STR_RATKILL); Write (RATIOX + 2, RATIOY + 2, STR_RATSECRET); Write (RATIOX + 2, RATIOY + 4, STR_RATTREASURE); #else Write (RATIOX + 8, RATIOY, STR_RATKILL); Write (RATIOX + 4, RATIOY + 2, STR_RATSECRET); Write (RATIOX, RATIOY + 4, STR_RATTREASURE); #endif #endif #ifndef JAPDEMO VWB_DrawPic (8, 4, L_BJWINSPIC); #endif for (kr = sr = tr = sec = i = 0; i < LRpack; i++) { sec += LevelRatios[i].time; kr += LevelRatios[i].kill; sr += LevelRatios[i].secret; tr += LevelRatios[i].treasure; } #ifndef SPEAR kr /= LRpack; sr /= LRpack; tr /= LRpack; #else kr /= 14; sr /= 14; tr /= 14; #endif min = sec / 60; sec %= 60; if (min > 99) min = sec = 99; i = TIMEX * 8 + 1; VWB_DrawPic (i, TIMEY * 8, L_NUM0PIC + (min / 10)); i += 2 * 8; VWB_DrawPic (i, TIMEY * 8, L_NUM0PIC + (min % 10)); i += 2 * 8; Write (i / 8, TIMEY, ":"); i += 1 * 8; VWB_DrawPic (i, TIMEY * 8, L_NUM0PIC + (sec / 10)); i += 2 * 8; VWB_DrawPic (i, TIMEY * 8, L_NUM0PIC + (sec % 10)); VW_UpdateScreen (); itoa (kr, tempstr, 10); x = RATIOX + 24 - (int) strlen(tempstr) * 2; Write (x, RATIOY, tempstr); itoa (sr, tempstr, 10); x = RATIOX + 24 - (int) strlen(tempstr) * 2; Write (x, RATIOY + 2, tempstr); itoa (tr, tempstr, 10); x = RATIOX + 24 - (int) strlen(tempstr) * 2; Write (x, RATIOY + 4, tempstr); #ifndef SPANISH #ifndef UPLOAD #ifndef SPEAR // // TOTAL TIME VERIFICATION CODE // if (gamestate.difficulty >= gd_medium) { VWB_DrawPic (30 * 8, TIMEY * 8, C_TIMECODEPIC); fontnumber = 0; fontcolor = READHCOLOR; PrintX = 30 * 8 - 3; PrintY = TIMEY * 8 + 8; PrintX += 4; tempstr[0] = (((min / 10) ^ (min % 10)) ^ 0xa) + 'A'; tempstr[1] = (int) ((((sec / 10) ^ (sec % 10)) ^ 0xa) + 'A'); tempstr[2] = (tempstr[0] ^ tempstr[1]) + 'A'; tempstr[3] = 0; US_Print (tempstr); } #endif #endif #endif fontnumber = 1; VW_UpdateScreen (); VW_FadeIn (); IN_Ack (); VW_FadeOut (); if(screenHeight % 200 != 0) VL_ClearScreen(0); #ifndef SPEAR UNCACHEGRCHUNK (C_TIMECODEPIC); #endif UnCacheLump (LEVELEND_LUMP_START, LEVELEND_LUMP_END); #ifndef SPEAR EndText (); #else EndSpear (); #endif #endif // SPEARDEMO } //========================================================================== #ifndef JAPAN /* ================== = = PG13 = ================== */ void PG13 (void) { VW_FadeOut (); VWB_Bar (0, 0, 320, 200, 0x82); // background CA_CacheGrChunk (PG13PIC); VWB_DrawPic (216, 110, PG13PIC); VW_UpdateScreen (); UNCACHEGRCHUNK (PG13PIC); VW_FadeIn (); IN_UserInput (TickBase * 7); VW_FadeOut (); } #endif //========================================================================== void Write (int x, int y, const char *string) { static const int alpha[] = { L_NUM0PIC, L_NUM1PIC, L_NUM2PIC, L_NUM3PIC, L_NUM4PIC, L_NUM5PIC, L_NUM6PIC, L_NUM7PIC, L_NUM8PIC, L_NUM9PIC, L_COLONPIC, 0, 0, 0, 0, 0, 0, L_APIC, L_BPIC, L_CPIC, L_DPIC, L_EPIC, L_FPIC, L_GPIC, L_HPIC, L_IPIC, L_JPIC, L_KPIC, L_LPIC, L_MPIC, L_NPIC, L_OPIC, L_PPIC, L_QPIC, L_RPIC, L_SPIC, L_TPIC, L_UPIC, L_VPIC, L_WPIC, L_XPIC, L_YPIC, L_ZPIC }; int i, ox, nx, ny, len = (int) strlen(string); char ch; ox = nx = x * 8; ny = y * 8; for (i = 0; i < len; i++) { if (string[i] == '\n') { nx = ox; ny += 16; } else { ch = string[i]; if (ch >= 'a') ch -= ('a' - 'A'); ch -= '0'; switch (string[i]) { case '!': VWB_DrawPic (nx, ny, L_EXPOINTPIC); nx += 8; continue; #ifndef APOGEE_1_0 case '\'': VWB_DrawPic (nx, ny, L_APOSTROPHEPIC); nx += 8; continue; #endif case ' ': break; case 0x3a: // ':' VWB_DrawPic (nx, ny, L_COLONPIC); nx += 8; continue; case '%': VWB_DrawPic (nx, ny, L_PERCENTPIC); break; default: VWB_DrawPic (nx, ny, alpha[ch]); } nx += 16; } } } // // Breathe Mr. BJ!!! // void BJ_Breathe (void) { static int which = 0, max = 10; int pics[2] = { L_GUYPIC, L_GUY2PIC }; SDL_Delay(5); if ((int32_t) GetTimeCount () - lastBreathTime > max) { which ^= 1; VWB_DrawPic (0, 16, pics[which]); VW_UpdateScreen (); lastBreathTime = GetTimeCount(); max = 35; } } /* ================== = = LevelCompleted = = Entered with the screen faded out = Still in split screen mode with the status bar = = Exit with the screen faded out = ================== */ void LevelCompleted (void) { #define VBLWAIT 30 #define PAR_AMOUNT 500 #define PERCENT100AMT 10000 typedef struct { float time; char timestr[6]; } times; int x, i, min, sec, ratio, kr, sr, tr; char tempstr[10]; int32_t bonus, timeleft = 0; times parTimes[] = { #ifndef SPEAR // // Episode One Par Times // {1.5, "01:30"}, {2, "02:00"}, {2, "02:00"}, {3.5, "03:30"}, {3, "03:00"}, {3, "03:00"}, {2.5, "02:30"}, {2.5, "02:30"}, {0, "??:??"}, // Boss level {0, "??:??"}, // Secret level // // Episode Two Par Times // {1.5, "01:30"}, {3.5, "03:30"}, {3, "03:00"}, {2, "02:00"}, {4, "04:00"}, {6, "06:00"}, {1, "01:00"}, {3, "03:00"}, {0, "??:??"}, {0, "??:??"}, // // Episode Three Par Times // {1.5, "01:30"}, {1.5, "01:30"}, {2.5, "02:30"}, {2.5, "02:30"}, {3.5, "03:30"}, {2.5, "02:30"}, {2, "02:00"}, {6, "06:00"}, {0, "??:??"}, {0, "??:??"}, // // Episode Four Par Times // {2, "02:00"}, {2, "02:00"}, {1.5, "01:30"}, {1, "01:00"}, {4.5, "04:30"}, {3.5, "03:30"}, {2, "02:00"}, {4.5, "04:30"}, {0, "??:??"}, {0, "??:??"}, // // Episode Five Par Times // {2.5, "02:30"}, {1.5, "01:30"}, {2.5, "02:30"}, {2.5, "02:30"}, {4, "04:00"}, {3, "03:00"}, {4.5, "04:30"}, {3.5, "03:30"}, {0, "??:??"}, {0, "??:??"}, // // Episode Six Par Times // {6.5, "06:30"}, {4, "04:00"}, {4.5, "04:30"}, {6, "06:00"}, {5, "05:00"}, {5.5, "05:30"}, {5.5, "05:30"}, {8.5, "08:30"}, {0, "??:??"}, {0, "??:??"} #else // // SPEAR OF DESTINY TIMES // {1.5, "01:30"}, {3.5, "03:30"}, {2.75, "02:45"}, {3.5, "03:30"}, {0, "??:??"}, // Boss 1 {4.5, "04:30"}, {3.25, "03:15"}, {2.75, "02:45"}, {4.75, "04:45"}, {0, "??:??"}, // Boss 2 {6.5, "06:30"}, {4.5, "04:30"}, {2.75, "02:45"}, {4.5, "04:30"}, {6, "06:00"}, {0, "??:??"}, // Boss 3 {6, "06:00"}, {0, "??:??"}, // Boss 4 {0, "??:??"}, // Secret level 1 {0, "??:??"}, // Secret level 2 #endif }; CacheLump (LEVELEND_LUMP_START, LEVELEND_LUMP_END); ClearSplitVWB (); // set up for double buffering in split screen VWB_Bar (0, 0, 320, screenHeight / scaleFactor - STATUSLINES + 1, VIEWCOLOR); if (bordercol != VIEWCOLOR) DrawStatusBorder (VIEWCOLOR); StartCPMusic (ENDLEVEL_MUS); // // do the intermission // IN_ClearKeysDown (); IN_StartAck (); #ifdef JAPAN CA_CacheGrChunk (C_INTERMISSIONPIC); VWB_DrawPic (0, 0, C_INTERMISSIONPIC); UNCACHEGRCHUNK (C_INTERMISSIONPIC); #endif VWB_DrawPic (0, 16, L_GUYPIC); #ifndef SPEAR if (mapon < 8) #else if (mapon != 4 && mapon != 9 && mapon != 15 && mapon < 17) #endif { #ifndef JAPAN #ifdef SPANISH Write (14, 2, "piso\ncompletado"); #else Write (14, 2, "floor\ncompleted"); #endif Write (14, 7, STR_BONUS " 0"); Write (16, 10, STR_TIME); Write (16, 12, STR_PAR); #ifdef SPANISH Write (11, 14, STR_RAT2KILL); Write (11, 16, STR_RAT2SECRET); Write (11, 18, STR_RAT2TREASURE); #else Write (9, 14, STR_RAT2KILL); Write (5, 16, STR_RAT2SECRET); Write (1, 18, STR_RAT2TREASURE); #endif Write (26, 2, itoa (gamestate.mapon + 1, tempstr, 10)); #endif #ifdef SPANISH Write (30, 12, parTimes[gamestate.episode * 10 + mapon].timestr); #else Write (26, 12, parTimes[gamestate.episode * 10 + mapon].timestr); #endif // // PRINT TIME // sec = gamestate.TimeCount / 70; if (sec > 99 * 60) // 99 minutes max sec = 99 * 60; if (gamestate.TimeCount < parTimes[gamestate.episode * 10 + mapon].time * 4200) timeleft = (int32_t) ((parTimes[gamestate.episode * 10 + mapon].time * 4200) / 70 - sec); min = sec / 60; sec %= 60; #ifdef SPANISH i = 30 * 8; #else i = 26 * 8; #endif VWB_DrawPic (i, 10 * 8, L_NUM0PIC + (min / 10)); i += 2 * 8; VWB_DrawPic (i, 10 * 8, L_NUM0PIC + (min % 10)); i += 2 * 8; Write (i / 8, 10, ":"); i += 1 * 8; VWB_DrawPic (i, 10 * 8, L_NUM0PIC + (sec / 10)); i += 2 * 8; VWB_DrawPic (i, 10 * 8, L_NUM0PIC + (sec % 10)); VW_UpdateScreen (); VW_FadeIn (); // // FIGURE RATIOS OUT BEFOREHAND // kr = sr = tr = 0; if (gamestate.killtotal) kr = (gamestate.killcount * 100) / gamestate.killtotal; if (gamestate.secrettotal) sr = (gamestate.secretcount * 100) / gamestate.secrettotal; if (gamestate.treasuretotal) tr = (gamestate.treasurecount * 100) / gamestate.treasuretotal; // // PRINT TIME BONUS // bonus = timeleft * PAR_AMOUNT; if (bonus) { for (i = 0; i <= timeleft; i++) { ltoa ((int32_t) i * PAR_AMOUNT, tempstr, 10); x = 36 - (int) strlen(tempstr) * 2; Write (x, 7, tempstr); if (!(i % (PAR_AMOUNT / 10))) SD_PlaySound (ENDBONUS1SND); if(!usedoublebuffering || !(i % (PAR_AMOUNT / 50))) VW_UpdateScreen (); while(SD_SoundPlaying ()) BJ_Breathe (); if (IN_CheckAck ()) goto done; } VW_UpdateScreen (); SD_PlaySound (ENDBONUS2SND); while (SD_SoundPlaying ()) BJ_Breathe (); } #ifdef SPANISH #define RATIOXX 33 #else #define RATIOXX 37 #endif // // KILL RATIO // ratio = kr; for (i = 0; i <= ratio; i++) { itoa (i, tempstr, 10); x = RATIOXX - (int) strlen(tempstr) * 2; Write (x, 14, tempstr); if (!(i % 10)) SD_PlaySound (ENDBONUS1SND); if(!usedoublebuffering || !(i & 1)) VW_UpdateScreen (); while (SD_SoundPlaying ()) BJ_Breathe (); if (IN_CheckAck ()) goto done; } if (ratio >= 100) { VW_WaitVBL (VBLWAIT); SD_StopSound (); bonus += PERCENT100AMT; ltoa (bonus, tempstr, 10); x = (RATIOXX - 1) - (int) strlen(tempstr) * 2; Write (x, 7, tempstr); VW_UpdateScreen (); SD_PlaySound (PERCENT100SND); } else if (!ratio) { VW_WaitVBL (VBLWAIT); SD_StopSound (); SD_PlaySound (NOBONUSSND); } else SD_PlaySound (ENDBONUS2SND); VW_UpdateScreen (); while (SD_SoundPlaying ()) BJ_Breathe (); // // SECRET RATIO // ratio = sr; for (i = 0; i <= ratio; i++) { itoa (i, tempstr, 10); x = RATIOXX - (int) strlen(tempstr) * 2; Write (x, 16, tempstr); if (!(i % 10)) SD_PlaySound (ENDBONUS1SND); if(!usedoublebuffering || !(i & 1)) VW_UpdateScreen (); while (SD_SoundPlaying ()) BJ_Breathe (); if (IN_CheckAck ()) goto done; } if (ratio >= 100) { VW_WaitVBL (VBLWAIT); SD_StopSound (); bonus += PERCENT100AMT; ltoa (bonus, tempstr, 10); x = (RATIOXX - 1) - (int) strlen(tempstr) * 2; Write (x, 7, tempstr); VW_UpdateScreen (); SD_PlaySound (PERCENT100SND); } else if (!ratio) { VW_WaitVBL (VBLWAIT); SD_StopSound (); SD_PlaySound (NOBONUSSND); } else SD_PlaySound (ENDBONUS2SND); VW_UpdateScreen (); while (SD_SoundPlaying ()) BJ_Breathe (); // // TREASURE RATIO // ratio = tr; for (i = 0; i <= ratio; i++) { itoa (i, tempstr, 10); x = RATIOXX - (int) strlen(tempstr) * 2; Write (x, 18, tempstr); if (!(i % 10)) SD_PlaySound (ENDBONUS1SND); if(!usedoublebuffering || !(i & 1)) VW_UpdateScreen (); while (SD_SoundPlaying ()) BJ_Breathe (); if (IN_CheckAck ()) goto done; } if (ratio >= 100) { VW_WaitVBL (VBLWAIT); SD_StopSound (); bonus += PERCENT100AMT; ltoa (bonus, tempstr, 10); x = (RATIOXX - 1) - (int) strlen(tempstr) * 2; Write (x, 7, tempstr); VW_UpdateScreen (); SD_PlaySound (PERCENT100SND); } else if (!ratio) { VW_WaitVBL (VBLWAIT); SD_StopSound (); SD_PlaySound (NOBONUSSND); } else SD_PlaySound (ENDBONUS2SND); VW_UpdateScreen (); while (SD_SoundPlaying ()) BJ_Breathe (); // // JUMP STRAIGHT HERE IF KEY PRESSED // done: itoa (kr, tempstr, 10); x = RATIOXX - (int) strlen(tempstr) * 2; Write (x, 14, tempstr); itoa (sr, tempstr, 10); x = RATIOXX - (int) strlen(tempstr) * 2; Write (x, 16, tempstr); itoa (tr, tempstr, 10); x = RATIOXX - (int) strlen(tempstr) * 2; Write (x, 18, tempstr); bonus = (int32_t) timeleft *PAR_AMOUNT + (PERCENT100AMT * (kr >= 100)) + (PERCENT100AMT * (sr >= 100)) + (PERCENT100AMT * (tr >= 100)); GivePoints (bonus); ltoa (bonus, tempstr, 10); x = 36 - (int) strlen(tempstr) * 2; Write (x, 7, tempstr); // // SAVE RATIO INFORMATION FOR ENDGAME // LevelRatios[mapon].kill = kr; LevelRatios[mapon].secret = sr; LevelRatios[mapon].treasure = tr; LevelRatios[mapon].time = min * 60 + sec; } else { #ifdef SPEAR #ifndef SPEARDEMO switch (mapon) { case 4: Write (14, 4, " trans\n" " grosse\n" STR_DEFEATED); break; case 9: Write (14, 4, "barnacle\n" "wilhelm\n" STR_DEFEATED); break; case 15: Write (14, 4, "ubermutant\n" STR_DEFEATED); break; case 17: Write (14, 4, " death\n" " knight\n" STR_DEFEATED); break; case 18: Write (13, 4, "secret tunnel\n" " area\n" " completed!"); break; case 19: Write (13, 4, "secret castle\n" " area\n" " completed!"); break; } #endif #else Write (14, 4, "secret floor\n completed!"); #endif Write (10, 16, "15000 bonus!"); VW_UpdateScreen (); VW_FadeIn (); GivePoints (15000); } DrawScore (); VW_UpdateScreen (); lastBreathTime = GetTimeCount(); IN_StartAck (); while (!IN_CheckAck ()) BJ_Breathe (); // // done // #ifdef SPEARDEMO if (gamestate.mapon == 1) { SD_PlaySound (BONUS1UPSND); CA_CacheGrChunk (STARTFONT + 1); Message ("This concludes your demo\n" "of Spear of Destiny! Now,\n" "go to your local software\n" "store and buy it!"); UNCACHEGRCHUNK (STARTFONT + 1); IN_ClearKeysDown (); IN_Ack (); } #endif #ifdef JAPDEMO if (gamestate.mapon == 3) { SD_PlaySound (BONUS1UPSND); CA_CacheGrChunk (STARTFONT + 1); Message ("This concludes your demo\n" "of Wolfenstein 3-D! Now,\n" "go to your local software\n" "store and buy it!"); UNCACHEGRCHUNK (STARTFONT + 1); IN_ClearKeysDown (); IN_Ack (); } #endif VW_FadeOut (); DrawPlayBorder(); UnCacheLump (LEVELEND_LUMP_START, LEVELEND_LUMP_END); } //========================================================================== /* ================= = = PreloadGraphics = = Fill the cache up = ================= */ boolean PreloadUpdate (unsigned current, unsigned total) { unsigned w = WindowW - scaleFactor * 10; VWB_BarScaledCoord (WindowX + scaleFactor * 5, WindowY + WindowH - scaleFactor * 3, w, scaleFactor * 2, BLACK); w = ((int32_t) w * current) / total; if (w) { VWB_BarScaledCoord (WindowX + scaleFactor * 5, WindowY + WindowH - scaleFactor * 3, w, scaleFactor * 2, 0x37); //SECONDCOLOR); VWB_BarScaledCoord (WindowX + scaleFactor * 5, WindowY + WindowH - scaleFactor * 3, w - scaleFactor * 1, scaleFactor * 1, 0x32); } VW_UpdateScreen (); // if (LastScan == sc_Escape) // { // IN_ClearKeysDown(); // return(true); // } // else return (false); } void PreloadGraphics (void) { DrawLevel (); ClearSplitVWB (); // set up for double buffering in split screen VWB_BarScaledCoord (0, 0, screenWidth, screenHeight - scaleFactor * (STATUSLINES - 1), bordercol); LatchDrawPicScaledCoord ((screenWidth-scaleFactor*224)/16, (screenHeight-scaleFactor*(STATUSLINES+48))/2, GETPSYCHEDPIC); WindowX = (screenWidth - scaleFactor*224)/2; WindowY = (screenHeight - scaleFactor*(STATUSLINES+48))/2; WindowW = scaleFactor * 28 * 8; WindowH = scaleFactor * 48; VW_UpdateScreen (); VW_FadeIn (); // PM_Preload (PreloadUpdate); PreloadUpdate (10, 10); IN_UserInput (70); VW_FadeOut (); DrawPlayBorder (); VW_UpdateScreen (); } //========================================================================== /* ================== = = DrawHighScores = ================== */ void DrawHighScores (void) { char buffer[16]; #ifndef SPEAR char *str; #ifndef UPLOAD char buffer1[5]; #endif #endif word i, w, h; HighScore *s; #ifndef SPEAR CA_CacheGrChunk (HIGHSCORESPIC); CA_CacheGrChunk (STARTFONT); #ifndef APOGEE_1_0 CA_CacheGrChunk (C_LEVELPIC); CA_CacheGrChunk (C_SCOREPIC); CA_CacheGrChunk (C_NAMEPIC); #else CA_CacheGrChunk (C_CODEPIC); #endif ClearMScreen (); DrawStripes (10); VWB_DrawPic (48, 0, HIGHSCORESPIC); UNCACHEGRCHUNK (HIGHSCORESPIC); #ifndef APOGEE_1_0 VWB_DrawPic (4 * 8, 68, C_NAMEPIC); VWB_DrawPic (20 * 8, 68, C_LEVELPIC); VWB_DrawPic (28 * 8, 68, C_SCOREPIC); #else VWB_DrawPic(35*8,68,C_CODEPIC); #endif fontnumber = 0; #else CacheLump (BACKDROP_LUMP_START, BACKDROP_LUMP_END); ClearMScreen (); DrawStripes (10); UnCacheLump (BACKDROP_LUMP_START, BACKDROP_LUMP_END); CacheLump (HIGHSCORES_LUMP_START, HIGHSCORES_LUMP_END); CA_CacheGrChunk (STARTFONT + 1); VWB_DrawPic (0, 0, HIGHSCORESPIC); fontnumber = 1; #endif #ifndef SPEAR SETFONTCOLOR (15, 0x29); #else SETFONTCOLOR (HIGHLIGHT, 0x29); #endif for (i = 0, s = Scores; i < MaxScores; i++, s++) { PrintY = 76 + (16 * i); // // name // #ifndef SPEAR PrintX = 4 * 8; #else PrintX = 16; #endif US_Print (s->name); // // level // itoa (s->completed, buffer, 10); #ifndef SPEAR for (str = buffer; *str; str++) *str = *str + (129 - '0'); // Used fixed-width numbers (129...) USL_MeasureString (buffer, &w, &h); PrintX = (22 * 8) - w; #else USL_MeasureString (buffer, &w, &h); PrintX = 194 - w; #endif #ifndef UPLOAD #ifndef SPEAR PrintX -= 6; itoa (s->episode + 1, buffer1, 10); US_Print ("E"); US_Print (buffer1); US_Print ("/L"); #endif #endif #ifdef SPEAR if (s->completed == 21) VWB_DrawPic (PrintX + 8, PrintY - 1, C_WONSPEARPIC); else #endif US_Print (buffer); // // score // itoa (s->score, buffer, 10); #ifndef SPEAR for (str = buffer; *str; str++) *str = *str + (129 - '0'); // Used fixed-width numbers (129...) USL_MeasureString (buffer, &w, &h); PrintX = (34 * 8) - 8 - w; #else USL_MeasureString (buffer, &w, &h); PrintX = 292 - w; #endif US_Print (buffer); #ifdef APOGEE_1_0 //#ifndef UPLOAD #ifndef SPEAR // // verification # // if (!i) { char temp = (((s->score >> 28) & 0xf) ^ ((s->score >> 24) & 0xf)) + 'A'; char temp1 = (((s->score >> 20) & 0xf) ^ ((s->score >> 16) & 0xf)) + 'A'; char temp2 = (((s->score >> 12) & 0xf) ^ ((s->score >> 8) & 0xf)) + 'A'; char temp3 = (((s->score >> 4) & 0xf) ^ ((s->score >> 0) & 0xf)) + 'A'; SETFONTCOLOR (0x49, 0x29); PrintX = 35 * 8; buffer[0] = temp; buffer[1] = temp1; buffer[2] = temp2; buffer[3] = temp3; buffer[4] = 0; US_Print (buffer); SETFONTCOLOR (15, 0x29); } #endif //#endif #endif } VW_UpdateScreen (); #ifdef SPEAR UnCacheLump (HIGHSCORES_LUMP_START, HIGHSCORES_LUMP_END); fontnumber = 0; #endif } //=========================================================================== /* ======================= = = CheckHighScore = ======================= */ void CheckHighScore (int32_t score, word other) { word i, j; int n; HighScore myscore; strcpy (myscore.name, ""); myscore.score = score; myscore.episode = gamestate.episode; myscore.completed = other; for (i = 0, n = -1; i < MaxScores; i++) { if ((myscore.score > Scores[i].score) || ((myscore.score == Scores[i].score) && (myscore.completed > Scores[i].completed))) { for (j = MaxScores; --j > i;) Scores[j] = Scores[j - 1]; Scores[i] = myscore; n = i; break; } } #ifdef SPEAR StartCPMusic (XAWARD_MUS); #else StartCPMusic (ROSTER_MUS); #endif DrawHighScores (); VW_FadeIn (); if (n != -1) { // // got a high score // PrintY = 76 + (16 * n); #ifndef SPEAR PrintX = 4 * 8; backcolor = BORDCOLOR; fontcolor = 15; US_LineInput (PrintX, PrintY, Scores[n].name, 0, true, MaxHighName, 100); #else PrintX = 16; fontnumber = 1; VWB_Bar (PrintX - 2, PrintY - 2, 145, 15, 0x9c); VW_UpdateScreen (); backcolor = 0x9c; fontcolor = 15; US_LineInput (PrintX, PrintY, Scores[n].name, 0, true, MaxHighName, 130); #endif } else { IN_ClearKeysDown (); IN_UserInput (500); } } #ifndef UPLOAD #ifndef SPEAR #ifndef JAPAN //////////////////////////////////////////////////////// // // NON-SHAREWARE NOTICE // //////////////////////////////////////////////////////// void NonShareware (void) { VW_FadeOut (); ClearMScreen (); DrawStripes (10); CA_CacheGrChunk (STARTFONT + 1); fontnumber = 1; SETFONTCOLOR (READHCOLOR, BKGDCOLOR); PrintX = 110; PrintY = 15; #ifdef SPANISH US_Print ("Atencion"); #else US_Print ("Attention"); #endif SETFONTCOLOR (HIGHLIGHT, BKGDCOLOR); WindowX = PrintX = 40; PrintY = 60; #ifdef SPANISH US_Print ("Este juego NO es gratis y\n"); US_Print ("NO es Shareware; favor de\n"); US_Print ("no distribuirlo.\n\n"); #else US_Print ("This game is NOT shareware.\n"); US_Print ("Please do not distribute it.\n"); US_Print ("Thanks.\n\n"); #endif US_Print (" Id Software\n"); VW_UpdateScreen (); VW_FadeIn (); IN_Ack (); } #endif #endif #endif #ifdef SPEAR #ifndef GOODTIMES #ifndef SPEARDEMO //////////////////////////////////////////////////////// // // COPY PROTECTION FOR FormGen // //////////////////////////////////////////////////////// char CopyProFailedStrs[][100] = { STR_COPY1, STR_COPY2, STR_COPY3, STR_COPY4, STR_COPY5, STR_COPY6, STR_COPY7, STR_COPY8, STR_COPY9, "", STR_COPY10, STR_COPY11, STR_COPY12, "", STR_COPY13, "", STR_COPY14, "" }; char BackDoorStrs[5][16] = { "a spoon?", "bite me!", "joshua", "pelt", "snoops" }; char GoodBoyStrs[10][40] = { "...is the CORRECT ANSWER!", "", "Consider yourself bitten, sir.", "", "Greetings Professor Falken, would you", "like to play Spear of Destiny?", "Do you have any gold spray paint?", "", "I wish I had a 21\" monitor...", "" }; char bossstrs[4][24] = { "DEATH KNIGHT", "BARNACLE WILHELM", "UBERMUTANTUBER MUTANT", "TRANS GROSSE" }; char WordStr[5][20] = { "New Game", "Sound...F4", "Control...F6", "Change View...F5", "Quit...F10" }; char WordCorrect[5][2] = { "3", "4", "4", "5", "5" }; char MemberStr[10][40] = { STR_COPY15, "", STR_COPY16, "", STR_COPY17, STR_COPY18, STR_COPY19, STR_COPY20, STR_COPY21, STR_COPY22 }; char MemberCorrect[5][24] = { "adrian carmack", "john carmackjohn romero", "tom hall", "jay wilbur", "kevin cloud" }; char DosMessages[9][80] = { STR_NOPE1, STR_NOPE2, STR_NOPE3, STR_NOPE4, STR_NOPE5, STR_NOPE6, STR_NOPE7, STR_NOPE8, STR_NOPE9 }; char MiscTitle[4][20] = { "BLOOD TEST", "STRAIGHT-LACED", "QUITE SHAPELY", "I AM WHAT I AMMO" }; char MiscStr[12][40] = { STR_MISC1, STR_MISC2, "", STR_MISC3, STR_MISC4, "", STR_MISC5, STR_MISC6, "", STR_MISC7, STR_MISC8, STR_MISC9 }; char MiscCorrect[4][5] = { "ss", "8", STR_STAR, "45" }; int BackDoor (char *s) { for (int i = 0; i < 5; i++) { if (!strcasecmp (s, BackDoorStrs[i])) { SETFONTCOLOR (14, 15); fontnumber = 0; PrintY = 175; VWB_DrawPic (0, 20 * 8, COPYPROTBOXPIC); US_CPrint (GoodBoyStrs[i * 2]); US_CPrint (GoodBoyStrs[i * 2 + 1]); VW_UpdateScreen (); return 1; } } return 0; } void CopyProtection (void) { #define TYPEBOX_Y 177 #define TYPEBOX_BKGD 0x9c #define PRINTCOLOR HIGHLIGHT unsigned i; int match, whichboss, bossnum, attempt, whichline; int enemypicked[4] = { 0, 0, 0, 0 }; int bosses[4] = { BOSSPIC1PIC, BOSSPIC2PIC, BOSSPIC3PIC, BOSSPIC4PIC }; int whichpicked[4] = { 0, 0, 0, 0 }; int whichone, quiztype, whichmem, whichword; int memberpicked[5] = { 0, 0, 0, 0, 0 }; int wordpicked[5] = { 0, 0, 0, 0, 0 }; char inputbuffer[20]; char message[80]; enum { debriefing, checkmanual, staffquiz, miscquiz, totaltypes }; attempt = 0; VW_FadeOut (); CA_CacheGrChunk (C_BACKDROPPIC); CacheLump (COPYPROT_LUMP_START, COPYPROT_LUMP_END); CA_CacheGrChunk (STARTFONT + 1); CA_LoadAllSounds (); StartCPMusic (COPYPRO_MUS); US_InitRndT (true); while (attempt < 3) { fontnumber = 1; SETFONTCOLOR (PRINTCOLOR - 2, 15); VWB_DrawPic (0, 0, C_BACKDROPPIC); VWB_DrawPic (0, 0, COPYPROTTOPPIC); VWB_DrawPic (0, 20 * 8, COPYPROTBOXPIC); WindowX = WindowY = 0; WindowW = 320; WindowH = 200; PrintY = 65; quiztype = US_RndT () % totaltypes; switch (quiztype) { // // BOSSES QUIZ // case debriefing: { PrintX = 0; US_Print (STR_DEBRIEF); SETFONTCOLOR (PRINTCOLOR, 15); while (enemypicked[whichboss = US_RndT () & 3]); enemypicked[whichboss] = 1; bossnum = bosses[whichboss]; VWB_DrawPic (128, 60, bossnum); fontnumber = 0; PrintY = 130; US_CPrint (STR_ENEMY1 "\n"); US_CPrint (STR_ENEMY2 "\n\n"); VW_UpdateScreen (); VW_FadeIn (); PrintX = 100; fontcolor = 15; backcolor = TYPEBOX_BKGD; inputbuffer[0] = 0; PrintY = TYPEBOX_Y; fontnumber = 1; US_LineInput (PrintX, PrintY, inputbuffer, 0, true, 20, 100); match = 0; size_t inputlen = strlen(inputbuffer); if(inputlen > 3) { size_t bosslen = strlen(bossstrs[whichboss]); for (i = 0; i < bosslen; i++) { if (!strncasecmp (inputbuffer, bossstrs[whichboss] + i, inputlen)) { match = 1; break; } } } match += BackDoor (inputbuffer); break; } // // MANUAL CHECK // case checkmanual: { while (wordpicked[whichword = US_RndT () % 5]); wordpicked[whichword] = 1; US_CPrint (STR_CHECKMAN); SETFONTCOLOR (PRINTCOLOR, 15); PrintY += 25; US_CPrint (STR_MAN1); US_CPrint (STR_MAN2); sprintf(message, STR_MAN3 " \"%s\" " STR_MAN4, WordStr[whichword]); US_CPrint (message); VW_UpdateScreen (); VW_FadeIn (); PrintX = 146; fontcolor = 15; backcolor = TYPEBOX_BKGD; inputbuffer[0] = 0; PrintY = TYPEBOX_Y; US_LineInput (PrintX, PrintY, inputbuffer, 0, true, 6, 100); match = 1 - (strcasecmp (inputbuffer, WordCorrect[whichword]) != 0); match += BackDoor (inputbuffer); break; } // // STAFF QUIZ // case staffquiz: { while (memberpicked[whichmem = US_RndT () % 5]); memberpicked[whichmem] = 1; US_CPrint (STR_ID1); SETFONTCOLOR (PRINTCOLOR, 15); PrintY += 25; US_CPrint (MemberStr[whichmem * 2]); US_CPrint (MemberStr[whichmem * 2 + 1]); VW_UpdateScreen (); VW_FadeIn (); PrintX = 100; fontcolor = 15; backcolor = TYPEBOX_BKGD; inputbuffer[0] = 0; PrintY = TYPEBOX_Y; US_LineInput (PrintX, PrintY, inputbuffer, 0, true, 20, 120); match = 0; size_t inputlen = strlen(inputbuffer); if(inputlen > 2) { size_t memberlen = strlen(MemberCorrect[whichmem]); for (i = 0; i < memberlen; i++) { if (!strncasecmp (inputbuffer, MemberCorrect[whichmem] + i, inputlen)) { match = 1; break; } } } match += BackDoor (inputbuffer); break; } // // MISCELLANEOUS QUESTIONS // case miscquiz: { while (whichpicked[whichone = US_RndT () & 3]); whichpicked[whichone] = 1; US_CPrint (MiscTitle[whichone]); SETFONTCOLOR (PRINTCOLOR, 15); PrintY += 25; US_CPrint (MiscStr[whichone * 3]); US_CPrint (MiscStr[whichone * 3 + 1]); US_CPrint (MiscStr[whichone * 3 + 2]); VW_UpdateScreen (); VW_FadeIn (); PrintX = 146; fontcolor = 15; backcolor = TYPEBOX_BKGD; inputbuffer[0] = 0; PrintY = TYPEBOX_Y; US_LineInput (PrintX, PrintY, inputbuffer, 0, true, 6, 100); match = 1 - (strcasecmp (inputbuffer, MiscCorrect[whichone]) != 0); match += BackDoor (inputbuffer); break; } } // // IF NO MATCH, WE'VE GOT A (MINOR) PROBLEM! // if (!match) { whichline = 2 * (US_RndT () % 9); SETFONTCOLOR (14, 15); fontnumber = 0; PrintY = 175; VWB_DrawPic (0, 20 * 8, COPYPROTBOXPIC); US_CPrint (CopyProFailedStrs[whichline]); US_CPrint (CopyProFailedStrs[whichline + 1]); VW_UpdateScreen (); SD_PlaySound (NOWAYSND); IN_UserInput (TickBase * 6); VW_FadeOut (); attempt++; } else { int start; SD_PlaySound (BONUS1UPSND); SD_WaitSoundDone (); UNCACHEGRCHUNK (STARTFONT + 1); UNCACHEGRCHUNK (C_BACKDROPPIC); UnCacheLump (COPYPROT_LUMP_START, COPYPROT_LUMP_END); switch (SoundMode) { case sdm_Off: return; case sdm_PC: start = STARTPCSOUNDS; break; case sdm_AdLib: start = STARTADLIBSOUNDS; } /* for (i=0;i