ref: 0121b8c02bd1746767e17fa41b848a11744f593e
dir: /src/heretic/f_finale.c/
// // Copyright(C) 1993-1996 Id Software, Inc. // Copyright(C) 1993-2008 Raven Software // Copyright(C) 2005-2014 Simon Howard // // This program 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 2 // 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. // // F_finale.c #include <ctype.h> #include "doomdef.h" #include "deh_str.h" #include "i_swap.h" #include "i_video.h" #include "s_sound.h" #include "v_video.h" static int finalestage; // 0 = text, 1 = art screen static int finalecount; #define TEXTSPEED 3 #define TEXTWAIT 250 static const char *finaletext; static const char *finaleflat; static int FontABaseLump; extern boolean automapactive; extern boolean viewactive; extern void D_StartTitle(void); /* ======================= = = F_StartFinale = ======================= */ void F_StartFinale(void) { gameaction = ga_nothing; gamestate = GS_FINALE; viewactive = false; automapactive = false; players[consoleplayer].messageTics = 1; players[consoleplayer].message = NULL; switch (gameepisode) { case 1: finaleflat = DEH_String("FLOOR25"); finaletext = DEH_String(E1TEXT); break; case 2: finaleflat = DEH_String("FLATHUH1"); finaletext = DEH_String(E2TEXT); break; case 3: finaleflat = DEH_String("FLTWAWA2"); finaletext = DEH_String(E3TEXT); break; case 4: finaleflat = DEH_String("FLOOR28"); finaletext = DEH_String(E4TEXT); break; case 5: finaleflat = DEH_String("FLOOR08"); finaletext = DEH_String(E5TEXT); break; } finalestage = 0; finalecount = 0; FontABaseLump = W_GetNumForName(DEH_String("FONTA_S")) + 1; // S_ChangeMusic(mus_victor, true); S_StartSong(mus_cptd, true); } boolean F_Responder(event_t * event) { if (event->type != ev_keydown) { return false; } if (finalestage == 1 && gameepisode == 2) { // we're showing the water pic, make any key kick to demo mode finalestage++; /* memset((byte *) 0xa0000, 0, SCREENWIDTH * SCREENHEIGHT); memset(I_VideoBuffer, 0, SCREENWIDTH * SCREENHEIGHT); I_SetPalette(W_CacheLumpName("PLAYPAL", PU_CACHE)); */ return true; } return false; } /* ======================= = = F_Ticker = ======================= */ void F_Ticker(void) { finalecount++; if (!finalestage && finalecount > strlen(finaletext) * TEXTSPEED + TEXTWAIT) { finalecount = 0; if (!finalestage) { finalestage = 1; } // wipegamestate = -1; // force a wipe /* if (gameepisode == 3) S_StartMusic (mus_bunny); */ } } /* ======================= = = F_TextWrite = ======================= */ //#include "hu_stuff.h" //extern patch_t *hu_font[HU_FONTSIZE]; void F_TextWrite(void) { byte *src, *dest; int x, y; int count; const char *ch; int c; int cx, cy; patch_t *w; // // erase the entire screen to a tiled background // src = W_CacheLumpName(finaleflat, PU_CACHE); dest = I_VideoBuffer; for (y = 0; y < SCREENHEIGHT; y++) { for (x = 0; x < SCREENWIDTH / 64; x++) { memcpy(dest, src + ((y & 63) << 6), 64); dest += 64; } if (SCREENWIDTH & 63) { memcpy(dest, src + ((y & 63) << 6), SCREENWIDTH & 63); dest += (SCREENWIDTH & 63); } } // V_MarkRect (0, 0, SCREENWIDTH, SCREENHEIGHT); // // draw some of the text onto the screen // cx = 20; cy = 5; ch = finaletext; count = (finalecount - 10) / TEXTSPEED; if (count < 0) count = 0; for (; count; count--) { c = *ch++; if (!c) break; if (c == '\n') { cx = 20; cy += 9; continue; } c = toupper(c); if (c < 33) { cx += 5; continue; } w = W_CacheLumpNum(FontABaseLump + c - 33, PU_CACHE); if (cx + SHORT(w->width) > SCREENWIDTH) break; V_DrawPatch(cx, cy, w); cx += SHORT(w->width); } } void F_DrawPatchCol(int x, patch_t * patch, int col) { column_t *column; byte *source, *dest, *desttop; int count; column = (column_t *) ((byte *) patch + LONG(patch->columnofs[col])); desttop = I_VideoBuffer + x; // step through the posts in a column while (column->topdelta != 0xff) { source = (byte *) column + 3; dest = desttop + column->topdelta * SCREENWIDTH; count = column->length; while (count--) { *dest = *source++; dest += SCREENWIDTH; } column = (column_t *) ((byte *) column + column->length + 4); } } /* ================== = = F_DemonScroll = ================== */ void F_DemonScroll(void) { byte *p1, *p2; static int yval = 0; static int nextscroll = 0; if (finalecount < nextscroll) { return; } p1 = W_CacheLumpName(DEH_String("FINAL1"), PU_LEVEL); p2 = W_CacheLumpName(DEH_String("FINAL2"), PU_LEVEL); if (finalecount < 70) { memcpy(I_VideoBuffer, p1, SCREENHEIGHT * SCREENWIDTH); nextscroll = finalecount; return; } if (yval < 64000) { memcpy(I_VideoBuffer, p2 + SCREENHEIGHT * SCREENWIDTH - yval, yval); memcpy(I_VideoBuffer + yval, p1, SCREENHEIGHT * SCREENWIDTH - yval); yval += SCREENWIDTH; nextscroll = finalecount + 3; } else { //else, we'll just sit here and wait, for now memcpy(I_VideoBuffer, p2, SCREENWIDTH * SCREENHEIGHT); } } /* ================== = = F_DrawUnderwater = ================== */ void F_DrawUnderwater(void) { static boolean underwawa = false; extern boolean askforquit; const char *lumpname; byte *palette; // The underwater screen has its own palette, which is rather annoying. // The palette doesn't correspond to the normal palette. Because of // this, we must regenerate the lookup tables used in the video scaling // code. switch (finalestage) { case 1: if (!underwawa) { underwawa = true; V_DrawFilledBox(0, 0, SCREENWIDTH, SCREENHEIGHT, 0); lumpname = DEH_String("E2PAL"); palette = W_CacheLumpName(lumpname, PU_STATIC); I_SetPalette(palette); W_ReleaseLumpName(lumpname); V_DrawRawScreen(W_CacheLumpName(DEH_String("E2END"), PU_CACHE)); } paused = false; MenuActive = false; askforquit = false; break; case 2: if (underwawa) { lumpname = DEH_String("PLAYPAL"); palette = W_CacheLumpName(lumpname, PU_STATIC); I_SetPalette(palette); W_ReleaseLumpName(lumpname); underwawa = false; } V_DrawRawScreen(W_CacheLumpName(DEH_String("TITLE"), PU_CACHE)); //D_StartTitle(); // go to intro/demo mode. } } #if 0 /* ================== = = F_BunnyScroll = ================== */ void F_BunnyScroll(void) { int scrolled, x; patch_t *p1, *p2; char name[10]; int stage; static int laststage; p1 = W_CacheLumpName("PFUB2", PU_LEVEL); p2 = W_CacheLumpName("PFUB1", PU_LEVEL); V_MarkRect(0, 0, SCREENWIDTH, SCREENHEIGHT); scrolled = 320 - (finalecount - 230) / 2; if (scrolled > 320) scrolled = 320; if (scrolled < 0) scrolled = 0; for (x = 0; x < SCREENWIDTH; x++) { if (x + scrolled < 320) F_DrawPatchCol(x, p1, x + scrolled); else F_DrawPatchCol(x, p2, x + scrolled - 320); } if (finalecount < 1130) return; if (finalecount < 1180) { V_DrawPatch((SCREENWIDTH - 13 * 8) / 2, (SCREENHEIGHT - 8 * 8) / 2, 0, W_CacheLumpName("END0", PU_CACHE)); laststage = 0; return; } stage = (finalecount - 1180) / 5; if (stage > 6) stage = 6; if (stage > laststage) { S_StartSound(NULL, sfx_pistol); laststage = stage; } M_snprintf(name, sizeof(name), "END%i", stage); V_DrawPatch((SCREENWIDTH - 13 * 8) / 2, (SCREENHEIGHT - 8 * 8) / 2, W_CacheLumpName(name, PU_CACHE)); } #endif /* ======================= = = F_Drawer = ======================= */ void F_Drawer(void) { UpdateState |= I_FULLSCRN; if (!finalestage) F_TextWrite(); else { switch (gameepisode) { case 1: if (gamemode == shareware) { V_DrawRawScreen(W_CacheLumpName("ORDER", PU_CACHE)); } else { V_DrawRawScreen(W_CacheLumpName("CREDIT", PU_CACHE)); } break; case 2: F_DrawUnderwater(); break; case 3: F_DemonScroll(); break; case 4: // Just show credits screen for extended episodes case 5: V_DrawRawScreen(W_CacheLumpName("CREDIT", PU_CACHE)); break; } } }