Round 4: Some minor build system housekeeping, as well as removing some depricated...
[theoddone33/hhexen.git] / base / f_finale.c
1
2 //**************************************************************************
3 //**
4 //** f_finale.c : Heretic 2 : Raven Software, Corp.
5 //**
6 //** $RCSfile$
7 //** $Revision$
8 //** $Date$
9 //** $Author$
10 //**
11 //**************************************************************************
12
13 // HEADER FILES ------------------------------------------------------------
14
15 #include "h2def.h"
16 #include "soundst.h"
17 #include "p_local.h"
18 #include <ctype.h>
19
20 // MACROS ------------------------------------------------------------------
21
22 #define TEXTSPEED       3
23 #define TEXTWAIT        250
24
25 // TYPES -------------------------------------------------------------------
26
27 // EXTERNAL FUNCTION PROTOTYPES --------------------------------------------
28
29 // PUBLIC FUNCTION PROTOTYPES ----------------------------------------------
30
31 // PRIVATE FUNCTION PROTOTYPES ---------------------------------------------
32
33 static void TextWrite(void);
34 static void DrawPic(void);
35 static void InitializeFade(boolean fadeIn);
36 static void DeInitializeFade(void);
37 static void FadePic(void);
38 static char *GetFinaleText(int sequence);
39
40 // EXTERNAL DATA DECLARATIONS ----------------------------------------------
41
42 extern boolean automapactive;
43 extern boolean viewactive;
44
45 // PUBLIC DATA DECLARATIONS ------------------------------------------------
46
47 // PRIVATE DATA DEFINITIONS ------------------------------------------------
48
49 static int FinaleStage;
50 static int FinaleCount;
51 static int FinaleEndCount;
52 static int FinaleLumpNum;
53 static int FontABaseLump;
54 static char *FinaleText;
55
56 static fixed_t *Palette;
57 static fixed_t *PaletteDelta;
58 static byte *RealPalette;
59
60 // CODE --------------------------------------------------------------------
61
62 //===========================================================================
63 //
64 // F_StartFinale
65 //
66 //===========================================================================
67
68 void F_StartFinale (void)
69 {
70         gameaction = ga_nothing;
71         gamestate = GS_FINALE;
72         viewactive = false;
73         automapactive = false;
74         P_ClearMessage(&players[consoleplayer]);
75
76         FinaleStage = 0;
77         FinaleCount = 0;
78         FinaleText = GetFinaleText(0);
79         FinaleEndCount = 70;
80         FinaleLumpNum = W_GetNumForName("FINALE1");
81         FontABaseLump = W_GetNumForName("FONTA_S")+1;
82         InitializeFade(1);
83
84 //      S_ChangeMusic(mus_victor, true);
85         S_StartSongName("hall", false); // don't loop the song
86 }
87
88 //===========================================================================
89 //
90 // F_Responder
91 //
92 //===========================================================================
93
94 boolean F_Responder(event_t *event)
95 {
96         return false;
97 }
98
99 //===========================================================================
100 //
101 // F_Ticker
102 //
103 //===========================================================================
104
105 void F_Ticker (void)
106 {
107         FinaleCount++;
108         if(FinaleStage < 5 && FinaleCount >= FinaleEndCount)
109         {
110                 FinaleCount = 0;
111                 FinaleStage++;
112                 switch(FinaleStage)
113                 {
114                         case 1: // Text 1
115                                 FinaleEndCount = strlen(FinaleText)*TEXTSPEED+TEXTWAIT;
116                                 break;
117                         case 2: // Pic 2, Text 2
118                                 FinaleText = GetFinaleText(1);
119                                 FinaleEndCount = strlen(FinaleText)*TEXTSPEED+TEXTWAIT;
120                                 FinaleLumpNum = W_GetNumForName("FINALE2");
121                                 S_StartSongName("orb", false);
122                                 break;
123                         case 3: // Pic 2 -- Fade out
124                                 FinaleEndCount = 70;
125                                 DeInitializeFade();
126                                 InitializeFade(0);
127                                 break;
128                         case 4: // Pic 3 -- Fade in
129                                 FinaleLumpNum = W_GetNumForName("FINALE3");
130                                 FinaleEndCount = 71;
131                                 DeInitializeFade();
132                                 InitializeFade(1);
133                                 S_StartSongName("chess", true);
134                                 break;
135                         case 5: // Pic 3 , Text 3
136                                 FinaleText = GetFinaleText(2);
137                                 DeInitializeFade();
138                                 break;
139                         default:
140                                  break;
141                 }
142                 return;
143         }
144         if(FinaleStage == 0 || FinaleStage == 3 || FinaleStage == 4)
145         {
146                 FadePic();
147         }
148 }
149
150 //===========================================================================
151 //
152 // TextWrite
153 //
154 //===========================================================================
155
156 static void TextWrite (void)
157 {
158         int             count;
159         char    *ch;
160         int             c;
161         int             cx, cy;
162         patch_t *w;
163
164         memcpy(screen, W_CacheLumpNum(FinaleLumpNum, PU_CACHE), 
165                 SCREENWIDTH*SCREENHEIGHT);
166         if(FinaleStage == 5)
167         { // Chess pic, draw the correct character graphic
168                 if(netgame)
169                 {
170                         V_DrawPatch(20, 0, W_CacheLumpName("chessall", PU_CACHE));
171                 }
172                 /* jim Looks like Dan got this one wrong! 8-) */
173 /*              else if(PlayerClass[consoleplayer] = PCLASS_ASS) */
174                 else if(PlayerClass[consoleplayer] == PCLASS_ASS)
175                 {
176                         V_DrawPatch(60,0, W_CacheLumpNum(W_GetNumForName("chessa"), PU_CACHE));
177                 }
178                 else if(PlayerClass[consoleplayer])
179                 {
180                         V_DrawPatch(60, 0, W_CacheLumpNum(W_GetNumForName("chessc")
181                                 +PlayerClass[consoleplayer]-1, PU_CACHE));
182                 }
183         }
184         // Draw the actual text
185         if(FinaleStage == 5)
186         {
187                 cy = 135;
188         }
189         else
190         {
191                 cy = 5;
192         }
193         cx = 20;
194         ch = FinaleText;
195         count = (FinaleCount-10)/TEXTSPEED;
196         if (count < 0)
197         {
198                 count = 0;
199         }
200         for(; count; count--)
201         {
202                 c = *ch++;
203                 if(!c)
204                 {
205                         break;
206                 }
207                 if(c == '\n')
208                 {
209                         cx = 20;
210                         cy += 9;
211                         continue;
212                 }
213                 if(c < 32)
214                 {
215                         continue;
216                 }
217                 c = toupper(c);
218                 if(c == 32)
219                 {
220                         cx += 5;
221                         continue;
222                 }
223                 w = W_CacheLumpNum(FontABaseLump+c-33, PU_CACHE);
224                 if(cx+w->width > SCREENWIDTH)
225                 {
226                         break;
227                 }
228                 V_DrawPatch(cx, cy, w);
229                 cx += w->width;
230         }
231 }
232
233 //===========================================================================
234 //
235 // InitializeFade
236 //
237 //===========================================================================
238
239 static void InitializeFade(boolean fadeIn)
240 {
241         unsigned i;
242
243         Palette = Z_Malloc(768*sizeof(fixed_t), PU_STATIC, 0);
244         PaletteDelta = Z_Malloc(768*sizeof(fixed_t), PU_STATIC, 0);
245         RealPalette = Z_Malloc(768*sizeof(byte), PU_STATIC, 0);
246
247         if(fadeIn)
248         {
249                 memset(RealPalette, 0, 768*sizeof(byte));
250                 for(i = 0; i < 768; i++)
251                 {
252                         Palette[i] = 0;
253                         PaletteDelta[i] = FixedDiv((*((byte *)W_CacheLumpName("playpal", 
254                                 PU_CACHE)+i))<<FRACBITS, 70*FRACUNIT);
255                 }
256         }
257         else
258         {
259                 for(i = 0; i < 768; i++)
260                 {
261                         RealPalette[i] = *((byte *)W_CacheLumpName("playpal", PU_CACHE)+i);
262                         Palette[i] = RealPalette[i]<<FRACBITS;
263                         PaletteDelta[i] = FixedDiv(Palette[i], -70*FRACUNIT);
264                 }
265         }
266         I_SetPalette(RealPalette);
267 }
268
269 //===========================================================================
270 //
271 // DeInitializeFade
272 //
273 //===========================================================================
274
275 static void DeInitializeFade(void)
276 {
277         Z_Free(Palette);
278         Z_Free(PaletteDelta);
279         Z_Free(RealPalette);
280 }
281
282 //===========================================================================
283 //
284 // FadePic
285 //
286 //===========================================================================
287
288 static void FadePic(void)
289 {
290         unsigned i;
291
292         for(i = 0; i < 768; i++)
293         {
294                 Palette[i] += PaletteDelta[i];
295                 RealPalette[i] = Palette[i]>>FRACBITS;
296         }
297         I_SetPalette(RealPalette);
298 }
299
300 //===========================================================================
301 //
302 // DrawPic
303 //
304 //===========================================================================
305
306 static void DrawPic(void)
307 {
308         memcpy(screen, W_CacheLumpNum(FinaleLumpNum, PU_CACHE), 
309                 SCREENWIDTH*SCREENHEIGHT);
310         if(FinaleStage == 4 || FinaleStage == 5)
311         { // Chess pic, draw the correct character graphic
312                 if(netgame)
313                 {
314                         V_DrawPatch(20, 0, W_CacheLumpName("chessall", PU_CACHE));
315                 }
316                 else if(PlayerClass[consoleplayer])
317                 {
318                         V_DrawPatch(60, 0, W_CacheLumpNum(W_GetNumForName("chessc")
319                                 +PlayerClass[consoleplayer]-1, PU_CACHE));
320                 }
321         }
322 }
323
324 //===========================================================================
325 //
326 // F_Drawer
327 //
328 //===========================================================================
329
330 void F_Drawer(void)
331 {
332         switch(FinaleStage)
333         {
334                 case 0: // Fade in initial finale screen
335                         DrawPic();
336                         break;
337                 case 1:
338                 case 2:
339                         TextWrite();
340                         break;
341                 case 3: // Fade screen out
342                         DrawPic();
343                         break;
344                 case 4: // Fade in chess screen
345                         DrawPic();
346                         break;
347                 case 5:
348                         TextWrite();
349                         break;
350         }
351         UpdateState |= I_FULLSCRN;      
352 }
353
354 //==========================================================================
355 //
356 // GetFinaleText
357 //
358 //==========================================================================
359
360 static char *GetFinaleText(int sequence)
361 {
362         char *msgLumpName;
363         int msgSize;
364         int msgLump;
365         static char *winMsgLumpNames[] =
366         {
367                 "win1msg",
368                 "win2msg",
369                 "win3msg"
370         };
371         msgLumpName = winMsgLumpNames[sequence];
372         msgLump = W_GetNumForName(msgLumpName);
373         msgSize = W_LumpLength(msgLump);
374         if(msgSize >= MAX_INTRMSN_MESSAGE_SIZE)
375         {
376                 I_Error("Finale message too long (%s)", msgLumpName);
377         }
378         W_ReadLump(msgLump, ClusterMessage);
379         ClusterMessage[msgSize] = 0; // Append terminator
380         return ClusterMessage;
381 }