Iskhodnyy_kod_Doom

{

cx = 10; cy += 11; continue;

}

c = toupper(c) - HU_FONTSTART; if (c < 0 || c> HU_FONTSIZE)

{

cx += 4; continue;

}

w = SHORT (hu_font[c]->width); if (cx+w > SCREENWIDTH)

break;

V_DrawPatch(cx, cy, 0, hu_font[c]); cx+=w;

}

}

//

//Final DOOM 2 animation

//Casting by id Software.

//in order of appearance

typedef struct

{

{CC_ZOMBIE, MT_POSSESSED}, {CC_SHOTGUN, MT_SHOTGUY}, {CC_HEAVY, MT_CHAINGUY}, {CC_IMP, MT_TROOP},

{CC_DEMON, MT_SERGEANT}, {CC_LOST, MT_SKULL}, {CC_CACO, MT_HEAD}, {CC_HELL, MT_KNIGHT}, {CC_BARON, MT_BRUISER}, {CC_ARACH, MT_BABY}, {CC_PAIN, MT_PAIN}, {CC_REVEN, MT_UNDEAD}, {CC_MANCU, MT_FATSO}, {CC_ARCH, MT_VILE}, {CC_SPIDER, MT_SPIDER}, {CC_CYBER, MT_CYBORG}, {CC_HERO, MT_PLAYER},

{NULL,0}

111

castattacking = false; S_ChangeMusic(mus_evil, true);

112

}

if (sfx)

S_StartSound (NULL, sfx);

}

if (castframes == 12)

{

// go into attack frame castattacking = true; if (castonmelee)

caststate=&states[mobjinfo[castorder[castnum].type].meleestate];

else

caststate=&states[mobjinfo[castorder[castnum].type].missilestate]; castonmelee ^= 1;

if (caststate == &states[S_NULL])

{

if (castonmelee) caststate=

&states[mobjinfo[castorder[castnum].type].meleestate];

else

caststate=

&states[mobjinfo[castorder[castnum].type].missilestate];

}

}

if (castattacking)

{

if (castframes == 24

|| caststate == &states[mobjinfo[castorder[castnum].type].seestate] )

{

stopattack: castattacking = false; castframes = 0;

caststate = &states[mobjinfo[castorder[castnum].type].seestate];

}

}

casttics = caststate->tics; if (casttics == -1)

casttics = 15;

}

//

// F_CastResponder

//

113

boolean F_CastResponder (event_t* ev)

{

if (ev->type != ev_keydown)

// go into death frame castdeath = true;

caststate = &states[mobjinfo[castorder[castnum].type].deathstate]; casttics = caststate->tics;

castframes = 0; castattacking = false;

if (mobjinfo[castorder[castnum].type].deathsound)

S_StartSound (NULL, mobjinfo[castorder[castnum].type].deathsound);

return true;

}

void F_CastPrint (char* text)

// find width ch = text; width = 0;

while (ch)

{

c = *ch++; if (!c)

break;

c = toupper(c) - HU_FONTSTART; if (c < 0 || c> HU_FONTSIZE)

{

width += 4; continue;

}

w = SHORT (hu_font[c]->width); width += w;

}

// draw it

cx = 160-width/2; ch = text;

while (ch)

{

c = *ch++; if (!c)

break;

c = toupper(c) - HU_FONTSTART; if (c < 0 || c> HU_FONTSIZE)

{

cx += 4; continue;

}

w = SHORT (hu_font[c]->width);

114

V_DrawPatch(cx, 180, 0, hu_font[c]); cx+=w;

}

}

//

// F_CastDrawer

//

void V_DrawPatchFlipped (int x, int y, int scrn, patch_t *patch);

// erase the entire screen to a background

V_DrawPatch (0,0,0, W_CacheLumpName ("BOSSBACK", PU_CACHE));

F_CastPrint (castorder[castnum].name);

// draw the current frame in the middle of the screen sprdef = &sprites[caststate->sprite];

sprframe = &sprdef->spriteframes[ caststate->frame & FF_FRAMEMASK]; lump = sprframe->lump[0];

flip = (boolean)sprframe->flip[0];

patch = W_CacheLumpNum (lump+firstspritelump, PU_CACHE); if (flip)

V_DrawPatchFlipped (160,170,0,patch);

