Iskhodnyy_kod_Doom

y = (int *) Z_Malloc(width*sizeof(int), PU_STATIC, 0); y[0] = -(M_Random()%16);

for (i=1;i<width;i++)

{

r = (M_Random()%3) - 1; y[i] = y[i-1] + r;

if (y[i] > 0) y[i] = 0;

else if (y[i] == -16) y[i] = -15;

}

return 0;

}

width/=2;

while (ticks--)

{

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

{

if (y[i]<0)

{

y[i]++; done = false;

}

else if (y[i] < height)

{

dy = (y[i] < 16) ? y[i]+1 : 8;

if (y[i]+dy >= height) dy = height - y[i];

s = &((short *)wipe_scr_end)[i*height+y[i]]; d = &((short *)wipe_scr)[y[i]*width+i];

idx = 0;

for (j=dy;j;j--)

{

d[idx] = *(s++); idx += width;

}

y[i] += dy;

s = &((short *)wipe_scr_start)[i*height]; d = &((short *)wipe_scr)[y[i]*width+i]; idx = 0;

for (j=height-y[i];j;j--)

{

d[idx] = *(s++); idx += width;

}

done = false;

}

}

}

return done;

121

Z_Free(y); return 0;

}

int wipe_StartScreen

wipe_scr_start = screens[2]; I_ReadScreen(wipe_scr_start); return 0;

}

int wipe_EndScreen

wipe_scr_end = screens[3]; I_ReadScreen(wipe_scr_end);

V_DrawBlock(x, y, 0, width, height, wipe_scr_start); // restore start scr. return 0;

}

int wipe_ScreenWipe

{

int rc;

static int (*wipes[])(int, int, int) =

{

wipe_initColorXForm, wipe_doColorXForm, wipe_exitColorXForm, wipe_initMelt, wipe_doMelt, wipe_exitMelt

};

void V_MarkRect(int, int, int, int);

// initial stuff if (!go)

{

go = 1;

// wipe_scr = (byte *) Z_Malloc(width*height, PU_STATIC, 0); // DEBUG wipe_scr = screens[0];

(*wipes[wipeno*3])(width, height, ticks);

}

122

// do a piece of wipe-in V_MarkRect(0, 0, width, height);

rc = (*wipes[wipeno*3+1])(width, height, ticks);

//V_DrawBlock(x, y, 0, width, height, wipe_scr); // DEBUG

//final stuff

if (rc)

{

go = 0;

(*wipes[wipeno*3+2])(width, height, ticks);

}

return !go;

}

4.4 f wipe.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:

//Mission start screen wipe/melt, special effects.

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

#ifndef __F_WIPE_H__ #define __F_WIPE_H__

//

// SCREEN WIPE PACKAGE

//

enum

