gzdoom/src/f_wipe.cpp
Randy Heit c412b42703 - Fixed: cycle_t was still a DWORD and not a QWORD under GCC.
- The stat meters now return an FString instead of sprintfing into a fixed
  output buffer.
- NOASM is now automatically defined when compiling for a non-x86 target.
- Some changes have been made to the integral types in doomtype.h:
  - For consistancy with the other integral types, byte is no longer a
    synonym for BYTE.
  - Most uses of BOOL have been change to the standard C++ bool type. Those
    that weren't were changed to INTBOOL to indicate they may contain values
    other than 0 or 1 but are still used as a boolean.
  - Compiler-provided types with explicit bit sizes are now used. In
    particular, DWORD is no longer a long so it will work with both 64-bit
    Windows and Linux.
  - Since some files need to include Windows headers, uint32 is a synonym
    for the non-Windows version of DWORD.
- Removed d_textur.h. The pic_t struct it defined was used nowhere, and that
  was all it contained.


SVN r326 (trunk)
2006-09-14 00:02:31 +00:00

430 lines
9.1 KiB
C++

// Emacs style mode select -*- C++ -*-
//-----------------------------------------------------------------------------
//
// $Id:$
//
// Copyright (C) 1993-1996 by id Software, Inc.
//
// This source is available for distribution and/or modification
// only under the terms of the DOOM Source Code License as
// published by id Software. All rights reserved.
//
// The source is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// FITNESS FOR A PARTICULAR PURPOSE. See the DOOM Source Code License
// for more details.
//
// $Log:$
//
// DESCRIPTION:
// Mission begin melt/wipe screen special effect.
//
//-----------------------------------------------------------------------------
#include "i_video.h"
#include "v_video.h"
#include "m_random.h"
#include "m_alloc.h"
#include "doomdef.h"
#include "f_wipe.h"
#include "c_cvars.h"
//
// SCREEN WIPE PACKAGE
//
static int CurrentWipeType;
static short *wipe_scr_start;
static short *wipe_scr_end;
static int *y;
// [RH] Fire Wipe
#define FIREWIDTH 64
#define FIREHEIGHT 64
static BYTE *burnarray;
static int density;
static int burntime;
// [RH] Crossfade
static int fade;
// Melt -------------------------------------------------------------
void wipe_shittyColMajorXform (short *array)
{
int x, y;
short *dest;
int width = SCREENWIDTH / 2;
dest = new short[width*SCREENHEIGHT*2];
for(y = 0; y < SCREENHEIGHT; y++)
for(x = 0; x < width; x++)
dest[x*SCREENHEIGHT+y] = array[y*width+x];
memcpy(array, dest, SCREENWIDTH*SCREENHEIGHT);
delete[] dest;
}
int wipe_initMelt (int ticks)
{
int i, r;
// copy start screen to main screen
screen->DrawBlock (0, 0, SCREENWIDTH, SCREENHEIGHT, (BYTE *)wipe_scr_start);
// makes this wipe faster (in theory)
// to have stuff in column-major format
wipe_shittyColMajorXform (wipe_scr_start);
wipe_shittyColMajorXform (wipe_scr_end);
// setup initial column positions
// (y<0 => not ready to scroll yet)
y = new int[SCREENWIDTH*sizeof(int)];
y[0] = -(M_Random()&0xf);
for (i = 1; i < SCREENWIDTH; 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;
}
int wipe_doMelt (int ticks)
{
int i;
int j;
int dy;
int idx;
short* s;
short* d;
bool done = true;
int width = SCREENWIDTH / 2;
while (ticks--)
{
for (i = 0; i < width; i++)
{
if (y[i] < 0)
{
y[i]++; done = false;
}
else if (y[i] < SCREENHEIGHT)
{
int pitch = screen->GetPitch() / 2;
dy = (y[i] < 16) ? y[i]+1 : 8;
dy = (dy * SCREENHEIGHT) / 200;
if (y[i]+dy >= SCREENHEIGHT)
dy = SCREENHEIGHT - y[i];
s = &wipe_scr_end[i*SCREENHEIGHT+y[i]];
d = &((short *)screen->GetBuffer())[y[i]*pitch+i];
idx = 0;
for (j=dy;j;j--)
{
d[idx] = *(s++);
idx += pitch;
}
y[i] += dy;
s = &wipe_scr_start[i*SCREENHEIGHT];
d = &((short *)screen->GetBuffer())[y[i]*pitch+i];
idx = 0;
for (j=SCREENHEIGHT-y[i];j;j--)
{
d[idx] = *(s++);
idx += pitch;
}
done = false;
}
}
}
return done;
}
int wipe_exitMelt (int ticks)
{
delete[] wipe_scr_start;
delete[] wipe_scr_end;
delete[] y;
return 0;
}
// Burn -------------------------------------------------------------
int wipe_initBurn (int ticks)
{
burnarray = new BYTE[FIREWIDTH * (FIREHEIGHT+5)];
memset (burnarray, 0, FIREWIDTH * (FIREHEIGHT+5));
density = 4;
burntime = 0;
return 0;
}
int wipe_doBurn (int ticks)
{
static int voop;
bool done;
// This is a modified version of the fire from the player
// setup menu.
burntime += ticks;
ticks *= 2;
// Make the fire burn
while (ticks--)
{
int a, b;
BYTE *from;
// generator
from = burnarray + FIREHEIGHT * FIREWIDTH;
b = voop;
voop += density / 3;
for (a = 0; a < density/8; a++)
{
unsigned int offs = (a+b) % FIREWIDTH;
unsigned int v = M_Random();
v = from[offs] + 4 + (v & 15) + (v >> 3) + (M_Random() & 31);
if (v > 255)
v = 255;
from[offs] = from[FIREWIDTH*2 + (offs + FIREWIDTH*3/2)%FIREWIDTH] = v;
}
density += 10;
if (density > FIREWIDTH*7)
density = FIREWIDTH*7;
from = burnarray;
for (b = 0; b <= FIREHEIGHT; b += 2)
{
BYTE *pixel = from;
// special case: first pixel on line
BYTE *p = pixel + (FIREWIDTH << 1);
unsigned int top = *p + *(p + FIREWIDTH - 1) + *(p + 1);
unsigned int bottom = *(pixel + (FIREWIDTH << 2));
unsigned int c1 = (top + bottom) >> 2;
if (c1 > 1) c1--;
*pixel = c1;
*(pixel + FIREWIDTH) = (c1 + bottom) >> 1;
pixel++;
// main line loop
for (a = 1; a < FIREWIDTH-1; a++)
{
// sum top pixels
p = pixel + (FIREWIDTH << 1);
top = *p + *(p - 1) + *(p + 1);
// bottom pixel
bottom = *(pixel + (FIREWIDTH << 2));
// combine pixels
c1 = (top + bottom) >> 2;
if (c1 > 1) c1--;
// store pixels
*pixel = c1;
*(pixel + FIREWIDTH) = (c1 + bottom) >> 1; // interpolate
// next pixel
pixel++;
}
// special case: last pixel on line
p = pixel + (FIREWIDTH << 1);
top = *p + *(p - 1) + *(p - FIREWIDTH + 1);
bottom = *(pixel + (FIREWIDTH << 2));
c1 = (top + bottom) >> 2;
if (c1 > 1) c1--;
*pixel = c1;
*(pixel + FIREWIDTH) = (c1 + bottom) >> 1;
// next line
from += FIREWIDTH << 1;
}
}
// Draw the screen
{
fixed_t xstep, ystep, firex, firey;
int x, y;
BYTE *to, *fromold, *fromnew;
xstep = (FIREWIDTH * FRACUNIT) / SCREENWIDTH;
ystep = (FIREHEIGHT * FRACUNIT) / SCREENHEIGHT;
to = screen->GetBuffer();
fromold = (BYTE *)wipe_scr_start;
fromnew = (BYTE *)wipe_scr_end;
done = true;
for (y = 0, firey = 0; y < SCREENHEIGHT; y++, firey += ystep)
{
for (x = 0, firex = 0; x < SCREENWIDTH; x++, firex += xstep)
{
int fglevel;
fglevel = burnarray[(firex>>FRACBITS)+(firey>>FRACBITS)*FIREWIDTH] / 2;
if (fglevel >= 63)
{
to[x] = fromnew[x];
}
else if (fglevel == 0)
{
to[x] = fromold[x];
done = false;
}
else
{
int bglevel = 64-fglevel;
DWORD *fg2rgb = Col2RGB8[fglevel];
DWORD *bg2rgb = Col2RGB8[bglevel];
DWORD fg = fg2rgb[fromnew[x]];
DWORD bg = bg2rgb[fromold[x]];
fg = (fg+bg) | 0x1f07c1f;
to[x] = RGB32k[0][0][fg & (fg>>15)];
done = false;
}
}
fromold += SCREENWIDTH;
fromnew += SCREENWIDTH;
to += SCREENPITCH;
}
}
return done || (burntime > 40);
}
int wipe_exitBurn (int ticks)
{
delete[] wipe_scr_start;
delete[] wipe_scr_end;
delete[] burnarray;
return 0;
}
// Crossfade --------------------------------------------------------
int wipe_initFade (int ticks)
{
fade = 0;
return 0;
}
int wipe_doFade (int ticks)
{
fade += ticks;
if (fade > 64)
{
screen->DrawBlock (0, 0, SCREENWIDTH, SCREENHEIGHT, (BYTE *)wipe_scr_end);
return 1;
}
else
{
int x, y;
fixed_t bglevel = 64 - fade;
DWORD *fg2rgb = Col2RGB8[fade];
DWORD *bg2rgb = Col2RGB8[bglevel];
BYTE *fromnew = (BYTE *)wipe_scr_end;
BYTE *fromold = (BYTE *)wipe_scr_start;
BYTE *to = screen->GetBuffer();
for (y = 0; y < SCREENHEIGHT; y++)
{
for (x = 0; x < SCREENWIDTH; x++)
{
DWORD fg = fg2rgb[fromnew[x]];
DWORD bg = bg2rgb[fromold[x]];
fg = (fg+bg) | 0x1f07c1f;
to[x] = RGB32k[0][0][fg & (fg>>15)];
}
fromnew += SCREENWIDTH;
fromold += SCREENWIDTH;
to += SCREENPITCH;
}
}
fade++;
return 0;
}
int wipe_exitFade (int ticks)
{
return 0;
}
// General Wipe Functions -------------------------------------------
int wipe_StartScreen (int type)
{
CurrentWipeType = type;
if (CurrentWipeType < 0)
CurrentWipeType = 0;
else if (CurrentWipeType >= wipe_NUMWIPES)
CurrentWipeType = wipe_NUMWIPES-1;
if (CurrentWipeType)
{
wipe_scr_start = new short[SCREENWIDTH * SCREENHEIGHT / 2];
screen->GetBlock (0, 0, SCREENWIDTH, SCREENHEIGHT, (BYTE *)wipe_scr_start);
}
return 0;
}
int wipe_EndScreen (void)
{
if (CurrentWipeType)
{
wipe_scr_end = new short[SCREENWIDTH * SCREENHEIGHT / 2];
screen->GetBlock (0, 0, SCREENWIDTH, SCREENHEIGHT, (BYTE *)wipe_scr_end);
screen->DrawBlock (0, 0, SCREENWIDTH, SCREENHEIGHT, (BYTE *)wipe_scr_start); // restore start scr.
}
return 0;
}
bool wipe_ScreenWipe (int ticks)
{
static bool go = 0; // when zero, stop the wipe
static int (*wipes[])(int) =
{
wipe_initMelt, wipe_doMelt, wipe_exitMelt,
wipe_initBurn, wipe_doBurn, wipe_exitBurn,
wipe_initFade, wipe_doFade, wipe_exitFade
};
int rc;
if (CurrentWipeType == wipe_None)
return true;
// initial stuff
if (!go)
{
go = 1;
(*wipes[(CurrentWipeType-1)*3])(ticks);
}
// do a piece of wipe-in
V_MarkRect(0, 0, SCREENWIDTH, SCREENHEIGHT);
rc = (*wipes[(CurrentWipeType-1)*3+1])(ticks);
// final stuff
if (rc)
{
go = 0;
(*wipes[(CurrentWipeType-1)*3+2])(ticks);
}
return !go;
}