else

V_DrawPatch (160,170,0,patch);

}

//

// F_DrawPatchCol

//

column = (column_t *)((byte *)patch + LONG(patch->columnofs[col])); desttop = screens[0]+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--)

115

{

*dest = *source++; dest += SCREENWIDTH;

}

column = (column_t *)( (byte *)column + column->length + 4 );

}

}

//

// F_BunnyScroll

//

void F_BunnyScroll (void)

{

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;

}

sprintf (name,"END%i",stage);

V_DrawPatch ((SCREENWIDTH-13*8)/2, (SCREENHEIGHT-8*8)/2,0, W_CacheLumpName (name,PU_CACHE));

}

116

//

// F_Drawer

//

void F_Drawer (void)

{

if (finalestage == 2)

{

F_CastDrawer (); return;

}

if (!finalestage) F_TextWrite ();

else

{

switch (gameepisode)

{

case 1:

if ( gamemode == retail ) V_DrawPatch (0,0,0,

W_CacheLumpName("CREDIT",PU_CACHE));

else

V_DrawPatch (0,0,0,

W_CacheLumpName("HELP2",PU_CACHE));

break; case 2:

V_DrawPatch(0,0,0,

W_CacheLumpName("VICTORY2",PU_CACHE));

break; case 3:

F_BunnyScroll (); break;

case 4:

V_DrawPatch (0,0,0,

W_CacheLumpName("ENDPIC",PU_CACHE));

break;

}

}

}

4.2f finale.h

// Emacs style mode select -*- C++ -*- //-----------------------------------------------------------------------------

//

//$Id:$

//Copyright (C) 1993-1996 by id Software, Inc.

//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.

//

// DESCRIPTION:

//

//

117

//-----------------------------------------------------------------------------

#ifndef __F_FINALE__ #define __F_FINALE__

#include "doomtype.h" #include "d_event.h"

//

//FINALE

//Called by main loop.

boolean F_Responder (event_t* ev);

//Called by main loop. void F_Ticker (void);

//Called by main loop. void F_Drawer (void);

void F_StartFinale (void);

#endif

//-----------------------------------------------------------------------------

//

// $Log:$

//

//-----------------------------------------------------------------------------

4.3 f wipe.c

// Emacs style mode select -*- C++ -*- //-----------------------------------------------------------------------------

//

//$Id:$

//Copyright (C) 1993-1996 by id Software, Inc.

//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.

//

//$Log:$

//DESCRIPTION:

//Mission begin melt/wipe screen special effect.

//-----------------------------------------------------------------------------

static const char rcsid[] = "$Id: f_wipe.c,v 1.2 1997/02/03 22:45:09 b1 Exp $";

118

#include "z_zone.h" #include "i_video.h" #include "v_video.h" #include "m_random.h"

#include "doomdef.h"

#include "f_wipe.h"

//

// SCREEN WIPE PACKAGE

//

// when zero, stop the wipe

void wipe_shittyColMajorXform

dest = (short*) Z_Malloc(width*height*2, PU_STATIC, 0);

for(y=0;y<height;y++)

for(x=0;x<width;x++)

dest[x*height+y] = array[y*width+x];

memcpy(array, dest, width*height*2);

Z_Free(dest);

}

int wipe_initColorXForm

memcpy(wipe_scr, wipe_scr_start, width*height); return 0;

}

int wipe_doColorXForm

119

changed = false; w = wipe_scr;

e = wipe_scr_end;

while (w!=wipe_scr+width*height)

{

if (*w != *e)

{

if (*w > *e)

{

newval = *w - ticks; if (newval < *e)

*w = *e;

else

*w = newval; changed = true;

}

else if (*w < *e)

{

newval = *w + ticks; if (newval > *e)

*w = *e;

else

*w = newval; changed = true;

}

}

w++;

e++;

}

return !changed;

}

int wipe_exitColorXForm

// copy start screen to main screen memcpy(wipe_scr, wipe_scr_start, width*height);

// makes this wipe faster (in theory) // to have stuff in column-major format

wipe_shittyColMajorXform((short*)wipe_scr_start, width/2, height); wipe_shittyColMajorXform((short*)wipe_scr_end, width/2, height);

//setup initial column positions

//(y<0 => not ready to scroll yet)

120