{

//simple gradual pixel change for 8-bit only wipe_ColorXForm,

//weird screen melt

wipe_Melt,

wipe_NUMWIPES

123

int wipe_EndScreen

int wipe_ScreenWipe

#endif //-----------------------------------------------------------------------------

//

// $Log:$

//

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

5 Main game loop

5.1 g game.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: none

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

static const char

rcsid[] = "$Id: g_game.c,v 1.8 1997/02/03 22:45:09 b1 Exp $";

#include <string.h> #include <stdlib.h>

#include "doomdef.h" #include "doomstat.h"

#include "z_zone.h" #include "f_finale.h"

124

125

126

int G_CmdChecksum (ticcmd_t* cmd)

{

for (i=0 ; i< sizeof(*cmd)/4 - 1 ; i++) sum += ((int *)cmd)[i];

return sum;

}

127

//

//G_BuildTiccmd

//Builds a ticcmd from all of the available inputs

//or reads it from the demo buffer.

//If recording a demo, write it out

//

void G_BuildTiccmd (ticcmd_t* cmd)

{

cmd->consistancy = consistancy[consoleplayer][maketic%BACKUPTICS];

strafe = gamekeydown[key_strafe] || mousebuttons[mousebstrafe] || joybuttons[joybstrafe];

speed = gamekeydown[key_speed] || joybuttons[joybspeed];

forward = side = 0;

//use two stage accelerative turning

//on the keyboard and joystick

if (joyxmove < 0

||joyxmove > 0

||gamekeydown[key_right]

||gamekeydown[key_left]) turnheld += ticdup;

else

turnheld = 0;

if (turnheld < SLOWTURNTICS)

// let movement keys cancel each other out if (strafe)

{

if (gamekeydown[key_right])

{

// fprintf(stderr, "strafe right\n"); side += sidemove[speed];

}

if (gamekeydown[key_left])

{

// fprintf(stderr, "strafe left\n"); side -= sidemove[speed];

}

if (joyxmove > 0)

side += sidemove[speed]; if (joyxmove < 0)

side -= sidemove[speed];

128

}

else

{

if (gamekeydown[key_right]) cmd->angleturn -= angleturn[tspeed];

if (gamekeydown[key_left]) cmd->angleturn += angleturn[tspeed];

if (joyxmove > 0)

cmd->angleturn -= angleturn[tspeed]; if (joyxmove < 0)

cmd->angleturn += angleturn[tspeed];

}

if (gamekeydown[key_up])

{

// fprintf(stderr, "up\n"); forward += forwardmove[speed];

}

if (gamekeydown[key_down])

{

// fprintf(stderr, "down\n"); forward -= forwardmove[speed];

}

if (joyymove < 0)

forward += forwardmove[speed]; if (joyymove > 0)

forward -= forwardmove[speed]; if (gamekeydown[key_straferight])

side += sidemove[speed];

if (gamekeydown[key_strafeleft]) side -= sidemove[speed];

// buttons

cmd->chatchar = HU_dequeueChatChar();

if (gamekeydown[key_fire] || mousebuttons[mousebfire] || joybuttons[joybfire])

cmd->buttons |= BT_ATTACK;

if (gamekeydown[key_use] || joybuttons[joybuse] )

{

cmd->buttons |= BT_USE;

// clear double clicks if hit use button dclicks = 0;

}

// chainsaw overrides

for (i=0 ; i<NUMWEAPONS-1 ; i++) if (gamekeydown[’1’+i])

{

cmd->buttons |= BT_CHANGE; cmd->buttons |= i<<BT_WEAPONSHIFT; break;

}

// mouse

if (mousebuttons[mousebforward]) forward += forwardmove[speed];

// forward double click

if (mousebuttons[mousebforward] != dclickstate && dclicktime > 1 )

{

dclickstate = mousebuttons[mousebforward]; if (dclickstate)

dclicks++;

129

if (dclicks == 2)

{

cmd->buttons |= BT_USE; dclicks = 0;

}

else

dclicktime = 0;

}

else

{

dclicktime += ticdup; if (dclicktime > 20)

{

dclicks = 0; dclickstate = 0;

}

}

// strafe double click bstrafe =

mousebuttons[mousebstrafe] || joybuttons[joybstrafe];

if (bstrafe != dclickstate2 && dclicktime2 > 1 )

{

dclickstate2 = bstrafe; if (dclickstate2)

dclicks2++;

if (dclicks2 == 2)

{

cmd->buttons |= BT_USE; dclicks2 = 0;

}

else

dclicktime2 = 0;

}

else

{

dclicktime2 += ticdup; if (dclicktime2 > 20)

{

dclicks2 = 0; dclickstate2 = 0;

}

}

forward += mousey; if (strafe)

side += mousex*2;

else

cmd->angleturn -= mousex*0x8;

mousex = mousey = 0;

if (forward > MAXPLMOVE) forward = MAXPLMOVE;

else if (forward < -MAXPLMOVE) forward = -MAXPLMOVE;

if (side > MAXPLMOVE) side = MAXPLMOVE;

else if (side < -MAXPLMOVE) side = -MAXPLMOVE;

cmd->forwardmove += forward; cmd->sidemove += side;

130