raze-gles/source/games/exhumed/src/ramses.cpp

453 lines
12 KiB
C++

//-------------------------------------------------------------------------
/*
Copyright (C) 2010-2020 EDuke32 developers and contributors
Copyright (C) 2020 sirlemonhead, Nuke.YKT
This file is part of PCExhumed.
PCExhumed is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License version 2
as published by the Free Software Foundation.
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.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
//-------------------------------------------------------------------------
#include "ns.h"
#include "engine.h"
#include "exhumed.h"
#include "sound.h"
#include "view.h"
#include "names.h"
#include "aistuff.h"
#include "player.h"
#include "mapinfo.h"
#include "input.h"
BEGIN_PS_NS
short cPupData[300];
uint8_t *Worktile;
int lHeadStartClock;
short* pPupData;
int lNextStateChange;
int nPixels;
int nHeadTimeStart;
short nHeadStage;
short curx[kSpiritY * kSpiritX];
short cury[kSpiritY * kSpiritX];
int8_t destvelx[kSpiritY * kSpiritX];
int8_t destvely[kSpiritY * kSpiritX];
uint8_t pixelval[kSpiritY * kSpiritX];
int8_t origy[kSpiritY * kSpiritX];
int8_t origx[kSpiritY * kSpiritX];
int8_t velx[kSpiritY * kSpiritX];
int8_t vely[kSpiritY * kSpiritX];
short nMouthTile;
short nPupData = 0;
short word_964E8 = 0;
short word_964EA = 0;
short word_964EC = 10;
short nSpiritRepeatX;
short nSpiritRepeatY;
short nSpiritSprite;
short nPixelsToShow;
short nTalkTime = 0;
void InitSpiritHead()
{
char filename[20];
nPixels = 0;
nSpiritRepeatX = sprite[nSpiritSprite].xrepeat;
nSpiritRepeatY = sprite[nSpiritSprite].yrepeat;
tileLoad(kTileRamsesNormal); // Ramses Normal Head
for (int i = 0; i < kMaxSprites; i++)
{
if (sprite[i].statnum)
{
sprite[i].cstat |= 0x8000;
}
}
auto pTile = tilePtr(kTileRamsesNormal); // Ramses Normal Head
auto pGold = tilePtr(kTileRamsesGold);
for (int x = 0; x < 97; x++)
{
for (int y = 0; y < 106; y++)
{
if (*pTile != TRANSPARENT_INDEX)
{
pixelval[nPixels] = *(pGold + x * kSpiritX + y);
origx[nPixels] = x - 48;
origy[nPixels] = y - 53;
curx[nPixels] = 0;
cury[nPixels] = 0;
vely[nPixels] = 0;
velx[nPixels] = 0;
destvelx[nPixels] = RandomSize(2) + 1;
if (curx[nPixels] > 0) {
destvelx[nPixels] = -destvelx[nPixels];
}
destvely[nPixels] = RandomSize(2) + 1;
if (cury[nPixels] > 0) {
destvely[nPixels] = -destvely[nPixels];
}
nPixels++;
}
pTile++;
}
}
sprite[nSpiritSprite].yrepeat = 140;
sprite[nSpiritSprite].xrepeat = 140;
sprite[nSpiritSprite].picnum = kTileRamsesWorkTile;
nHeadStage = 0;
// work tile is twice as big as the normal head size
Worktile = TileFiles.tileCreate(kTileRamsesWorkTile, kSpiritY * 2, kSpiritX * 2);
sprite[nSpiritSprite].cstat &= 0x7FFF;
nHeadTimeStart = PlayClock;
memset(Worktile, TRANSPARENT_INDEX, WorktileSize);
TileFiles.InvalidateTile(kTileRamsesWorkTile);
nPixelsToShow = 0;
fadecdaudio();
int nTrack;
if (currentLevel->levelNumber == 1)
{
nTrack = 3;
}
else
{
nTrack = 7;
}
playCDtrack(nTrack, false);
StartSwirlies();
sprintf(filename, "LEV%d.PUP", currentLevel->levelNumber);
lNextStateChange = PlayClock;
lHeadStartClock = PlayClock;
auto headfd = fileSystem.OpenFileReader(filename);
if (!headfd.isOpen())
{
memset(cPupData, 0, sizeof(cPupData));
}
else
{
nPupData = headfd.Read(cPupData, sizeof(cPupData));
pPupData = cPupData;
}
nMouthTile = 0;
nTalkTime = 1;
}
void DimSector(short nSector)
{
short startwall = sector[nSector].wallptr;
short nWalls = sector[nSector].wallnum;
for (int i = 0; i < nWalls; i++)
{
if (wall[startwall+i].shade < 40) {
wall[startwall+i].shade++;
}
}
if (sector[nSector].floorshade < 40) {
sector[nSector].floorshade++;
}
if (sector[nSector].ceilingshade < 40) {
sector[nSector].ceilingshade++;
}
}
void CopyHeadToWorkTile(short nTile)
{
const uint8_t* pSrc = tilePtr(nTile);
uint8_t *pDest = &Worktile[212 * 49 + 53];
for (int i = 0; i < kSpiritY; i++)
{
memcpy(pDest, pSrc, kSpiritX);
pDest += 212;
pSrc += kSpiritX;
}
}
// This is based on BuildGDX's version of this function which was a lot less cryptic than PCExhumed's.
void DoSpiritHead()
{
static short dimSectCount = 0;
sPlayerInput[0].actions |= SB_CENTERVIEW;
TileFiles.InvalidateTile(kTileRamsesWorkTile);
switch (nHeadStage)
{
case 0:
case 1:
memset(Worktile, TRANSPARENT_INDEX, WorktileSize);
break;
case 5:
if (lNextStateChange <= PlayClock)
{
if (nPupData != 0)
{
short clock = *pPupData++;
nPupData -= 2;
if (nPupData > 0)
{
lNextStateChange = lHeadStartClock + clock - 10;
nTalkTime = !nTalkTime;
}
else
{
nTalkTime = false;
nPupData = 0;
}
}
else if (!bSubTitles)
{
if (!CDplaying())
{
LevelFinished();
EndLevel = 1;
}
}
}
if (--word_964E8 <= 0)
{
word_964EA = 2 * RandomBit();
word_964E8 = RandomSize(5) + 4;
}
int tilenum = kTileRamsesNormal;
if (--word_964EC < 3)
{
tilenum = 593;
if (word_964EC <= 0)
word_964EC = RandomSize(6) + 4;
}
CopyHeadToWorkTile(word_964EA + tilenum);
if (nTalkTime)
{
if (nMouthTile < 2)
nMouthTile++;
}
else if (nMouthTile != 0)
nMouthTile--;
if (nMouthTile != 0)
{
int srctile = nMouthTile + 598;
auto src = tilePtr(srctile);
int sizx = tileWidth(srctile);
int sizy = tileHeight(srctile);
int workptr = 212 * (97 - sizx / 2) + 159 - sizy;
int srcptr = 0;
while (sizx > 0)
{
memcpy(Worktile + workptr, src + srcptr, sizy);
workptr += 212;
srcptr += sizy;
sizx--;
}
}
return;
}
nPixelsToShow = 15 * (PlayClock - nHeadTimeStart);
if (nPixelsToShow > nPixels)
nPixelsToShow = nPixels;
switch (nHeadStage)
{
case 3:
FixPalette();
if (nPalDiff == 0)
{
nFreeze = 2;
nHeadStage++;
}
return;
case 0:
case 1:
case 2:
UpdateSwirlies();
if (sprite[nSpiritSprite].shade > -127)
sprite[nSpiritSprite].shade--;
if (--dimSectCount < 0)
{
DimSector(sprite[nSpiritSprite].sectnum);
dimSectCount = 5;
}
if (nHeadStage == 0)
{
if (PlayClock - nHeadTimeStart > 480)
{
nHeadStage = 1;
nHeadTimeStart = PlayClock + 480;
}
for (int i = 0; i < nPixelsToShow; i++)
{
if (destvely[i] >= 0)
{
if (++vely[i] >= destvely[i])
{
destvely[i] = (int8_t)-(RandomSize(2) + 1);
}
}
else {
if (--vely[i] <= destvely[i])
{
destvely[i] = (int8_t)(RandomSize(2) + 1);
}
}
if (destvelx[i] >= 0) {
if (++velx[i] >= destvelx[i])
{
destvelx[i] = (int8_t)-(RandomSize(2) + 1);
}
}
else {
if (--velx[i] <= destvelx[i])
{
destvelx[i] = (int8_t)(RandomSize(2) + 1);
}
}
int x = (curx[i] >> 8) + velx[i];
if (x < 97)
{
if (x < -96)
{
x = 0;
velx[i] = 0;
}
}
else
{
x = 0;
velx[i] = 0;
}
int y = (cury[i] >> 8) + vely[i];
if (y < 106)
{
if (y < -105)
{
y = 0;
vely[i] = 0;
}
}
else
{
y = 0;
vely[i] = 0;
}
curx[i] = (short)(x << 8);
cury[i] = (short)(y << 8);
Worktile[212 * (x + 97) + 106 + y] = pixelval[i++];
}
}
if (nHeadStage == 1)
{
if (sprite[nSpiritSprite].xrepeat > nSpiritRepeatX)
{
sprite[nSpiritSprite].xrepeat -= 2;
if (sprite[nSpiritSprite].xrepeat < nSpiritRepeatX)
sprite[nSpiritSprite].xrepeat = nSpiritRepeatX;
}
if (sprite[nSpiritSprite].yrepeat > nSpiritRepeatY)
{
sprite[nSpiritSprite].yrepeat -= 2;
if (sprite[nSpiritSprite].yrepeat < nSpiritRepeatY)
sprite[nSpiritSprite].yrepeat = nSpiritRepeatY;
}
int nCount = 0;
for (int i = 0; i < nPixels; i++)
{
int dx, dy;
if (origx[i] << 8 == curx[i] || abs((origx[i] << 8) - curx[i]) >= 8)
dx = ((origx[i] << 8) - curx[i]) >> 3;
else {
dx = 0;
curx[i] = (short)(origx[i] << 8);
}
if (origy[i] << 8 == cury[i] || abs((origy[i] << 8) - cury[i]) >= 8)
dy = ((origy[i] << 8) - cury[i]) >> 3;
else {
dy = 0;
cury[i] = (short)(origy[i] << 8);
}
if ((dx | dy) != 0)
{
curx[i] += dx;
cury[i] += dy;
nCount++;
}
Worktile[((cury[i] >> 8) + (212 * ((curx[i] >> 8) + 97))) + 106] = pixelval[i];
}
if (PlayClock - lHeadStartClock > 600)
CopyHeadToWorkTile(590);
if (nCount < (15 * nPixels) / 16) {
SoundBigEntrance();
AddGlow(sprite[nSpiritSprite].sectnum, 20);
AddFlash(sprite[nSpiritSprite].sectnum, sprite[nSpiritSprite].x, sprite[nSpiritSprite].y,
sprite[nSpiritSprite].z, 128);
nHeadStage = 3;
TintPalette(255, 255, 255);
CopyHeadToWorkTile(kTileRamsesNormal);
}
}
break;
}
}
END_PS_NS