mirror of
https://github.com/ZDoom/Raze.git
synced 2024-12-11 05:11:07 +00:00
9113 lines
338 KiB
C++
9113 lines
338 KiB
C++
//-------------------------------------------------------------------------
|
|
/*
|
|
Copyright (C) 2010-2019 EDuke32 developers and contributors
|
|
Copyright (C) 2019 Nuke.YKT
|
|
Copyright (C) NoOne
|
|
|
|
This file is part of NBlood.
|
|
|
|
NBlood 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.
|
|
*/
|
|
//-------------------------------------------------------------------------
|
|
|
|
|
|
///////////////////////////////////////////////////////////////////
|
|
// This file provides modern features for mappers.
|
|
// For full documentation please visit http://cruo.bloodgame.ru/xxsystem
|
|
///////////////////////////////////////////////////////////////////
|
|
#include "ns.h"
|
|
|
|
#ifdef NOONE_EXTENSIONS
|
|
#include <random>
|
|
#include "blood.h"
|
|
#include "savegamehelp.h"
|
|
|
|
BEGIN_BLD_NS
|
|
|
|
inline int mulscale8(int a, int b) { return MulScale(a, b, 8); }
|
|
|
|
bool gAllowTrueRandom = false;
|
|
bool gEventRedirectsUsed = false;
|
|
DBloodActor* gProxySpritesList[]; // list of additional sprites which can be triggered by Proximity
|
|
short gProxySpritesCount; // current count
|
|
DBloodActor* gSightSpritesList[]; // list of additional sprites which can be triggered by Sight
|
|
short gSightSpritesCount; // current count
|
|
DBloodActor* gPhysSpritesList[]; // list of additional sprites which can be affected by physics
|
|
short gPhysSpritesCount; // current count
|
|
DBloodActor* gImpactSpritesList[];
|
|
short gImpactSpritesCount;
|
|
|
|
|
|
|
|
|
|
short gEffectGenCallbacks[] = {
|
|
|
|
kCallbackFXFlameLick,
|
|
kCallbackFXFlareSpark,
|
|
kCallbackFXFlareSparkLite,
|
|
kCallbackFXZombieSpurt,
|
|
kCallbackFXBloodSpurt,
|
|
kCallbackFXArcSpark,
|
|
kCallbackFXTeslaAlt,
|
|
|
|
};
|
|
|
|
|
|
TRPLAYERCTRL gPlayerCtrl[kMaxPlayers];
|
|
|
|
TRCONDITION gCondition[kMaxTrackingConditions];
|
|
short gTrackingCondsCount;
|
|
|
|
std::default_random_engine gStdRandom;
|
|
|
|
const VECTORINFO_EXTRA gVectorInfoExtra[] = {
|
|
1207,1207, 1001,1001, 4001,4002,
|
|
431,431, 1002,1002, 359,359,
|
|
521,521, 513,513, 499,499,
|
|
9012,9014, 1101,1101, 1207,1207,
|
|
499,495, 495,496, 9013,499,
|
|
1307,1308, 499,499, 499,499,
|
|
499,499, 499,499, 351,351,
|
|
0,0, 357,499
|
|
};
|
|
|
|
const MISSILEINFO_EXTRA gMissileInfoExtra[] = {
|
|
1207, 1207, false, false, false, false, false, true, false, true,
|
|
420, 420, false, true, true, false, false, false, false, true,
|
|
471, 471, false, false, false, false, false, false, true, false,
|
|
421, 421, false, true, false, true, false, false, false, false,
|
|
1309, 351, false, true, false, false, false, false, false, true,
|
|
480, 480, false, true, false, true, false, false, false, false,
|
|
470, 470, false, false, false, false, false, false, true, true,
|
|
489, 490, false, false, false, false, false, true, false, true,
|
|
462, 351, false, true, false, false, false, false, false, true,
|
|
1203, 172, false, false, true, false, false, false, false, true,
|
|
0,0, false, false, true, false, false, false, false, true,
|
|
1457, 249, false, false, false, false, false, true, false, true,
|
|
480, 489, false, true, false, true, false, false, false, false,
|
|
480, 489, false, false, false, true, false, false, false, false,
|
|
480, 489, false, false, false, true, false, false, false, false,
|
|
491, 491, true, true, true, true, true, true, true, true,
|
|
520, 520, false, false, false, false, false, true, false, true,
|
|
520, 520, false, false, false, false, false, true, false, true,
|
|
};
|
|
|
|
const THINGINFO_EXTRA gThingInfoExtra[] = {
|
|
true, true, true, false, false,
|
|
false, false, false, false, false,
|
|
false, false, false, false, false,
|
|
true, false, false, true, true,
|
|
true, true, false, false, false,
|
|
false, false, true, true, true,
|
|
true, true, true, true, true,
|
|
true,
|
|
};
|
|
|
|
const DUDEINFO_EXTRA gDudeInfoExtra[] = {
|
|
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 200
|
|
{ false, false, 0, 9, 13, 13, 17, 14 }, // 201
|
|
{ false, false, 0, 9, 13, 13, 17, 14 }, // 202
|
|
{ false, true, 0, 8, 0, 8, -1, -1 }, // 203
|
|
{ false, false, 0, 8, 0, 8, -1, -1 }, // 204
|
|
{ false, true, 1, -1, -1, -1, -1, -1 }, // 205
|
|
{ true, true, 0, 0, 0, 0, -1, -1 }, // 206
|
|
{ true, false, 0, 0, 0, 0, -1, -1 }, // 207
|
|
{ true, false, 1, -1, -1, -1, -1, -1 }, // 208
|
|
{ true, false, 1, -1, -1, -1, -1, -1 }, // 209
|
|
{ true, true, 0, 0, 0, 0, -1, -1 }, // 210
|
|
{ false, true, 0, 8, 0, 8, -1, -1 }, // 211
|
|
{ false, true, 0, 6, 0, 6, -1, -1 }, // 212
|
|
{ false, true, 0, 7, 0, 7, -1, -1 }, // 213
|
|
{ false, true, 0, 7, 0, 7, -1, -1 }, // 214
|
|
{ false, true, 0, 7, 0, 7, -1, -1 }, // 215
|
|
{ false, true, 0, 7, 0, 7, -1, -1 }, // 216
|
|
{ false, true, 0, 9, 10, 10, -1, -1 }, // 217
|
|
{ false, true, 0, 0, 0, 0, -1, -1 }, // 218
|
|
{ true, false, 7, 7, 7, 7, -1, -1 }, // 219
|
|
{ false, true, 0, 7, 0, 7, -1, -1 }, // 220
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 221
|
|
{ false, true, -1, -1, -1, -1, -1, -1 }, // 222
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 223
|
|
{ false, true, -1, -1, -1, -1, -1, -1 }, // 224
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 225
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 226
|
|
{ false, false, 0, 7, 0, 7, -1, -1 }, // 227
|
|
{ false, false, 0, 7, 0, 7, -1, -1 }, // 228
|
|
{ false, false, 0, 8, 0, 8, -1, -1 }, // 229
|
|
{ false, false, 0, 9, 13, 13, 17, 14 }, // 230
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 231
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 232
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 233
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 234
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 235
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 236
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 237
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 238
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 239
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 240
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 241
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 242
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 243
|
|
{ false, true, -1, -1, -1, -1, -1, -1 }, // 244
|
|
{ false, true, 0, 6, 0, 6, -1, -1 }, // 245
|
|
{ false, false, 0, 9, 13, 13, 17, 14 }, // 246
|
|
{ false, false, 0, 9, 13, 13, 14, 14 }, // 247
|
|
{ false, false, 0, 9, 13, 13, 14, 14 }, // 248
|
|
{ false, false, 0, 9, 13, 13, 17, 14 }, // 249
|
|
{ false, true, 0, 6, 8, 8, 10, 9 }, // 250
|
|
{ false, true, 0, 8, 9, 9, 11, 10 }, // 251
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 252
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 253
|
|
{ false, false, 0, 9, 17, 13, 17, 14 }, // 254
|
|
{ false, false, -1, -1, -1, -1, -1, -1 }, // 255
|
|
|
|
};
|
|
|
|
|
|
AISTATE genPatrolStates[] = {
|
|
|
|
//-------------------------------------------------------------------------------
|
|
|
|
{ kAiStatePatrolWaitL, 0, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitL, 7, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
|
|
{ kAiStatePatrolMoveL, 9, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveL, 8, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveL, 0, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveL, 6, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveL, 7, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
|
|
{ kAiStatePatrolTurnL, 9, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnL, 8, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnL, 0, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnL, 6, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnL, 7, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
|
|
//-------------------------------------------------------------------------------
|
|
|
|
{ kAiStatePatrolWaitW, 0, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitW, 10, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitW, 13, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitW, 17, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitW, 8, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitW, 9, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
|
|
{ kAiStatePatrolMoveW, 0, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveW, 10, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveW, 13, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveW, 8, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveW, 9, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveW, 7, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveW, 6, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
|
|
{ kAiStatePatrolTurnW, 0, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnW, 10, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnW, 13, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnW, 8, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnW, 9, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnW, 7, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnW, 6, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
|
|
//-------------------------------------------------------------------------------
|
|
|
|
{ kAiStatePatrolWaitC, 17, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitC, 11, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitC, 10, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolWaitC, 14, -1, 0, NULL, NULL, aiPatrolThink, NULL },
|
|
|
|
{ kAiStatePatrolMoveC, 14, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveC, 10, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolMoveC, 9, -1, 0, NULL, aiPatrolMove, aiPatrolThink, NULL },
|
|
|
|
{ kAiStatePatrolTurnC, 14, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnC, 10, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
{ kAiStatePatrolTurnC, 9, -1, 0, aiPatrolRandGoalAng, aiPatrolTurn, aiPatrolThink, NULL },
|
|
|
|
//-------------------------------------------------------------------------------
|
|
|
|
};
|
|
|
|
CONDITION_TYPE_NAMES gCondTypeNames[7] = {
|
|
|
|
{kCondGameBase, kCondGameMax, "Game"},
|
|
{kCondMixedBase, kCondMixedMax, "Mixed"},
|
|
{kCondWallBase, kCondWallMax, "Wall"},
|
|
{kCondSectorBase, kCondSectorMax, "Sector"},
|
|
{kCondPlayerBase, kCondPlayerMax, "Player"},
|
|
{kCondDudeBase, kCondDudeMax, "Enemy"},
|
|
{kCondSpriteBase, kCondSpriteMax, "Sprite"},
|
|
|
|
};
|
|
|
|
// for actor.cpp
|
|
//-------------------------------------------------------------------------
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
static DBloodActor* nnExtSpawnDude(DBloodActor* sourceActor, DBloodActor* origin, short nType, int a3, int a4)
|
|
{
|
|
DBloodActor* pDudeActor = nullptr;
|
|
auto pSource = &sourceActor->s();
|
|
auto pXSource = &sourceActor->x();
|
|
auto pOrigin = &origin->s();
|
|
|
|
if (nType < kDudeBase || nType >= kDudeMax || (pDudeActor = actSpawnSprite(origin, kStatDude)) == NULL)
|
|
return NULL;
|
|
|
|
spritetype* pDude = &pDudeActor->s();
|
|
XSPRITE* pXDude = &pDudeActor->x();
|
|
|
|
int angle = pOrigin->ang;
|
|
int x, y, z = a4 + pOrigin->z;
|
|
if (a3 < 0)
|
|
{
|
|
x = pOrigin->x;
|
|
y = pOrigin->y;
|
|
}
|
|
else
|
|
{
|
|
x = pOrigin->x + mulscale30r(Cos(angle), a3);
|
|
y = pOrigin->y + mulscale30r(Sin(angle), a3);
|
|
}
|
|
|
|
vec3_t pos = { x, y, z };
|
|
setActorPos(pDudeActor, &pos);
|
|
|
|
pDude->type = nType;
|
|
pDude->ang = angle;
|
|
|
|
pDude->cstat |= 0x1101;
|
|
pDude->clipdist = getDudeInfo(nType)->clipdist;
|
|
|
|
pXDude->respawn = 1;
|
|
pXDude->health = getDudeInfo(nType)->startHealth << 4;
|
|
|
|
if (fileSystem.FindResource(getDudeInfo(nType)->seqStartID, "SEQ"))
|
|
seqSpawn(getDudeInfo(nType)->seqStartID, 3, pDude->extra, -1);
|
|
|
|
// add a way to inherit some values of spawner by dude.
|
|
if (pSource->flags & kModernTypeFlag1) {
|
|
|
|
//inherit pal?
|
|
if (pDude->pal <= 0)
|
|
pDude->pal = pSource->pal;
|
|
|
|
// inherit spawn sprite trigger settings, so designer can count monsters.
|
|
pXDude->txID = pXSource->txID;
|
|
pXDude->command = pXSource->command;
|
|
pXDude->triggerOn = pXSource->triggerOn;
|
|
pXDude->triggerOff = pXSource->triggerOff;
|
|
|
|
// inherit drop items
|
|
pXDude->dropMsg = pXSource->dropMsg;
|
|
|
|
// inherit dude flags
|
|
pXDude->dudeDeaf = pXSource->dudeDeaf;
|
|
pXDude->dudeGuard = pXSource->dudeGuard;
|
|
pXDude->dudeAmbush = pXSource->dudeAmbush;
|
|
pXDude->dudeFlag4 = pXSource->dudeFlag4;
|
|
pXDude->unused1 = pXSource->unused1;
|
|
|
|
}
|
|
|
|
aiInitSprite(pDudeActor);
|
|
|
|
gKillMgr.AddNewKill(1);
|
|
|
|
bool burning = IsBurningDude(pDudeActor);
|
|
if (burning) {
|
|
pXDude->burnTime = 10;
|
|
pDudeActor->SetTarget(nullptr);
|
|
}
|
|
|
|
if ((burning || (pSource->flags & kModernTypeFlag3)) && !pXDude->dudeFlag4)
|
|
aiActivateDude(pDudeActor);
|
|
|
|
return pDudeActor;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool nnExtIsImmune(DBloodActor* actor, int dmgType, int minScale)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
if (dmgType >= kDmgFall && dmgType < kDmgMax && actor->hasX() && actor->x().locked != 1)
|
|
{
|
|
if (pSprite->type >= kThingBase && pSprite->type < kThingMax)
|
|
{
|
|
return (thingInfo[pSprite->type - kThingBase].dmgControl[dmgType] <= minScale);
|
|
}
|
|
else if (actor->IsDudeActor())
|
|
{
|
|
if (actor->IsPlayerActor()) return (gPlayer[pSprite->type - kDudePlayer1].damageControl[dmgType]);
|
|
else if (pSprite->type == kDudeModernCustom) return (actor->genDudeExtra.dmgControl[dmgType] <= minScale);
|
|
else return (getDudeInfo(pSprite->type)->damageVal[dmgType] <= minScale);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool nnExtEraseModernStuff(DBloodActor* actor)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
auto pXSprite = &actor->x();
|
|
|
|
bool erased = false;
|
|
switch (pSprite->type) {
|
|
// erase all modern types if the map is not extended
|
|
case kModernCustomDudeSpawn:
|
|
case kModernRandomTX:
|
|
case kModernSequentialTX:
|
|
case kModernSeqSpawner:
|
|
case kModernObjPropertiesChanger:
|
|
case kModernObjPicnumChanger:
|
|
case kModernObjSizeChanger:
|
|
case kModernDudeTargetChanger:
|
|
case kModernSectorFXChanger:
|
|
case kModernObjDataChanger:
|
|
case kModernSpriteDamager:
|
|
case kModernObjDataAccumulator:
|
|
case kModernEffectSpawner:
|
|
case kModernWindGenerator:
|
|
case kModernPlayerControl:
|
|
case kModernCondition:
|
|
case kModernConditionFalse:
|
|
case kModernSlopeChanger:
|
|
case kModernStealthRegion:
|
|
pSprite->type = kSpriteDecoration;
|
|
erased = true;
|
|
break;
|
|
case kItemModernMapLevel:
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
case kModernThingTNTProx:
|
|
case kModernThingEnemyLifeLeech:
|
|
pSprite->type = kSpriteDecoration;
|
|
ChangeActorStat(actor, kStatDecoration);
|
|
erased = true;
|
|
break;
|
|
// also erase some modernized vanilla types which was not active
|
|
case kMarkerWarpDest:
|
|
if (pSprite->statnum == kStatMarker) break;
|
|
pSprite->type = kSpriteDecoration;
|
|
erased = true;
|
|
break;
|
|
}
|
|
|
|
if (pXSprite->Sight)
|
|
{
|
|
pXSprite->Sight = false; // it does not work in vanilla at all
|
|
erased = true;
|
|
}
|
|
|
|
if (pXSprite->Proximity)
|
|
{
|
|
// proximity works only for things and dudes in vanilla
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatThing:
|
|
case kStatDude:
|
|
break;
|
|
default:
|
|
pXSprite->Proximity = false;
|
|
erased = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
return erased;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void nnExtTriggerObject(int objType, int objIndex, int command)
|
|
{
|
|
switch (objType)
|
|
{
|
|
case OBJ_SECTOR:
|
|
if (!xsectRangeIsFine(sector[objIndex].extra)) break;
|
|
trTriggerSector(objIndex, &xsector[sector[objIndex].extra], command);
|
|
break;
|
|
case OBJ_WALL:
|
|
if (!xwallRangeIsFine(wall[objIndex].extra)) break;
|
|
trTriggerWall(objIndex, &xwall[wall[objIndex].extra], command);
|
|
break;
|
|
case OBJ_SPRITE:
|
|
if (!xspriRangeIsFine(sprite[objIndex].extra)) break;
|
|
trTriggerSprite(objIndex, &xsprite[sprite[objIndex].extra], command);
|
|
break;
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void nnExtResetGlobals()
|
|
{
|
|
gAllowTrueRandom = gEventRedirectsUsed = false;
|
|
|
|
// reset counters
|
|
gProxySpritesCount = gSightSpritesCount = gPhysSpritesCount = gImpactSpritesCount = 0;
|
|
|
|
// fill arrays with negative values to avoid index 0 situation
|
|
memset(gSightSpritesList, 0, sizeof(gSightSpritesList));
|
|
memset(gProxySpritesList, 0, sizeof(gProxySpritesList));
|
|
memset(gPhysSpritesList, 0, sizeof(gPhysSpritesList));
|
|
memset(gImpactSpritesList, 0, sizeof(gImpactSpritesList));
|
|
|
|
// reset tracking conditions, if any
|
|
if (gTrackingCondsCount > 0)
|
|
{
|
|
for (int i = 0; i < gTrackingCondsCount; i++)
|
|
{
|
|
TRCONDITION* pCond = &gCondition[i];
|
|
for (unsigned k = 0; k < kMaxTracedObjects; k++)
|
|
{
|
|
pCond->obj[k].actor = nullptr;
|
|
pCond->obj[k].index_ = pCond->obj[k].cmd = 0;
|
|
pCond->obj[k].type = -1;
|
|
}
|
|
|
|
pCond->length = 0;
|
|
}
|
|
|
|
gTrackingCondsCount = 0;
|
|
}
|
|
|
|
// clear sprite mass cache
|
|
for (int i = 0; i < kMaxSprites; i++)
|
|
{
|
|
bloodActors[i].spriteMass = {};
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void nnExtInitModernStuff(bool bSaveLoad)
|
|
{
|
|
nnExtResetGlobals();
|
|
|
|
// use true random only for single player mode, otherwise use Blood's default one.
|
|
if (gGameOptions.nGameType == 0 && !VanillaMode())
|
|
{
|
|
gStdRandom.seed(std::random_device()());
|
|
|
|
// since true random is not working if compiled with old mingw versions, we should
|
|
// check if it works in game and if not - switch to using in-game random function.
|
|
for (int i = kMaxRandomizeRetries; i >= 0; i--)
|
|
{
|
|
std::uniform_int_distribution<int> dist_a_b(0, 100);
|
|
if (gAllowTrueRandom || i <= 0) break;
|
|
else if (dist_a_b(gStdRandom) != 0)
|
|
gAllowTrueRandom = true;
|
|
}
|
|
}
|
|
|
|
for (int i = 0; i < kMaxXSprites; i++)
|
|
{
|
|
auto actor = &bloodActors[i];
|
|
if (actor->s().statnum == kStatFree || !actor->hasX()) continue;
|
|
XSPRITE* pXSprite = &actor->x();
|
|
spritetype* pSprite = &actor->s();
|
|
|
|
switch (pSprite->type) {
|
|
case kModernRandomTX:
|
|
case kModernSequentialTX:
|
|
if (pXSprite->command == kCmdLink) gEventRedirectsUsed = true;
|
|
break;
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
getSpriteMassBySize(actor); // create mass cache
|
|
break;
|
|
case kModernCondition:
|
|
case kModernConditionFalse:
|
|
if (bSaveLoad) break;
|
|
else if (!pXSprite->rxID && pXSprite->data1 > kCondGameMax) condError(pXSprite,"\nThe condition must have RX ID!\nSPRITE #%d", actor->GetIndex());
|
|
else if (!pXSprite->txID && !pSprite->flags)
|
|
{
|
|
Printf(PRINT_HIGH, "The condition must have TX ID or hitag to be set: RX ID %d, SPRITE #%d", pXSprite->rxID, pSprite->index);
|
|
}
|
|
break;
|
|
}
|
|
|
|
// init after loading save file
|
|
if (bSaveLoad)
|
|
{
|
|
// add in list of physics affected sprites
|
|
if (pXSprite->physAttr != 0)
|
|
{
|
|
gPhysSpritesList[gPhysSpritesCount++] = actor; // add sprite index
|
|
getSpriteMassBySize(actor); // create mass cache
|
|
}
|
|
|
|
if (pXSprite->data3 != pXSprite->sysData1)
|
|
{
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatDude:
|
|
switch (pSprite->type)
|
|
{
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
pXSprite->data3 = pXSprite->sysData1; // move sndStartId back from sysData1 to data3
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// auto set going On and going Off if both are empty
|
|
if (pXSprite->txID && !pXSprite->triggerOn && !pXSprite->triggerOff)
|
|
pXSprite->triggerOn = pXSprite->triggerOff = true;
|
|
|
|
// copy custom start health to avoid overwrite by kThingBloodChunks
|
|
if (actor->IsDudeActor())
|
|
pXSprite->sysData2 = pXSprite->data4;
|
|
|
|
// check reserved statnums
|
|
if (pSprite->statnum >= kStatModernBase && pSprite->statnum < kStatModernMax)
|
|
{
|
|
bool sysStat = true;
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatModernStealthRegion:
|
|
sysStat = (pSprite->type != kModernStealthRegion);
|
|
break;
|
|
case kStatModernDudeTargetChanger:
|
|
sysStat = (pSprite->type != kModernDudeTargetChanger);
|
|
break;
|
|
case kStatModernCondition:
|
|
sysStat = (pSprite->type != kModernCondition && pSprite->type != kModernConditionFalse);
|
|
break;
|
|
case kStatModernEventRedirector:
|
|
sysStat = (pSprite->type != kModernRandomTX && pSprite->type != kModernSequentialTX);
|
|
break;
|
|
case kStatModernWindGen:
|
|
sysStat = (pSprite->type != kModernWindGenerator);
|
|
break;
|
|
case kStatModernPlayerLinker:
|
|
case kStatModernQavScene:
|
|
sysStat = (pSprite->type != kModernPlayerControl);
|
|
break;
|
|
}
|
|
|
|
if (sysStat)
|
|
I_Error("Sprite statnum %d on sprite #%d is in a range of reserved (%d - %d)!", pSprite->statnum, actor->GetIndex(), kStatModernBase, kStatModernMax);
|
|
}
|
|
|
|
switch (pSprite->type)
|
|
{
|
|
case kModernRandomTX:
|
|
case kModernSequentialTX:
|
|
if (pXSprite->command != kCmdLink) break;
|
|
// add statnum for faster redirects search
|
|
ChangeActorStat(actor, kStatModernEventRedirector);
|
|
break;
|
|
case kModernWindGenerator:
|
|
pSprite->cstat &= ~CSTAT_SPRITE_BLOCK;
|
|
ChangeActorStat(actor, kStatModernWindGen);
|
|
break;
|
|
case kModernDudeTargetChanger:
|
|
case kModernObjDataAccumulator:
|
|
case kModernRandom:
|
|
case kModernRandom2:
|
|
case kModernStealthRegion:
|
|
pSprite->cstat &= ~CSTAT_SPRITE_BLOCK;
|
|
pSprite->cstat |= CSTAT_SPRITE_INVISIBLE;
|
|
switch (pSprite->type)
|
|
{
|
|
// stealth regions for patrolling enemies
|
|
case kModernStealthRegion:
|
|
ChangeActorStat(actor, kStatModernStealthRegion);
|
|
break;
|
|
// add statnum for faster dude searching
|
|
case kModernDudeTargetChanger:
|
|
ChangeActorStat(actor, kStatModernDudeTargetChanger);
|
|
if (pXSprite->busyTime <= 0) pXSprite->busyTime = 5;
|
|
pXSprite->command = kCmdLink;
|
|
break;
|
|
// remove kStatItem status from random item generators
|
|
case kModernRandom:
|
|
case kModernRandom2:
|
|
ChangeActorStat(actor, kStatDecoration);
|
|
pXSprite->sysData1 = pXSprite->command; // save the command so spawned item can inherit it
|
|
pXSprite->command = kCmdLink; // generator itself can't send commands
|
|
break;
|
|
}
|
|
break;
|
|
case kModernThingTNTProx:
|
|
pXSprite->Proximity = true;
|
|
break;
|
|
case kDudeModernCustom:
|
|
{
|
|
if (pXSprite->txID <= 0) break;
|
|
int found = 0;
|
|
BloodStatIterator it(kStatDude);
|
|
while (DBloodActor* iactor = it.Next())
|
|
{
|
|
XSPRITE* pXSpr = &iactor->x();
|
|
if (pXSpr->rxID != pXSprite->txID) continue;
|
|
else if (found) I_Error("\nCustom dude (TX ID %d):\nOnly one incarnation allowed per channel!", pXSprite->txID);
|
|
ChangeActorStat(iactor, kStatInactive);
|
|
found++;
|
|
}
|
|
break;
|
|
}
|
|
case kDudePodMother:
|
|
case kDudeTentacleMother:
|
|
pXSprite->state = 1;
|
|
break;
|
|
case kModernPlayerControl:
|
|
switch (pXSprite->command)
|
|
{
|
|
case kCmdLink:
|
|
{
|
|
if (pXSprite->data1 < 1 || pXSprite->data1 > kMaxPlayers)
|
|
I_Error("\nPlayer Control (SPRITE #%d):\nPlayer out of a range (data1 = %d)", actor->GetIndex(), pXSprite->data1);
|
|
|
|
//if (numplayers < pXSprite->data1)
|
|
//I_Error("\nPlayer Control (SPRITE #%d):\n There is no player #%d", pSprite->index, pXSprite->data1);
|
|
|
|
if (pXSprite->rxID && pXSprite->rxID != kChannelLevelStart)
|
|
I_Error("\nPlayer Control (SPRITE #%d) with Link command should have no RX ID!", actor->GetIndex());
|
|
|
|
if (pXSprite->txID && pXSprite->txID < kChannelUser)
|
|
I_Error("\nPlayer Control (SPRITE #%d):\nTX ID should be in range of %d and %d!", actor->GetIndex(), kChannelUser, kChannelMax);
|
|
|
|
// only one linker per player allowed
|
|
int nSprite;
|
|
StatIterator it(kStatModernPlayerLinker);
|
|
while ((nSprite = it.NextIndex()) >= 0)
|
|
{
|
|
XSPRITE* pXCtrl = &xsprite[sprite[nSprite].extra];
|
|
if (pXSprite->data1 == pXCtrl->data1)
|
|
I_Error("\nPlayer Control (SPRITE #%d):\nPlayer %d already linked with different player control sprite #%d!", actor->GetIndex(), pXSprite->data1, nSprite);
|
|
}
|
|
pXSprite->sysData1 = -1;
|
|
pSprite->cstat &= ~CSTAT_SPRITE_BLOCK;
|
|
ChangeActorStat(actor, kStatModernPlayerLinker);
|
|
break;
|
|
}
|
|
case 67: // play qav animation
|
|
if (pXSprite->txID && !pXSprite->waitTime) pXSprite->waitTime = 1;
|
|
ChangeActorStat(actor, kStatModernQavScene);
|
|
break;
|
|
}
|
|
break;
|
|
case kModernCondition:
|
|
case kModernConditionFalse:
|
|
if (pXSprite->busyTime > 0)
|
|
{
|
|
if (pXSprite->waitTime > 0)
|
|
{
|
|
pXSprite->busyTime += ClipHigh(((pXSprite->waitTime * 120) / 10), 4095); pXSprite->waitTime = 0;
|
|
Printf(PRINT_HIGH, "Summing busyTime and waitTime for tracking condition #%d, RX ID %d. Result = %d ticks", pSprite->index, pXSprite->rxID, pXSprite->busyTime);
|
|
}
|
|
pXSprite->busy = pXSprite->busyTime;
|
|
}
|
|
|
|
if (pXSprite->waitTime && pXSprite->command >= kCmdNumberic)
|
|
condError(pXSprite, "Delay is not available when using numberic commands (%d - %d)", kCmdNumberic, 255);
|
|
|
|
pXSprite->Decoupled = false; // must go through operateSprite always
|
|
pXSprite->Sight = pXSprite->Impact = pXSprite->Touch = pXSprite->triggerOff = false;
|
|
pXSprite->Proximity = pXSprite->Push = pXSprite->Vector = pXSprite->triggerOn = false;
|
|
pXSprite->state = pXSprite->restState = 0;
|
|
|
|
pXSprite->targetX = pXSprite->targetY = pXSprite->targetZ = pXSprite->sysData2 = -1;
|
|
actor->SetTarget(nullptr);
|
|
ChangeActorStat(actor, kStatModernCondition);
|
|
int oldStat = pSprite->cstat; pSprite->cstat = 0x30;
|
|
|
|
if (oldStat & CSTAT_SPRITE_BLOCK)
|
|
pSprite->cstat |= CSTAT_SPRITE_BLOCK;
|
|
|
|
if (oldStat & 0x2000) pSprite->cstat |= 0x2000;
|
|
else if (oldStat & 0x4000) pSprite->cstat |= 0x4000;
|
|
|
|
pSprite->cstat |= CSTAT_SPRITE_INVISIBLE;
|
|
break;
|
|
}
|
|
|
|
// the following trigger flags are senseless to have together
|
|
if ((pXSprite->Touch && (pXSprite->Proximity || pXSprite->Sight) && pXSprite->DudeLockout)
|
|
|| (pXSprite->Touch && pXSprite->Proximity && !pXSprite->Sight)) pXSprite->Touch = false;
|
|
|
|
if (pXSprite->Proximity && pXSprite->Sight && pXSprite->DudeLockout)
|
|
pXSprite->Proximity = false;
|
|
|
|
// very quick fix for floor sprites with Touch trigger flag if their Z is equals sector floorz / ceilgz
|
|
if (pSprite->sectnum >= 0 && pXSprite->Touch && (pSprite->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR)) {
|
|
if (pSprite->z == sector[pSprite->sectnum].floorz) pSprite->z--;
|
|
else if (pSprite->z == sector[pSprite->sectnum].ceilingz) pSprite->z++;
|
|
}
|
|
}
|
|
|
|
// make Proximity flag work not just for dudes and things...
|
|
if (pXSprite->Proximity && gProxySpritesCount < kMaxSuperXSprites)
|
|
{
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatFX: case kStatExplosion: case kStatItem:
|
|
case kStatPurge: case kStatSpares: case kStatFlare:
|
|
case kStatInactive: case kStatFree: case kStatMarker:
|
|
case kStatPathMarker: case kStatThing: case kStatDude:
|
|
case kStatModernPlayerLinker:
|
|
break;
|
|
default:
|
|
gProxySpritesList[gProxySpritesCount++] = actor;
|
|
if (gProxySpritesCount == kMaxSuperXSprites)
|
|
I_Error("Max (%d) *additional* Proximity sprites reached!", kMaxSuperXSprites);
|
|
break;
|
|
}
|
|
}
|
|
|
|
// make Sight, Screen, Aim flags work not just for dudes and things...
|
|
if ((pXSprite->Sight || pXSprite->unused3) && gSightSpritesCount < kMaxSuperXSprites)
|
|
{
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatFX: case kStatExplosion: case kStatItem:
|
|
case kStatPurge: case kStatSpares: case kStatFlare:
|
|
case kStatInactive: case kStatFree: case kStatMarker:
|
|
case kStatPathMarker: case kStatModernPlayerLinker:
|
|
break;
|
|
default:
|
|
gSightSpritesList[gSightSpritesCount++] = actor;
|
|
if (gSightSpritesCount == kMaxSuperXSprites)
|
|
I_Error("Max (%d) Sight sprites reached!", kMaxSuperXSprites);
|
|
break;
|
|
}
|
|
}
|
|
|
|
// make Impact flag work for sprites that affected by explosions...
|
|
if (pXSprite->Impact && gImpactSpritesCount < kMaxSuperXSprites)
|
|
{
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatFX: case kStatExplosion: case kStatItem:
|
|
case kStatPurge: case kStatSpares: case kStatFlare:
|
|
case kStatInactive: case kStatFree: case kStatMarker:
|
|
case kStatPathMarker: case kStatModernPlayerLinker:
|
|
break;
|
|
default:
|
|
gImpactSpritesList[gImpactSpritesCount++] = actor;
|
|
if (gImpactSpritesCount == kMaxSuperXSprites)
|
|
I_Error("Max (%d) *additional* Impact sprites reached!", kMaxSuperXSprites);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
// collect objects for tracking conditions
|
|
BloodStatIterator it(kStatModernCondition);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
spritetype* pSprite = &iactor->s();
|
|
XSPRITE* pXSprite = &iactor->x();
|
|
|
|
if (pXSprite->busyTime <= 0 || pXSprite->isTriggered) continue;
|
|
else if (gTrackingCondsCount >= kMaxTrackingConditions)
|
|
I_Error("\nMax (%d) tracking conditions reached!", kMaxTrackingConditions);
|
|
|
|
int count = 0;
|
|
TRCONDITION* pCond = &gCondition[gTrackingCondsCount];
|
|
|
|
for (int i = 0; i < kMaxXSprites; i++)
|
|
{
|
|
auto actor = &bloodActors[i];
|
|
if (actor->s().statnum == kStatFree || !actor->hasX() || xsprite[i].txID != pXSprite->rxID || actor == iactor)
|
|
continue;
|
|
|
|
XSPRITE* pXSpr = &actor->x();
|
|
spritetype* pSpr = &actor->s();
|
|
int index = pXSpr->reference; int cmd = pXSpr->command;
|
|
switch (pSpr->type) {
|
|
case kSwitchToggle: // exceptions
|
|
case kSwitchOneWay: // exceptions
|
|
continue;
|
|
case kModernPlayerControl:
|
|
if (pSpr->statnum != kStatModernPlayerLinker || !bSaveLoad) break;
|
|
// assign player sprite after savegame loading
|
|
index = pXSpr->sysData1;
|
|
cmd = xsprite[sprite[index].extra].command;
|
|
break;
|
|
}
|
|
|
|
if (pSpr->type == kModernCondition || pSpr->type == kModernConditionFalse)
|
|
condError(pXSprite, "Tracking condition always must be first in condition sequence!");
|
|
|
|
if (count >= kMaxTracedObjects)
|
|
condError(pXSprite, "Max(%d) objects to track reached for condition #%d, RXID: %d!");
|
|
|
|
pCond->obj[count].type = OBJ_SPRITE;
|
|
pCond->obj[count].index_ = 0;
|
|
pCond->obj[count].actor = &bloodActors[index];
|
|
pCond->obj[count++].cmd = cmd;
|
|
}
|
|
|
|
for (int i = 0; i < kMaxXSectors; i++)
|
|
{
|
|
if (!sectRangeIsFine(xsector[i].reference) || xsector[i].txID != pXSprite->rxID) continue;
|
|
else if (count >= kMaxTracedObjects)
|
|
condError(pXSprite, "Max(%d) objects to track reached for condition #%d, RXID: %d!");
|
|
|
|
pCond->obj[count].type = OBJ_SECTOR;
|
|
pCond->obj[count].actor = nullptr;
|
|
pCond->obj[count].index_ = xsector[i].reference;
|
|
pCond->obj[count++].cmd = xsector[i].command;
|
|
}
|
|
|
|
for (int i = 0; i < kMaxXWalls; i++)
|
|
{
|
|
if (!wallRangeIsFine(xwall[i].reference) || xwall[i].txID != pXSprite->rxID)
|
|
continue;
|
|
|
|
walltype* pWall = &wall[xwall[i].reference];
|
|
switch (pWall->type) {
|
|
case kSwitchToggle: // exceptions
|
|
case kSwitchOneWay: // exceptions
|
|
continue;
|
|
}
|
|
|
|
if (count >= kMaxTracedObjects)
|
|
condError(pXSprite, "Max(%d) objects to track reached for condition #%d, RXID: %d!");
|
|
|
|
pCond->obj[count].type = OBJ_WALL;
|
|
pCond->obj[count].index_ = xwall[i].reference;
|
|
pCond->obj[count].actor = nullptr;
|
|
pCond->obj[count++].cmd = xwall[i].command;
|
|
}
|
|
|
|
if (pXSprite->data1 > kCondGameMax && count == 0)
|
|
Printf(PRINT_HIGH, "No objects to track found for condition #%d, RXID: %d!", pSprite->index, pXSprite->rxID);
|
|
|
|
pCond->length = count;
|
|
pCond->actor = iactor;
|
|
gTrackingCondsCount++;
|
|
|
|
}
|
|
}
|
|
|
|
|
|
// The following functions required for random event features
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int nnExtRandom(int a, int b)
|
|
{
|
|
if (!gAllowTrueRandom) return Random(((b + 1) - a)) + a;
|
|
// used for better randomness in single player
|
|
std::uniform_int_distribution<int> dist_a_b(a, b);
|
|
return dist_a_b(gStdRandom);
|
|
}
|
|
|
|
static int GetDataVal(DBloodActor* actor, int data)
|
|
{
|
|
if (!actor->hasX()) return -1;
|
|
|
|
switch (data) {
|
|
case 0: return actor->x().data1;
|
|
case 1: return actor->x().data2;
|
|
case 2: return actor->x().data3;
|
|
case 3: return actor->x().data4;
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// tries to get random data field of sprite
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
static int randomGetDataValue(DBloodActor* actor, int randType)
|
|
{
|
|
if (actor == NULL || !actor->hasX()) return -1;
|
|
auto pXSprite = &actor->x();
|
|
int random = 0; int bad = 0; int maxRetries = kMaxRandomizeRetries;
|
|
|
|
int rData[4];
|
|
rData[0] = pXSprite->data1; rData[2] = pXSprite->data3;
|
|
rData[1] = pXSprite->data2; rData[3] = pXSprite->data4;
|
|
// randomize only in case if at least 2 data fields fits.
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
switch (randType) {
|
|
case kRandomizeItem:
|
|
if (rData[i] >= kItemWeaponBase && rData[i] < kItemMax) break;
|
|
else bad++;
|
|
break;
|
|
case kRandomizeDude:
|
|
if (rData[i] >= kDudeBase && rData[i] < kDudeMax) break;
|
|
else bad++;
|
|
break;
|
|
case kRandomizeTX:
|
|
if (rData[i] > kChannelZero && rData[i] < kChannelUserMax) break;
|
|
else bad++;
|
|
break;
|
|
default:
|
|
bad++;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (bad < 3)
|
|
{
|
|
// try randomize few times
|
|
while (maxRetries > 0)
|
|
{
|
|
random = nnExtRandom(0, 3);
|
|
if (rData[random] > 0) return rData[random];
|
|
else maxRetries--;
|
|
}
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function drops random item using random pickup generator(s)
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
static DBloodActor* randomDropPickupObject(DBloodActor* sourceactor, int prevItem)
|
|
{
|
|
DBloodActor* spawned = nullptr;
|
|
int selected = -1;
|
|
int maxRetries = 9;
|
|
if (sourceactor->hasX())
|
|
{
|
|
auto pSource = &sourceactor->s();
|
|
XSPRITE* pXSource = &sourceactor->x();
|
|
while ((selected = randomGetDataValue(sourceactor, kRandomizeItem)) == prevItem) if (maxRetries-- <= 0) break;
|
|
if (selected > 0)
|
|
{
|
|
spawned = actDropObject(sourceactor, selected);
|
|
if (spawned)
|
|
{
|
|
auto pSprite2 = &spawned->s();
|
|
|
|
pXSource->dropMsg = uint8_t(pSprite2->type); // store dropped item type in dropMsg
|
|
pSprite2->x = pSource->x;
|
|
pSprite2->y = pSource->y;
|
|
pSprite2->z = pSource->z;
|
|
|
|
if ((pSource->flags & kModernTypeFlag1) && (pXSource->txID > 0 || (pXSource->txID != 3 && pXSource->lockMsg > 0)))
|
|
{
|
|
spawned->addX();
|
|
XSPRITE* pXSprite2 = &spawned->x();
|
|
|
|
// inherit spawn sprite trigger settings, so designer can send command when item picked up.
|
|
pXSprite2->txID = pXSource->txID;
|
|
pXSprite2->command = pXSource->sysData1;
|
|
pXSprite2->triggerOn = pXSource->triggerOn;
|
|
pXSprite2->triggerOff = pXSource->triggerOff;
|
|
|
|
pXSprite2->Pickup = true;
|
|
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return spawned;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function spawns random dude using dudeSpawn
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DBloodActor* randomSpawnDude(DBloodActor* sourceactor, DBloodActor* origin, int a3, int a4)
|
|
{
|
|
DBloodActor* spawned = NULL; int selected = -1;
|
|
|
|
if ((selected = randomGetDataValue(sourceactor, kRandomizeDude)) > 0)
|
|
spawned = nnExtSpawnDude(sourceactor, origin, selected, a3, 0);
|
|
|
|
return spawned;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
static void windGenDoVerticalWind(int factor, int nSector)
|
|
{
|
|
int val, maxZ, zdiff; bool maxZfound = false;
|
|
|
|
// find maxz marker first
|
|
BloodSectIterator it(nSector);
|
|
while (auto actor = it.Next())
|
|
{
|
|
auto sp = &actor->s();
|
|
if (sp->type == kMarkerOn && sp->statnum != kStatMarker)
|
|
{
|
|
maxZ = sp->z;
|
|
maxZfound = true;
|
|
break;
|
|
}
|
|
}
|
|
|
|
it.Reset(nSector);
|
|
while (auto actor = it.Next())
|
|
{
|
|
auto pSpr = &actor->s();
|
|
switch (pSpr->statnum)
|
|
{
|
|
case kStatFree:
|
|
continue;
|
|
case kStatFX:
|
|
if (actor->zvel()) break;
|
|
continue;
|
|
case kStatThing:
|
|
case kStatDude:
|
|
if (pSpr->flags & kPhysGravity) break;
|
|
continue;
|
|
default:
|
|
if (actor->hasX() && actor->x().physAttr & kPhysGravity) break;
|
|
continue;
|
|
}
|
|
|
|
if (maxZfound && pSpr->z <= maxZ)
|
|
{
|
|
zdiff = pSpr->z - maxZ;
|
|
if (actor->zvel() < 0) actor->zvel() += MulScale(actor->zvel() >> 4, zdiff, 16);
|
|
continue;
|
|
|
|
}
|
|
|
|
val = -MulScale(factor * 64, 0x10000, 16);
|
|
if (actor->zvel() >= 0) actor->zvel() += val;
|
|
else actor->zvel() = val;
|
|
|
|
pSpr->z += actor->zvel() >> 12;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void nnExtProcessSuperSprites()
|
|
{
|
|
// process tracking conditions
|
|
if (gTrackingCondsCount > 0)
|
|
{
|
|
for (int i = 0; i < gTrackingCondsCount; i++)
|
|
{
|
|
TRCONDITION const* pCond = &gCondition[i];
|
|
XSPRITE* pXCond = &pCond->actor->x();
|
|
if (pXCond->locked || pXCond->isTriggered || ++pXCond->busy < pXCond->busyTime)
|
|
continue;
|
|
|
|
if (pXCond->data1 >= kCondGameBase && pXCond->data1 < kCondGameMax)
|
|
{
|
|
EVENT evn;
|
|
evn.index_ = 0;
|
|
evn.actor = pCond->actor;
|
|
evn.cmd = (int8_t)pXCond->command;
|
|
evn.type = OBJ_SPRITE;
|
|
evn.funcID = kCallbackMax;
|
|
useCondition(pCond->actor, evn);
|
|
}
|
|
else if (pCond->length > 0)
|
|
{
|
|
pXCond->busy = 0;
|
|
for (unsigned k = 0; k < pCond->length; k++)
|
|
{
|
|
EVENT evn;
|
|
evn.actor = pCond->obj[k].actor;
|
|
evn.index_ = pCond->obj[k].index_;
|
|
evn.cmd = pCond->obj[k].cmd;
|
|
evn.type = pCond->obj[k].type;
|
|
evn.funcID = kCallbackMax;
|
|
useCondition(pCond->actor, evn);
|
|
}
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
// process floor oriented kModernWindGenerator to create a vertical wind in the sectors
|
|
BloodStatIterator it(kStatModernWindGen);
|
|
while (auto windactor = it.Next())
|
|
{
|
|
|
|
spritetype* pWind = &windactor->s();
|
|
if (!(pWind->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR) || pWind->statnum >= kMaxStatus || !windactor->hasX())
|
|
continue;
|
|
|
|
XSPRITE* pXWind = &windactor->x();
|
|
if (!pXWind->state || pXWind->locked)
|
|
continue;
|
|
|
|
int j, rx;
|
|
bool fWindAlways = (pWind->flags & kModernTypeFlag1);
|
|
|
|
if (pXWind->txID) {
|
|
|
|
rx = pXWind->txID;
|
|
for (j = bucketHead[rx]; j < bucketHead[rx + 1]; j++)
|
|
{
|
|
if (rxBucket[j].type != OBJ_SECTOR)
|
|
continue;
|
|
|
|
int index = rxBucket[j].rxindex;
|
|
XSECTOR* pXSector = &xsector[sector[index].extra];
|
|
if ((!pXSector->locked) && (fWindAlways || pXSector->windAlways || pXSector->busy))
|
|
windGenDoVerticalWind(pXWind->sysData2, index);
|
|
}
|
|
|
|
XSPRITE* pXRedir = NULL; // check redirected TX buckets
|
|
while ((pXRedir = evrListRedirectors(OBJ_SPRITE, sprite[pXWind->reference].extra, pXRedir, &rx)) != NULL)
|
|
{
|
|
for (j = bucketHead[rx]; j < bucketHead[rx + 1]; j++)
|
|
{
|
|
if (rxBucket[j].type != OBJ_SECTOR)
|
|
continue;
|
|
|
|
int index = rxBucket[j].rxindex;
|
|
XSECTOR* pXSector = &xsector[sector[index].extra];
|
|
if ((!pXSector->locked) && (fWindAlways || pXSector->windAlways || pXSector->busy))
|
|
windGenDoVerticalWind(pXWind->sysData2, index);
|
|
}
|
|
}
|
|
|
|
}
|
|
else if (sectRangeIsFine(pWind->sectnum))
|
|
{
|
|
sectortype* pSect = §or[pWind->sectnum];
|
|
XSECTOR* pXSector = (pSect->extra > 0) ? &xsector[pSect->extra] : NULL;
|
|
if ((fWindAlways) || (pXSector && !pXSector->locked && (pXSector->windAlways || pXSector->busy)))
|
|
windGenDoVerticalWind(pXWind->sysData2, pWind->sectnum);
|
|
}
|
|
}
|
|
|
|
// process additional proximity sprites
|
|
if (gProxySpritesCount > 0)
|
|
{
|
|
for (int i = 0; i < gProxySpritesCount; i++)
|
|
{
|
|
if (!gProxySpritesList[i] || !gProxySpritesList[i]->hasX()) continue;
|
|
|
|
auto const pProxSpr = &gProxySpritesList[i]->s();
|
|
XSPRITE* pXProxSpr = &gProxySpritesList[i]->x();
|
|
if (!pXProxSpr->Proximity || (!pXProxSpr->Interrutable && pXProxSpr->state != pXProxSpr->restState) || pXProxSpr->locked == 1
|
|
|| pXProxSpr->isTriggered) continue; // don't process locked or triggered sprites
|
|
|
|
int okDist = (gProxySpritesList[i]->IsDudeActor()) ? 96 : ClipLow(pProxSpr->clipdist * 3, 32);
|
|
int x = pProxSpr->x;
|
|
int y = pProxSpr->y;
|
|
int z = pProxSpr->z;
|
|
int sectnum = pProxSpr->sectnum;
|
|
|
|
if (!pXProxSpr->DudeLockout)
|
|
{
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto affected = it.Next())
|
|
{
|
|
if (!affected->hasX() || affected->x().health <= 0) continue;
|
|
else if (CheckProximity(&affected->s(), x, y, z, sectnum, okDist))
|
|
{
|
|
trTriggerSprite(gProxySpritesList[i], kCmdSpriteProximity);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
for (int a = connecthead; a >= 0; a = connectpoint2[a])
|
|
{
|
|
PLAYER* pPlayer = &gPlayer[a];
|
|
if (!pPlayer || !pPlayer->actor()->hasX() || pPlayer->pXSprite->health <= 0)
|
|
continue;
|
|
|
|
if (pPlayer->pXSprite->health > 0 && CheckProximity(gPlayer->pSprite, x, y, z, sectnum, okDist))
|
|
{
|
|
trTriggerSprite(gProxySpritesList[i], kCmdSpriteProximity);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// process sight sprites (for players only)
|
|
if (gSightSpritesCount > 0)
|
|
{
|
|
for (int i = 0; i < gSightSpritesCount; i++)
|
|
{
|
|
if (!gSightSpritesList[i] || !gSightSpritesList[i]->hasX()) continue;
|
|
|
|
auto const pSightSpr = &gSightSpritesList[i]->s();
|
|
XSPRITE* pXSightSpr = &gSightSpritesList[i]->x();
|
|
|
|
if ((!pXSightSpr->Interrutable && pXSightSpr->state != pXSightSpr->restState) || pXSightSpr->locked == 1 ||
|
|
pXSightSpr->isTriggered) continue; // don't process locked or triggered sprites
|
|
|
|
int index = pSightSpr->index;
|
|
|
|
// sprite is drawn for one of players
|
|
if ((pXSightSpr->unused3 & kTriggerSpriteScreen) && (gSightSpritesList[i]->s().cstat2 & CSTAT2_SPRITE_MAPPED))
|
|
{
|
|
trTriggerSprite(gSightSpritesList[i], kCmdSpriteSight);
|
|
gSightSpritesList[i]->s().cstat2 &= ~CSTAT2_SPRITE_MAPPED;
|
|
continue;
|
|
}
|
|
|
|
int x = pSightSpr->x;
|
|
int y = pSightSpr->y;
|
|
int z = pSightSpr->z;
|
|
int sectnum = pSightSpr->sectnum;
|
|
int ztop2, zbot2;
|
|
|
|
for (int a = connecthead; a >= 0; a = connectpoint2[a])
|
|
{
|
|
PLAYER* pPlayer = &gPlayer[a];
|
|
if (!pPlayer || !pPlayer->actor()->hasX() || pPlayer->pXSprite->health <= 0)
|
|
continue;
|
|
|
|
spritetype* pPlaySprite = pPlayer->pSprite;
|
|
GetSpriteExtents(pPlaySprite, &ztop2, &zbot2);
|
|
if (cansee(x, y, z, sectnum, pPlaySprite->x, pPlaySprite->y, ztop2, pPlaySprite->sectnum))
|
|
{
|
|
if (pXSightSpr->Sight)
|
|
{
|
|
trTriggerSprite(gSightSpritesList[i], kCmdSpriteSight);
|
|
break;
|
|
}
|
|
|
|
if (pXSightSpr->unused3 & kTriggerSpriteAim)
|
|
{
|
|
bool vector = (pSightSpr->cstat & CSTAT_SPRITE_BLOCK_HITSCAN);
|
|
if (!vector)
|
|
pSightSpr->cstat |= CSTAT_SPRITE_BLOCK_HITSCAN;
|
|
|
|
HitScan(pPlaySprite, pPlayer->zWeapon, pPlayer->aim.dx, pPlayer->aim.dy, pPlayer->aim.dz, CLIPMASK0 | CLIPMASK1, 0);
|
|
|
|
//VectorScan(pPlaySprite, 0, pPlayer->zWeapon, pPlayer->aim.dx, pPlayer->aim.dy, pPlayer->aim.dz, 0, 1);
|
|
|
|
if (!vector)
|
|
pSightSpr->cstat &= ~CSTAT_SPRITE_BLOCK_HITSCAN;
|
|
|
|
if (gHitInfo.hitactor == gSightSpritesList[i])
|
|
{
|
|
trTriggerSprite(gHitInfo.hitactor, kCmdSpriteSight);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// process Debris sprites for movement
|
|
if (gPhysSpritesCount > 0)
|
|
{
|
|
for (int i = 0; i < gPhysSpritesCount; i++)
|
|
{
|
|
auto debrisactor = gPhysSpritesList[i];
|
|
if (debrisactor == nullptr || !debrisactor->hasX()) continue;
|
|
auto const pDebris = &debrisactor->s();
|
|
|
|
if (pDebris->statnum == kStatFree || (pDebris->flags & kHitagFree) != 0)
|
|
{
|
|
gPhysSpritesList[i] = nullptr;
|
|
continue;
|
|
}
|
|
|
|
XSPRITE* pXDebris = &debrisactor->x();
|
|
if (!(pXDebris->physAttr & kPhysMove) && !(pXDebris->physAttr & kPhysGravity))
|
|
{
|
|
gPhysSpritesList[i] = nullptr;
|
|
continue;
|
|
}
|
|
|
|
int nDebris = pDebris->index;
|
|
|
|
XSECTOR* pXSector = (sector[pDebris->sectnum].extra >= 0) ? &xsector[sector[pDebris->sectnum].extra] : nullptr;
|
|
viewBackupSpriteLoc(nDebris, pDebris);
|
|
|
|
bool uwater = false;
|
|
int mass = debrisactor->spriteMass.mass;
|
|
int airVel = debrisactor->spriteMass.airVel;
|
|
|
|
int top, bottom;
|
|
GetActorExtents(debrisactor, &top, &bottom);
|
|
|
|
if (pXSector != nullptr)
|
|
{
|
|
if ((uwater = pXSector->Underwater) != 0) airVel <<= 6;
|
|
if (pXSector->panVel != 0 && getflorzofslope(pDebris->sectnum, pDebris->x, pDebris->y) <= bottom)
|
|
{
|
|
int angle = pXSector->panAngle; int speed = 0;
|
|
if (pXSector->panAlways || pXSector->state || pXSector->busy)
|
|
{
|
|
speed = pXSector->panVel << 9;
|
|
if (!pXSector->panAlways && pXSector->busy)
|
|
speed = MulScale(speed, pXSector->busy, 16);
|
|
}
|
|
if (sector[pDebris->sectnum].floorstat & 64)
|
|
angle = (angle + GetWallAngle(sector[pDebris->sectnum].wallptr) + 512) & 2047;
|
|
int dx = MulScale(speed, Cos(angle), 30);
|
|
int dy = MulScale(speed, Sin(angle), 30);
|
|
debrisactor->xvel() += dx;
|
|
debrisactor->yvel() += dy;
|
|
}
|
|
}
|
|
|
|
actAirDrag(debrisactor, airVel);
|
|
|
|
if (pXDebris->physAttr & kPhysDebrisTouch)
|
|
{
|
|
PLAYER* pPlayer = NULL;
|
|
for (int a = connecthead; a != -1; a = connectpoint2[a])
|
|
{
|
|
pPlayer = &gPlayer[a];
|
|
auto pact = pPlayer->actor();
|
|
if (pact->hit().hit.type == kHitSprite && pact->hit().hit.index == nDebris)
|
|
{
|
|
int nSpeed = approxDist(pact->xvel(), pact->yvel());
|
|
nSpeed = ClipLow(nSpeed - MulScale(nSpeed, mass, 6), 0x9000 - (mass << 3));
|
|
|
|
debrisactor->xvel() += MulScale(nSpeed, Cos(pPlayer->pSprite->ang), 30);
|
|
debrisactor->yvel() += MulScale(nSpeed, Sin(pPlayer->pSprite->ang), 30);
|
|
|
|
debrisactor->hit().hit = pPlayer->pSprite->index | 0xc000;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (pXDebris->physAttr & kPhysGravity) pXDebris->physAttr |= kPhysFalling;
|
|
if ((pXDebris->physAttr & kPhysFalling) || debrisactor->xvel() || debrisactor->yvel() || debrisactor->zvel() || velFloor[pDebris->sectnum] || velCeil[pDebris->sectnum])
|
|
debrisMove(i);
|
|
|
|
if (debrisactor->xvel() || debrisactor->yvel())
|
|
pXDebris->goalAng = getangle(debrisactor->xvel(), debrisactor->yvel()) & 2047;
|
|
|
|
int ang = pDebris->ang & 2047;
|
|
if ((uwater = spriteIsUnderwater(debrisactor)) == false) evKillActor(debrisactor, kCallbackEnemeyBubble);
|
|
else if (Chance(0x1000 - mass))
|
|
{
|
|
if (debrisactor->zvel() > 0x100) debrisBubble(debrisactor);
|
|
if (ang == pXDebris->goalAng)
|
|
{
|
|
pXDebris->goalAng = (pDebris->ang + Random3(kAng60)) & 2047;
|
|
debrisBubble(debrisactor);
|
|
}
|
|
}
|
|
|
|
int angStep = ClipLow(mulscale8(1, ((abs(debrisactor->xvel()) + abs(debrisactor->yvel())) >> 5)), (uwater) ? 1 : 0);
|
|
if (ang < pXDebris->goalAng) pDebris->ang = ClipHigh(ang + angStep, pXDebris->goalAng);
|
|
else if (ang > pXDebris->goalAng) pDebris->ang = ClipLow(ang - angStep, pXDebris->goalAng);
|
|
|
|
int nSector = pDebris->sectnum;
|
|
int cz = getceilzofslope(nSector, pDebris->x, pDebris->y);
|
|
int fz = getflorzofslope(nSector, pDebris->x, pDebris->y);
|
|
|
|
GetActorExtents(debrisactor, &top, &bottom);
|
|
if (fz >= bottom && gLowerLink[nSector] < 0 && !(sector[nSector].ceilingstat & 0x1)) pDebris->z += ClipLow(cz - top, 0);
|
|
if (cz <= top && gUpperLink[nSector] < 0 && !(sector[nSector].floorstat & 0x1)) pDebris->z += ClipHigh(fz - bottom, 0);
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function plays sound predefined in missile info
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void sfxPlayMissileSound(DBloodActor* actor, int missileId)
|
|
{
|
|
const MISSILEINFO_EXTRA* pMissType = &gMissileInfoExtra[missileId - kMissileBase];
|
|
sfxPlay3DSound(actor, Chance(0x5000) ? pMissType->fireSound[0] : pMissType->fireSound[1], -1, 0);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function plays sound predefined in vector info
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void sfxPlayVectorSound(DBloodActor* actor, int vectorId)
|
|
{
|
|
const VECTORINFO_EXTRA* pVectorData = &gVectorInfoExtra[vectorId];
|
|
sfxPlay3DSound(actor, Chance(0x5000) ? pVectorData->fireSound[0] : pVectorData->fireSound[1], -1, 0);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int getSpriteMassBySize(DBloodActor* actor)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
int mass = 0; int seqId = -1; int clipDist = pSprite->clipdist; Seq* pSeq = NULL;
|
|
if (!actor->hasX())
|
|
{
|
|
I_Error("getSpriteMassBySize: pSprite->extra < 0");
|
|
}
|
|
else if (actor->IsDudeActor())
|
|
{
|
|
switch (pSprite->type)
|
|
{
|
|
case kDudePodMother: // fake dude, no seq
|
|
break;
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
seqId = actor->x().data2;
|
|
clipDist = actor->genDudeExtra.initVals[2];
|
|
break;
|
|
default:
|
|
seqId = getDudeInfo(pSprite->type)->seqStartID;
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
seqId = seqGetID(3, pSprite->extra);
|
|
}
|
|
|
|
SPRITEMASS* cached = &actor->spriteMass;
|
|
if (((seqId >= 0 && seqId == cached->seqId) || pSprite->picnum == cached->picnum) && pSprite->xrepeat == cached->xrepeat &&
|
|
pSprite->yrepeat == cached->yrepeat && clipDist == cached->clipdist)
|
|
{
|
|
return cached->mass;
|
|
}
|
|
|
|
int picnum = pSprite->picnum;
|
|
int massDiv = 30;
|
|
int addMul = 2;
|
|
int subMul = 2;
|
|
|
|
if (seqId >= 0)
|
|
{
|
|
auto pSeq = getSequence(seqId);
|
|
if (pSeq)
|
|
{
|
|
picnum = seqGetTile(&pSeq->frames[0]);
|
|
}
|
|
else
|
|
picnum = pSprite->picnum;
|
|
}
|
|
|
|
clipDist = ClipLow(pSprite->clipdist, 1);
|
|
int x = tileWidth(picnum);
|
|
int y = tileHeight(picnum);
|
|
int xrepeat = pSprite->xrepeat;
|
|
int yrepeat = pSprite->yrepeat;
|
|
|
|
// take surface type into account
|
|
switch (tileGetSurfType(pSprite->picnum))
|
|
{
|
|
case 1: massDiv = 16; break; // stone
|
|
case 2: massDiv = 18; break; // metal
|
|
case 3: massDiv = 21; break; // wood
|
|
case 4: massDiv = 25; break; // flesh
|
|
case 5: massDiv = 28; break; // water
|
|
case 6: massDiv = 26; break; // dirt
|
|
case 7: massDiv = 27; break; // clay
|
|
case 8: massDiv = 35; break; // snow
|
|
case 9: massDiv = 22; break; // ice
|
|
case 10: massDiv = 37; break; // leaves
|
|
case 11: massDiv = 33; break; // cloth
|
|
case 12: massDiv = 36; break; // plant
|
|
case 13: massDiv = 24; break; // goo
|
|
case 14: massDiv = 23; break; // lava
|
|
}
|
|
|
|
mass = ((x + y) * (clipDist / 2)) / massDiv;
|
|
|
|
if (xrepeat > 64) mass += ((xrepeat - 64) * addMul);
|
|
else if (xrepeat < 64 && mass > 0)
|
|
{
|
|
for (int i = 64 - xrepeat; i > 0; i--)
|
|
{
|
|
if ((mass -= subMul) <= 100 && subMul-- <= 1)
|
|
{
|
|
mass -= i;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (yrepeat > 64) mass += ((yrepeat - 64) * addMul);
|
|
else if (yrepeat < 64 && mass > 0)
|
|
{
|
|
for (int i = 64 - yrepeat; i > 0; i--)
|
|
{
|
|
if ((mass -= subMul) <= 100 && subMul-- <= 1)
|
|
{
|
|
mass -= i;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (mass <= 0) cached->mass = 1 + Random(10);
|
|
else cached->mass = ClipRange(mass, 1, 65535);
|
|
|
|
cached->airVel = ClipRange(400 - cached->mass, 32, 400);
|
|
cached->fraction = ClipRange(60000 - (cached->mass << 7), 8192, 60000);
|
|
|
|
cached->xrepeat = pSprite->xrepeat;
|
|
cached->yrepeat = pSprite->yrepeat;
|
|
cached->picnum = pSprite->picnum;
|
|
cached->seqId = seqId;
|
|
cached->clipdist = pSprite->clipdist;
|
|
|
|
return cached->mass;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
static int debrisGetIndex(DBloodActor* actor)
|
|
{
|
|
if (!actor->hasX() || actor->x().physAttr == 0)
|
|
return -1;
|
|
|
|
for (int i = 0; i < gPhysSpritesCount; i++)
|
|
{
|
|
if (gPhysSpritesList[i] != actor) continue;
|
|
return i;
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
int debrisGetFreeIndex(void)
|
|
{
|
|
for (int i = 0; i < kMaxSuperXSprites; i++)
|
|
{
|
|
if (gPhysSpritesList[i] == nullptr) return i;
|
|
auto spr = &gPhysSpritesList[i]->s();
|
|
if (spr->statnum == kStatFree) return i;
|
|
|
|
else if ((spr->flags & kHitagFree) || !gPhysSpritesList[i]->hasX()) return i;
|
|
else if (gPhysSpritesList[i]->x().physAttr == 0) return i;
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void debrisConcuss(DBloodActor* owner, int listIndex, int x, int y, int z, int dmg)
|
|
{
|
|
auto actor = gPhysSpritesList[listIndex];
|
|
if (actor != nullptr && actor->hasX())
|
|
{
|
|
spritetype* pSprite = &actor->s();
|
|
int dx = pSprite->x - x; int dy = pSprite->y - y; int dz = (pSprite->z - z) >> 4;
|
|
dmg = scale(0x40000, dmg, 0x40000 + dx * dx + dy * dy + dz * dz);
|
|
bool thing = (pSprite->type >= kThingBase && pSprite->type < kThingMax);
|
|
int size = (tileWidth(pSprite->picnum) * pSprite->xrepeat * tileHeight(pSprite->picnum) * pSprite->yrepeat) >> 1;
|
|
if (xsprite[pSprite->extra].physAttr & kPhysDebrisExplode)
|
|
{
|
|
if (actor->spriteMass.mass > 0)
|
|
{
|
|
int t = scale(dmg, size, actor->spriteMass.mass);
|
|
|
|
actor->xvel() += MulScale(t, dx, 16);
|
|
actor->yvel() += MulScale(t, dy, 16);
|
|
actor->zvel() += MulScale(t, dz, 16);
|
|
}
|
|
|
|
if (thing)
|
|
pSprite->statnum = kStatThing; // temporary change statnum property
|
|
}
|
|
|
|
actDamageSprite(owner, actor, kDamageExplode, dmg);
|
|
|
|
if (thing)
|
|
pSprite->statnum = kStatDecoration; // return statnum property back
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void debrisBubble(DBloodActor* actor)
|
|
{
|
|
spritetype* pSprite = &actor->s();
|
|
|
|
int top, bottom;
|
|
GetSpriteExtents(pSprite, &top, &bottom);
|
|
for (unsigned int i = 0; i < 1 + Random(5); i++) {
|
|
|
|
int nDist = (pSprite->xrepeat * (tileWidth(pSprite->picnum) >> 1)) >> 2;
|
|
int nAngle = Random(2048);
|
|
int x = pSprite->x + MulScale(nDist, Cos(nAngle), 30);
|
|
int y = pSprite->y + MulScale(nDist, Sin(nAngle), 30);
|
|
int z = bottom - Random(bottom - top);
|
|
auto pFX = gFX.fxSpawnActor((FX_ID)(FX_23 + Random(3)), pSprite->sectnum, x, y, z, 0);
|
|
if (pFX) {
|
|
pFX->xvel() = actor->xvel() + Random2(0x1aaaa);
|
|
pFX->yvel() = actor->yvel() + Random2(0x1aaaa);
|
|
pFX->zvel() = actor->zvel() + Random2(0x1aaaa);
|
|
}
|
|
|
|
}
|
|
|
|
if (Chance(0x2000))
|
|
evPostActor(actor, 0, kCallbackEnemeyBubble);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void debrisMove(int listIndex)
|
|
{
|
|
auto actor = gPhysSpritesList[listIndex];
|
|
XSPRITE* pXSprite = &actor->x();
|
|
spritetype* pSprite = &actor->s();
|
|
int nSector = pSprite->sectnum;
|
|
|
|
if (!actor->hasX())
|
|
{
|
|
gPhysSpritesList[listIndex] = nullptr;
|
|
return;
|
|
}
|
|
else if (pSprite->sectnum < 0 || pSprite->sectnum >= kMaxSectors)
|
|
{
|
|
gPhysSpritesList[listIndex] = nullptr;
|
|
return;
|
|
}
|
|
|
|
|
|
int top, bottom, i;
|
|
GetActorExtents(actor, &top, &bottom);
|
|
|
|
Collision moveHit;
|
|
moveHit.setNone();
|
|
int floorDist = (bottom - pSprite->z) >> 2;
|
|
int ceilDist = (pSprite->z - top) >> 2;
|
|
int clipDist = pSprite->clipdist << 2;
|
|
int mass = actor->spriteMass.mass;
|
|
|
|
bool uwater = false;
|
|
int tmpFraction = actor->spriteMass.fraction;
|
|
if (sector[nSector].extra >= 0 && xsector[sector[nSector].extra].Underwater)
|
|
{
|
|
tmpFraction >>= 1;
|
|
uwater = true;
|
|
}
|
|
|
|
if (actor->xvel() || actor->yvel())
|
|
{
|
|
|
|
short oldcstat = pSprite->cstat;
|
|
pSprite->cstat &= ~(CSTAT_SPRITE_BLOCK | CSTAT_SPRITE_BLOCK_HITSCAN);
|
|
|
|
moveHit = actor->hit().hit = ClipMove(&pSprite->pos, &nSector, actor->xvel() >> 12,
|
|
actor->yvel() >> 12, clipDist, ceilDist, floorDist, CLIPMASK0);
|
|
|
|
pSprite->cstat = oldcstat;
|
|
if (pSprite->sectnum != nSector)
|
|
{
|
|
if (!sectRangeIsFine(nSector)) return;
|
|
else ChangeActorSect(actor, nSector);
|
|
}
|
|
|
|
if (sector[nSector].type >= kSectorPath && sector[nSector].type <= kSectorRotate)
|
|
{
|
|
int nSector2 = nSector;
|
|
if (pushmove(&pSprite->pos, &nSector2, clipDist, ceilDist, floorDist, CLIPMASK0) != -1)
|
|
nSector = nSector2;
|
|
}
|
|
|
|
if (actor->hit().hit.type == kHitWall)
|
|
{
|
|
moveHit = actor->hit().hit;
|
|
i = moveHit.index;
|
|
actWallBounceVector(&actor->xvel(), &actor->yvel(), i, tmpFraction);
|
|
}
|
|
|
|
}
|
|
else if (!FindSector(pSprite->x, pSprite->y, pSprite->z, &nSector))
|
|
{
|
|
return;
|
|
}
|
|
|
|
if (pSprite->sectnum != nSector)
|
|
{
|
|
assert(nSector >= 0 && nSector < kMaxSectors);
|
|
ChangeActorSect(actor, nSector);
|
|
nSector = pSprite->sectnum;
|
|
}
|
|
|
|
if (sector[nSector].extra > 0)
|
|
uwater = xsector[sector[nSector].extra].Underwater;
|
|
|
|
if (actor->zvel())
|
|
pSprite->z += actor->zvel() >> 8;
|
|
|
|
int ceilZ, floorZ;
|
|
Collision ceilColl, floorColl;
|
|
GetZRange(pSprite, &ceilZ, &ceilColl, &floorZ, &floorColl, clipDist, CLIPMASK0, PARALLAXCLIP_CEILING | PARALLAXCLIP_FLOOR);
|
|
GetSpriteExtents(pSprite, &top, &bottom);
|
|
|
|
if ((pXSprite->physAttr & kPhysDebrisSwim) && uwater)
|
|
{
|
|
int vc = 0;
|
|
int cz = getceilzofslope(nSector, pSprite->x, pSprite->y);
|
|
int fz = getflorzofslope(nSector, pSprite->x, pSprite->y);
|
|
int div = ClipLow(bottom - top, 1);
|
|
|
|
if (gLowerLink[nSector] >= 0) cz += (cz < 0) ? 0x500 : -0x500;
|
|
if (top > cz && (!(pXSprite->physAttr & kPhysDebrisFloat) || fz <= bottom << 2))
|
|
actor->zvel() -= DivScale((bottom - ceilZ) >> 6, mass, 8);
|
|
|
|
if (fz < bottom)
|
|
vc = 58254 + ((bottom - fz) * -80099) / div;
|
|
|
|
if (vc)
|
|
{
|
|
pSprite->z += ((vc << 2) >> 1) >> 8;
|
|
actor->zvel() += vc;
|
|
}
|
|
|
|
}
|
|
else if ((pXSprite->physAttr & kPhysGravity) && bottom < floorZ)
|
|
{
|
|
pSprite->z += 455;
|
|
actor->zvel() += 58254;
|
|
|
|
}
|
|
|
|
if ((i = CheckLink(actor)) != 0)
|
|
{
|
|
GetZRange(pSprite, &ceilZ, &ceilColl, &floorZ, &floorColl, clipDist, CLIPMASK0, PARALLAXCLIP_CEILING | PARALLAXCLIP_FLOOR);
|
|
if (!(pSprite->cstat & CSTAT_SPRITE_INVISIBLE))
|
|
{
|
|
switch (i)
|
|
{
|
|
case kMarkerUpWater:
|
|
case kMarkerUpGoo:
|
|
int pitch = (150000 - (actor->spriteMass.mass << 9)) + Random3(8192);
|
|
sfxPlay3DSoundCP(pSprite, 720, -1, 0, pitch, 75 - Random(40));
|
|
if (!spriteIsUnderwater(actor))
|
|
{
|
|
evKillActor(actor, kCallbackEnemeyBubble);
|
|
}
|
|
else
|
|
{
|
|
evPostActor(actor, 0, kCallbackEnemeyBubble);
|
|
for (int i = 2; i <= 5; i++)
|
|
{
|
|
if (Chance(0x5000 * i))
|
|
evPostActor(actor, Random(5), kCallbackEnemeyBubble);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
GetActorExtents(actor, &top, &bottom);
|
|
|
|
if (floorZ <= bottom) {
|
|
|
|
actor->hit().florhit = floorColl;
|
|
int v30 = actor->zvel() - velFloor[pSprite->sectnum];
|
|
|
|
if (v30 > 0)
|
|
{
|
|
pXSprite->physAttr |= kPhysFalling;
|
|
actFloorBounceVector(&actor->xvel(), &actor->yvel(), &v30, pSprite->sectnum, tmpFraction);
|
|
actor->zvel() = v30;
|
|
|
|
if (abs(actor->zvel()) < 0x10000)
|
|
{
|
|
actor->zvel() = velFloor[pSprite->sectnum];
|
|
pXSprite->physAttr &= ~kPhysFalling;
|
|
}
|
|
|
|
moveHit = floorColl;
|
|
DBloodActor* pFX = NULL, *pFX2 = NULL;
|
|
switch (tileGetSurfType(floorColl))
|
|
{
|
|
case kSurfLava:
|
|
if ((pFX = gFX.fxSpawnActor(FX_10, pSprite->sectnum, pSprite->x, pSprite->y, floorZ, 0)) == NULL) break;
|
|
for (i = 0; i < 7; i++)
|
|
{
|
|
if ((pFX2 = gFX.fxSpawnActor(FX_14, pFX->s().sectnum, pFX->s().x, pFX->s().y, pFX->s().z, 0)) == NULL) continue;
|
|
pFX2->xvel() = Random2(0x6aaaa);
|
|
pFX2->yvel() = Random2(0x6aaaa);
|
|
pFX2->zvel() = -(int)Random(0xd5555);
|
|
}
|
|
break;
|
|
case kSurfWater:
|
|
gFX.fxSpawnActor(FX_9, pSprite->sectnum, pSprite->x, pSprite->y, floorZ, 0);
|
|
break;
|
|
}
|
|
|
|
}
|
|
else if (actor->zvel() == 0)
|
|
{
|
|
pXSprite->physAttr &= ~kPhysFalling;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
actor->hit().florhit.setNone();
|
|
if (pXSprite->physAttr & kPhysGravity)
|
|
pXSprite->physAttr |= kPhysFalling;
|
|
}
|
|
|
|
if (top <= ceilZ)
|
|
{
|
|
actor->hit().ceilhit = moveHit = ceilColl;
|
|
pSprite->z += ClipLow(ceilZ - top, 0);
|
|
if (actor->zvel() <= 0 && (pXSprite->physAttr & kPhysFalling))
|
|
actor->zvel() = MulScale(-actor->zvel(), 0x2000, 16);
|
|
|
|
}
|
|
else
|
|
{
|
|
actor->hit().ceilhit.setNone();
|
|
GetActorExtents(actor, &top, &bottom);
|
|
}
|
|
|
|
if (moveHit.type != kHitNone && pXSprite->Impact && !pXSprite->locked && !pXSprite->isTriggered && (pXSprite->state == pXSprite->restState || pXSprite->Interrutable)) {
|
|
if (pSprite->type >= kThingBase && pSprite->type < kThingMax)
|
|
ChangeActorStat(actor, kStatThing);
|
|
|
|
trTriggerSprite(actor, kCmdToggle);
|
|
}
|
|
|
|
if (!actor->xvel() && !actor->yvel()) return;
|
|
else if (floorColl.type == kHitSprite)
|
|
{
|
|
|
|
if ((floorColl.actor->s().cstat & 0x30) == 0)
|
|
{
|
|
actor->xvel() += MulScale(4, pSprite->x - floorColl.actor->s().x, 2);
|
|
actor->yvel() += MulScale(4, pSprite->y - floorColl.actor->s().y, 2);
|
|
return;
|
|
}
|
|
}
|
|
|
|
pXSprite->height = ClipLow(floorZ - bottom, 0) >> 8;
|
|
if (uwater || pXSprite->height >= 0x100)
|
|
return;
|
|
|
|
int nDrag = 0x2a00;
|
|
if (pXSprite->height > 0)
|
|
nDrag -= scale(nDrag, pXSprite->height, 0x100);
|
|
|
|
actor->xvel() -= mulscale16r(actor->xvel(), nDrag);
|
|
actor->yvel() -= mulscale16r(actor->yvel(), nDrag);
|
|
if (approxDist(actor->xvel(), actor->yvel()) < 0x1000)
|
|
actor->xvel() = actor->yvel() = 0;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool ceilIsTooLow(DBloodActor* actor)
|
|
{
|
|
if (actor != nullptr)
|
|
{
|
|
sectortype* pSector = §or[actor->s().sectnum];
|
|
int a = pSector->ceilingz - pSector->floorz;
|
|
int top, bottom;
|
|
GetActorExtents(actor, &top, &bottom);
|
|
int b = top - bottom;
|
|
if (a > b) return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiSetGenIdleState(DBloodActor* actor)
|
|
{
|
|
switch (actor->s().type)
|
|
{
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
aiGenDudeNewState(actor, &genIdle);
|
|
break;
|
|
default:
|
|
aiNewState(actor, &genIdle);
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function stops wind on all TX sectors affected by WindGen after it goes off state.
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void windGenStopWindOnSectors(DBloodActor* sourceactor)
|
|
{
|
|
spritetype* pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
if (pXSource->txID <= 0 && xsectRangeIsFine(sector[pSource->sectnum].extra))
|
|
{
|
|
xsector[sector[pSource->sectnum].extra].windVel = 0;
|
|
return;
|
|
}
|
|
|
|
for (int i = bucketHead[pXSource->txID]; i < bucketHead[pXSource->txID + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SECTOR) continue;
|
|
XSECTOR* pXSector = &xsector[sector[rxBucket[i].rxindex].extra];
|
|
if ((pXSector->state == 1 && !pXSector->windAlways)
|
|
|| ((pSource->flags & kModernTypeFlag1) && !(pSource->flags & kModernTypeFlag2)))
|
|
{
|
|
pXSector->windVel = 0;
|
|
}
|
|
}
|
|
|
|
// check redirected TX buckets
|
|
int rx = -1; XSPRITE* pXRedir = nullptr;
|
|
while ((pXRedir = evrListRedirectors(OBJ_SPRITE, sprite[pXSource->reference].extra, pXRedir, &rx)) != nullptr)
|
|
{
|
|
for (int i = bucketHead[rx]; i < bucketHead[rx + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SECTOR) continue;
|
|
XSECTOR* pXSector = &xsector[sector[rxBucket[i].rxindex].extra];
|
|
if ((pXSector->state == 1 && !pXSector->windAlways) || (pSource->flags & kModernTypeFlag2))
|
|
pXSector->windVel = 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlStartScene(DBloodActor* sourceactor, PLAYER* pPlayer, bool force)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
TRPLAYERCTRL* pCtrl = &gPlayerCtrl[pPlayer->nPlayer];
|
|
|
|
if (pCtrl->qavScene.initiator != nullptr && !force) return;
|
|
|
|
QAV* pQav = playerQavSceneLoad(pXSource->data2);
|
|
if (pQav != nullptr)
|
|
{
|
|
// save current weapon
|
|
pXSource->dropMsg = pPlayer->curWeapon;
|
|
|
|
auto initiator = pCtrl->qavScene.initiator;
|
|
if (initiator != nullptr && initiator != sourceactor && initiator->hasX())
|
|
pXSource->dropMsg = initiator->x().dropMsg;
|
|
|
|
if (initiator == nullptr)
|
|
WeaponLower(pPlayer);
|
|
|
|
pXSource->sysData1 = ClipLow((pQav->duration * pXSource->waitTime) / 4, 0); // how many times animation should be played
|
|
|
|
pCtrl->qavScene.initiator = sourceactor;
|
|
pCtrl->qavScene.qavResrc = pQav;
|
|
pCtrl->qavScene.dummy = -1;
|
|
|
|
//pCtrl->qavScene.qavResrc->Preload();
|
|
|
|
pPlayer->sceneQav = pXSource->data2;
|
|
pPlayer->weaponTimer = pCtrl->qavScene.qavResrc->duration;
|
|
pPlayer->qavCallback = (pXSource->data3 > 0) ? ClipRange(pXSource->data3 - 1, 0, 32) : -1;
|
|
pPlayer->qavLoop = false;
|
|
pPlayer->qavLastTick = I_GetTime(pCtrl->qavScene.qavResrc->ticrate);
|
|
pPlayer->qavTimer = pCtrl->qavScene.qavResrc->duration;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlStopScene(PLAYER* pPlayer)
|
|
{
|
|
TRPLAYERCTRL* pCtrl = &gPlayerCtrl[pPlayer->nPlayer];
|
|
auto initiator = pCtrl->qavScene.initiator;
|
|
XSPRITE* pXSource = nullptr;
|
|
if (initiator->hasX())
|
|
{
|
|
pXSource = &initiator->x();
|
|
pXSource->sysData1 = 0;
|
|
}
|
|
|
|
if (pCtrl->qavScene.initiator != nullptr)
|
|
{
|
|
pCtrl->qavScene.initiator = nullptr;
|
|
pCtrl->qavScene.qavResrc = nullptr;
|
|
pPlayer->sceneQav = -1;
|
|
|
|
// restore weapon
|
|
if (pPlayer->pXSprite->health > 0)
|
|
{
|
|
int oldWeapon = (pXSource && pXSource->dropMsg != 0) ? pXSource->dropMsg : 1;
|
|
pPlayer->newWeapon = pPlayer->curWeapon = oldWeapon;
|
|
WeaponRaise(pPlayer);
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlLink(DBloodActor* sourceactor, PLAYER* pPlayer, bool checkCondition)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
// save player's sprite index to let the tracking condition know it after savegame loading...
|
|
pXSource->sysData1 = pPlayer->nSprite;
|
|
|
|
pPlayer->pXSprite->txID = pXSource->txID;
|
|
pPlayer->pXSprite->command = kCmdToggle;
|
|
pPlayer->pXSprite->triggerOn = pXSource->triggerOn;
|
|
pPlayer->pXSprite->triggerOff = pXSource->triggerOff;
|
|
pPlayer->pXSprite->busyTime = pXSource->busyTime;
|
|
pPlayer->pXSprite->waitTime = pXSource->waitTime;
|
|
pPlayer->pXSprite->restState = pXSource->restState;
|
|
|
|
pPlayer->pXSprite->Push = pXSource->Push;
|
|
pPlayer->pXSprite->Impact = pXSource->Impact;
|
|
pPlayer->pXSprite->Vector = pXSource->Vector;
|
|
pPlayer->pXSprite->Touch = pXSource->Touch;
|
|
pPlayer->pXSprite->Sight = pXSource->Sight;
|
|
pPlayer->pXSprite->Proximity = pXSource->Proximity;
|
|
|
|
pPlayer->pXSprite->Decoupled = pXSource->Decoupled;
|
|
pPlayer->pXSprite->Interrutable = pXSource->Interrutable;
|
|
pPlayer->pXSprite->DudeLockout = pXSource->DudeLockout;
|
|
|
|
pPlayer->pXSprite->data1 = pXSource->data1;
|
|
pPlayer->pXSprite->data2 = pXSource->data2;
|
|
pPlayer->pXSprite->data3 = pXSource->data3;
|
|
pPlayer->pXSprite->data4 = pXSource->data4;
|
|
|
|
pPlayer->pXSprite->key = pXSource->key;
|
|
pPlayer->pXSprite->dropMsg = pXSource->dropMsg;
|
|
|
|
// let's check if there is tracking condition expecting objects with this TX id
|
|
if (checkCondition && pXSource->txID >= kChannelUser)
|
|
{
|
|
for (int i = 0; i < gTrackingCondsCount; i++)
|
|
{
|
|
TRCONDITION* pCond = &gCondition[i];
|
|
if (pCond->actor->x().rxID != pXSource->txID)
|
|
continue;
|
|
|
|
// search for player control sprite and replace it with actual player sprite
|
|
for (unsigned k = 0; k < pCond->length; k++)
|
|
{
|
|
if (pCond->obj[k].type != OBJ_SPRITE || pCond->obj[k].actor != sourceactor) continue;
|
|
pCond->obj[k].actor = pPlayer->actor();
|
|
pCond->obj[k].index_ = 0;
|
|
pCond->obj[k].cmd = (uint8_t)pPlayer->pXSprite->command;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlSetRace(int value, PLAYER* pPlayer)
|
|
{
|
|
playerSetRace(pPlayer, value);
|
|
switch (pPlayer->lifeMode)
|
|
{
|
|
case kModeHuman:
|
|
case kModeBeast:
|
|
playerSizeReset(pPlayer);
|
|
break;
|
|
case kModeHumanShrink:
|
|
playerSizeShrink(pPlayer, 2);
|
|
break;
|
|
case kModeHumanGrown:
|
|
playerSizeGrow(pPlayer, 2);
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlSetMoveSpeed(int value, PLAYER* pPlayer)
|
|
{
|
|
int speed = ClipRange(value, 0, 500);
|
|
for (int i = 0; i < kModeMax; i++)
|
|
{
|
|
for (int a = 0; a < kPostureMax; a++)
|
|
{
|
|
POSTURE* curPosture = &pPlayer->pPosture[i][a]; POSTURE* defPosture = &gPostureDefaults[i][a];
|
|
curPosture->frontAccel = (defPosture->frontAccel * speed) / kPercFull;
|
|
curPosture->sideAccel = (defPosture->sideAccel * speed) / kPercFull;
|
|
curPosture->backAccel = (defPosture->backAccel * speed) / kPercFull;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlSetJumpHeight(int value, PLAYER* pPlayer)
|
|
{
|
|
int jump = ClipRange(value, 0, 500);
|
|
for (int i = 0; i < kModeMax; i++)
|
|
{
|
|
POSTURE* curPosture = &pPlayer->pPosture[i][kPostureStand]; POSTURE* defPosture = &gPostureDefaults[i][kPostureStand];
|
|
curPosture->normalJumpZ = (defPosture->normalJumpZ * jump) / kPercFull;
|
|
curPosture->pwupJumpZ = (defPosture->pwupJumpZ * jump) / kPercFull;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlSetScreenEffect(int value, int timeval, PLAYER* pPlayer)
|
|
{
|
|
int eff = ClipLow(value, 0);
|
|
int time = (eff > 0) ? timeval : 0;
|
|
switch (eff) {
|
|
case 0: // clear all
|
|
case 1: // tilting
|
|
pPlayer->tiltEffect = ClipRange(time, 0, 220);
|
|
if (eff) break;
|
|
[[fallthrough]];
|
|
case 2: // pain
|
|
pPlayer->painEffect = ClipRange(time, 0, 2048);
|
|
if (eff) break;
|
|
[[fallthrough]];
|
|
case 3: // blind
|
|
pPlayer->blindEffect = ClipRange(time, 0, 2048);
|
|
if (eff) break;
|
|
[[fallthrough]];
|
|
case 4: // pickup
|
|
pPlayer->pickupEffect = ClipRange(time, 0, 2048);
|
|
if (eff) break;
|
|
[[fallthrough]];
|
|
case 5: // quakeEffect
|
|
pPlayer->quakeEffect = ClipRange(time, 0, 2048);
|
|
if (eff) break;
|
|
[[fallthrough]];
|
|
case 6: // visibility
|
|
pPlayer->visibility = ClipRange(time, 0, 2048);
|
|
if (eff) break;
|
|
[[fallthrough]];
|
|
case 7: // delirium
|
|
pPlayer->pwUpTime[kPwUpDeliriumShroom] = ClipHigh(time << 1, 432000);
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlSetLookAngle(int value, PLAYER* pPlayer)
|
|
{
|
|
double const upAngle = 289;
|
|
double const downAngle = -347;
|
|
double const lookStepUp = 4.0 * upAngle / 60.0;
|
|
double const lookStepDown = -4.0 * downAngle / 60.0;
|
|
double const look = value << 5;
|
|
double adjustment;
|
|
|
|
if (look > 0)
|
|
{
|
|
adjustment = min(MulScaleF(lookStepUp, look, 8), upAngle);
|
|
}
|
|
else if (look < 0)
|
|
{
|
|
adjustment = -max(MulScaleF(lookStepDown, abs(look), 8), downAngle);
|
|
}
|
|
else
|
|
{
|
|
adjustment = 0;
|
|
}
|
|
|
|
pPlayer->horizon.settarget(100. * tan(adjustment * pi::pi() / 1024.));
|
|
pPlayer->horizon.lockinput();
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlEraseStuff(int value, PLAYER* pPlayer)
|
|
{
|
|
|
|
switch (value)
|
|
{
|
|
case 0: // erase all
|
|
[[fallthrough]];
|
|
case 1: // erase weapons
|
|
WeaponLower(pPlayer);
|
|
|
|
for (int i = 0; i < 14; i++) {
|
|
pPlayer->hasWeapon[i] = false;
|
|
// also erase ammo
|
|
if (i < 12) pPlayer->ammoCount[i] = 0;
|
|
}
|
|
|
|
pPlayer->hasWeapon[1] = true;
|
|
pPlayer->curWeapon = kWeapNone;
|
|
pPlayer->nextWeapon = kWeapPitchFork;
|
|
|
|
WeaponRaise(pPlayer);
|
|
if (value) break;
|
|
[[fallthrough]];
|
|
case 2: // erase all armor
|
|
for (int i = 0; i < 3; i++) pPlayer->armor[i] = 0;
|
|
if (value) break;
|
|
[[fallthrough]];
|
|
case 3: // erase all pack items
|
|
for (int i = 0; i < 5; i++) {
|
|
pPlayer->packSlots[i].isActive = false;
|
|
pPlayer->packSlots[i].curAmount = 0;
|
|
}
|
|
pPlayer->packItemId = -1;
|
|
if (value) break;
|
|
[[fallthrough]];
|
|
case 4: // erase all keys
|
|
for (int i = 0; i < 8; i++) pPlayer->hasKey[i] = false;
|
|
if (value) break;
|
|
[[fallthrough]];
|
|
case 5: // erase powerups
|
|
for (int i = 0; i < kMaxPowerUps; i++) pPlayer->pwUpTime[i] = 0;
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlGiveStuff(int data2, int weapon, int data4, PLAYER* pPlayer, TRPLAYERCTRL* pCtrl)
|
|
{
|
|
switch (data2)
|
|
{
|
|
case 1: // give N weapon and default ammo for it
|
|
case 2: // give just N ammo for selected weapon
|
|
if (weapon <= 0 || weapon > 13)
|
|
{
|
|
Printf(PRINT_HIGH, "Weapon #%d is out of a weapons range!", weapon);
|
|
break;
|
|
} else if (data2 == 2 && data4 == 0)
|
|
{
|
|
Printf(PRINT_HIGH, "Zero ammo for weapon #%d is specified!", weapon);
|
|
break;
|
|
}
|
|
switch (weapon)
|
|
{
|
|
case kWeapProximity: // remote bomb
|
|
case kWeapRemote: // prox bomb
|
|
pPlayer->hasWeapon[weapon] = true;
|
|
weapon--;
|
|
pPlayer->ammoCount[weapon] = ClipHigh(pPlayer->ammoCount[weapon] + ((data2 == 2) ? data4 : 1), gAmmoInfo[weapon].max);
|
|
weapon++;
|
|
break;
|
|
default:
|
|
for (int i = 0; i < 11; i++)
|
|
{
|
|
if (gWeaponItemData[i].type != weapon) continue;
|
|
|
|
const WEAPONITEMDATA* pWeaponData = &gWeaponItemData[i];
|
|
int nAmmoType = pWeaponData->ammoType;
|
|
switch (data2) {
|
|
case 1:
|
|
pPlayer->hasWeapon[weapon] = true;
|
|
if (pPlayer->ammoCount[nAmmoType] >= pWeaponData->count) break;
|
|
pPlayer->ammoCount[nAmmoType] = ClipHigh(pPlayer->ammoCount[nAmmoType] + pWeaponData->count, gAmmoInfo[nAmmoType].max);
|
|
break;
|
|
case 2:
|
|
pPlayer->ammoCount[nAmmoType] = ClipHigh(pPlayer->ammoCount[nAmmoType] + data4, gAmmoInfo[nAmmoType].max);
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
if (pPlayer->hasWeapon[weapon] && data4 == 0) // switch on it
|
|
{
|
|
pPlayer->nextWeapon = kWeapNone;
|
|
|
|
if (pPlayer->sceneQav >= 0 && pCtrl->qavScene.initiator && pCtrl->qavScene.initiator->hasX())
|
|
{
|
|
pCtrl->qavScene.initiator->x().dropMsg = weapon;
|
|
}
|
|
else if (pPlayer->curWeapon != weapon)
|
|
{
|
|
pPlayer->newWeapon = weapon;
|
|
WeaponRaise(pPlayer);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlUsePackItem(int data2, int data3, int data4, PLAYER* pPlayer, int evCmd)
|
|
{
|
|
unsigned int invItem = data2 - 1;
|
|
switch (evCmd)
|
|
{
|
|
case kCmdOn:
|
|
if (!pPlayer->packSlots[invItem].isActive) packUseItem(pPlayer, invItem);
|
|
break;
|
|
case kCmdOff:
|
|
if (pPlayer->packSlots[invItem].isActive) packUseItem(pPlayer, invItem);
|
|
break;
|
|
default:
|
|
packUseItem(pPlayer, invItem);
|
|
break;
|
|
}
|
|
|
|
switch (data4)
|
|
{
|
|
case 2: // both
|
|
case 0: // switch on it
|
|
if (pPlayer->packSlots[invItem].curAmount > 0) pPlayer->packItemId = invItem;
|
|
if (!data4) break;
|
|
[[fallthrough]];
|
|
case 1: // force remove after use
|
|
pPlayer->packSlots[invItem].isActive = false;
|
|
pPlayer->packSlots[invItem].curAmount = 0;
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void trPlayerCtrlUsePowerup(DBloodActor* sourceactor, PLAYER* pPlayer, int evCmd)
|
|
{
|
|
|
|
bool relative = (sourceactor->s().flags & kModernTypeFlag1);
|
|
|
|
int nPower = (kMinAllowedPowerup + sourceactor->x().data2) - 1;
|
|
int nTime = ClipRange(abs(sourceactor->x().data3) * 100, -gPowerUpInfo[nPower].maxTime, gPowerUpInfo[nPower].maxTime);
|
|
if (sourceactor->x().data3 < 0)
|
|
nTime = -nTime;
|
|
|
|
if (pPlayer->pwUpTime[nPower])
|
|
{
|
|
if (!relative && nTime <= 0)
|
|
powerupDeactivate(pPlayer, nPower);
|
|
}
|
|
|
|
if (nTime != 0)
|
|
{
|
|
if (pPlayer->pwUpTime[nPower] <= 0)
|
|
powerupActivate(pPlayer, nPower); // MUST activate first for powerups like kPwUpDeathMask
|
|
|
|
// ...so we able to change time amount
|
|
if (relative) pPlayer->pwUpTime[nPower] += nTime;
|
|
else pPlayer->pwUpTime[nPower] = nTime;
|
|
}
|
|
|
|
if (pPlayer->pwUpTime[nPower] <= 0)
|
|
powerupDeactivate(pPlayer, nPower);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useObjResizer(DBloodActor* sourceactor, int targType, int targIndex, DBloodActor* targetactor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
switch (targType)
|
|
{
|
|
// for sectors
|
|
case OBJ_SECTOR:
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
sector[targIndex].floorxpan_ = (float)ClipRange(pXSource->data1, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
sector[targIndex].floorypan_ = (float)ClipRange(pXSource->data2, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
sector[targIndex].ceilingxpan_ = (float)ClipRange(pXSource->data3, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
sector[targIndex].ceilingypan_ = (float)ClipRange(pXSource->data4, 0, 255);
|
|
break;
|
|
// for sprites
|
|
case OBJ_SPRITE:
|
|
{
|
|
bool fit = false;
|
|
auto pTarget = &targetactor->s();
|
|
// resize by seq scaling
|
|
if (sourceactor->s().flags & kModernTypeFlag1)
|
|
{
|
|
if (valueIsBetween(pXSource->data1, -255, 32767))
|
|
{
|
|
int mulDiv = (valueIsBetween(pXSource->data2, 0, 257)) ? pXSource->data2 : 256;
|
|
if (pXSource->data1 > 0) targetactor->x().scale = mulDiv * ClipHigh(pXSource->data1, 25);
|
|
else if (pXSource->data1 < 0) targetactor->x().scale = mulDiv / ClipHigh(abs(pXSource->data1), 25);
|
|
else targetactor->x().scale = 0;
|
|
fit = true;
|
|
}
|
|
|
|
// resize by repeats
|
|
}
|
|
else
|
|
{
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
{
|
|
pTarget->xrepeat = ClipRange(pXSource->data1, 0, 255);
|
|
fit = true;
|
|
}
|
|
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
{
|
|
pTarget->yrepeat = ClipRange(pXSource->data2, 0, 255);
|
|
fit = true;
|
|
}
|
|
}
|
|
|
|
if (fit && (pTarget->type == kDudeModernCustom || pTarget->type == kDudeModernCustomBurning))
|
|
{
|
|
// request properties update for custom dude
|
|
|
|
targetactor->genDudeExtra.updReq[kGenDudePropertySpriteSize] = true;
|
|
targetactor->genDudeExtra.updReq[kGenDudePropertyAttack] = true;
|
|
targetactor->genDudeExtra.updReq[kGenDudePropertyMass] = true;
|
|
targetactor->genDudeExtra.updReq[kGenDudePropertyDmgScale] = true;
|
|
evPostActor(targetactor, kGenDudeUpdTimeRate, kCallbackGenDudeUpdate);
|
|
|
|
}
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
pTarget->xoffset = ClipRange(pXSource->data3, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
pTarget->yoffset = ClipRange(pXSource->data4, 0, 255);
|
|
break;
|
|
}
|
|
case OBJ_WALL:
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
wall[targIndex].xrepeat = ClipRange(pXSource->data1, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
wall[targIndex].yrepeat = ClipRange(pXSource->data2, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
wall[targIndex].xpan_ = (float)ClipRange(pXSource->data3, 0, 255);
|
|
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
wall[targIndex].ypan_ = (float)ClipRange(pXSource->data4, 0, 255);
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void usePropertiesChanger(DBloodActor* sourceactor, int objType, int objIndex, DBloodActor* targetactor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
spritetype* pSource = &sourceactor->s();
|
|
|
|
switch (objType)
|
|
{
|
|
case OBJ_WALL:
|
|
{
|
|
walltype* pWall = &wall[objIndex]; int old = -1;
|
|
|
|
// data3 = set wall hitag
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
{
|
|
if ((pSource->flags & kModernTypeFlag1)) pWall->hitag = pWall->hitag |= pXSource->data3;
|
|
else pWall->hitag = pXSource->data3;
|
|
}
|
|
|
|
// data4 = set wall cstat
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
{
|
|
old = pWall->cstat;
|
|
|
|
// set new cstat
|
|
if ((pSource->flags & kModernTypeFlag1)) pWall->cstat = pWall->cstat |= pXSource->data4; // relative
|
|
else pWall->cstat = pXSource->data4; // absolute
|
|
|
|
// and hanlde exceptions
|
|
if ((old & 0x2) && !(pWall->cstat & 0x2)) pWall->cstat |= 0x2; // kWallBottomSwap
|
|
if ((old & 0x4) && !(pWall->cstat & 0x4)) pWall->cstat |= 0x4; // kWallBottomOrg, kWallOutsideOrg
|
|
if ((old & 0x20) && !(pWall->cstat & 0x20)) pWall->cstat |= 0x20; // kWallOneWay
|
|
|
|
if (old & 0xc000) {
|
|
|
|
if (!(pWall->cstat & 0xc000))
|
|
pWall->cstat |= 0xc000; // kWallMoveMask
|
|
|
|
if ((old & 0x0) && !(pWall->cstat & 0x0)) pWall->cstat |= 0x0; // kWallMoveNone
|
|
else if ((old & 0x4000) && !(pWall->cstat & 0x4000)) pWall->cstat |= 0x4000; // kWallMoveForward
|
|
else if ((old & 0x8000) && !(pWall->cstat & 0x8000)) pWall->cstat |= 0x8000; // kWallMoveBackward
|
|
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
case OBJ_SPRITE:
|
|
{
|
|
spritetype* pSprite = &targetactor->s();
|
|
XSPRITE* pXSprite = &targetactor->x();
|
|
bool thing2debris = false;
|
|
int old = -1;
|
|
|
|
// data3 = set sprite hitag
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
{
|
|
old = pSprite->flags;
|
|
|
|
// set new hitag
|
|
if ((pSource->flags & kModernTypeFlag1)) pSprite->flags = pSource->flags |= pXSource->data3; // relative
|
|
else pSprite->flags = pXSource->data3; // absolute
|
|
|
|
// and handle exceptions
|
|
if ((old & kHitagFree) && !(pSprite->flags & kHitagFree)) pSprite->flags |= kHitagFree;
|
|
if ((old & kHitagRespawn) && !(pSprite->flags & kHitagRespawn)) pSprite->flags |= kHitagRespawn;
|
|
|
|
// prepare things for different (debris) physics.
|
|
if (pSprite->statnum == kStatThing && debrisGetFreeIndex() >= 0) thing2debris = true;
|
|
|
|
}
|
|
|
|
// data2 = sprite physics settings
|
|
if (valueIsBetween(pXSource->data2, -1, 32767) || thing2debris)
|
|
{
|
|
switch (pSprite->statnum)
|
|
{
|
|
case kStatDude: // dudes already treating in game
|
|
case kStatFree:
|
|
case kStatMarker:
|
|
case kStatPathMarker:
|
|
break;
|
|
default:
|
|
// store physics attributes in xsprite to avoid setting hitag for modern types!
|
|
int flags = (pXSprite->physAttr != 0) ? pXSprite->physAttr : 0;
|
|
int oldFlags = flags;
|
|
|
|
if (thing2debris)
|
|
{
|
|
// converting thing to debris
|
|
if ((pSprite->flags & kPhysMove) != 0) flags |= kPhysMove;
|
|
else flags &= ~kPhysMove;
|
|
|
|
if ((pSprite->flags & kPhysGravity) != 0) flags |= (kPhysGravity | kPhysFalling);
|
|
else flags &= ~(kPhysGravity | kPhysFalling);
|
|
|
|
pSprite->flags &= ~(kPhysMove | kPhysGravity | kPhysFalling);
|
|
xvel[objIndex] = yvel[objIndex] = zvel[objIndex] = 0;
|
|
pXSprite->restState = pXSprite->state;
|
|
|
|
}
|
|
else
|
|
{
|
|
// WTF is this?!?
|
|
char digits[6] = {};
|
|
snprintf(digits, 6, "%d", pXSource->data2);
|
|
for (unsigned int i = 0; i < sizeof(digits); i++)
|
|
digits[i] = (digits[i] >= 48 && digits[i] <= 57) ? (digits[i] - 57) + 9 : 0;
|
|
|
|
// first digit of data2: set main physics attributes
|
|
switch (digits[0])
|
|
{
|
|
case 0:
|
|
flags &= ~kPhysMove;
|
|
flags &= ~(kPhysGravity | kPhysFalling);
|
|
break;
|
|
case 1:
|
|
flags |= kPhysMove;
|
|
flags &= ~(kPhysGravity | kPhysFalling);
|
|
break;
|
|
case 2:
|
|
flags &= ~kPhysMove;
|
|
flags |= (kPhysGravity | kPhysFalling);
|
|
break;
|
|
case 3:
|
|
flags |= kPhysMove;
|
|
flags |= (kPhysGravity | kPhysFalling);
|
|
break;
|
|
}
|
|
|
|
// second digit of data2: touch physics flags
|
|
switch (digits[1])
|
|
{
|
|
case 0:
|
|
flags &= ~kPhysDebrisTouch;
|
|
break;
|
|
case 1:
|
|
flags |= kPhysDebrisTouch;
|
|
break;
|
|
}
|
|
|
|
// third digit of data2: weapon physics flags
|
|
switch (digits[2])
|
|
{
|
|
case 0:
|
|
flags &= ~kPhysDebrisVector;
|
|
flags &= ~kPhysDebrisExplode;
|
|
break;
|
|
case 1:
|
|
flags |= kPhysDebrisVector;
|
|
flags &= ~kPhysDebrisExplode;
|
|
break;
|
|
case 2:
|
|
flags &= ~kPhysDebrisVector;
|
|
flags |= kPhysDebrisExplode;
|
|
break;
|
|
case 3:
|
|
flags |= kPhysDebrisVector;
|
|
flags |= kPhysDebrisExplode;
|
|
break;
|
|
}
|
|
|
|
// fourth digit of data2: swimming / flying physics flags
|
|
switch (digits[3])
|
|
{
|
|
case 0:
|
|
flags &= ~kPhysDebrisSwim;
|
|
flags &= ~kPhysDebrisFly;
|
|
flags &= ~kPhysDebrisFloat;
|
|
break;
|
|
case 1:
|
|
flags |= kPhysDebrisSwim;
|
|
flags &= ~kPhysDebrisFly;
|
|
flags &= ~kPhysDebrisFloat;
|
|
break;
|
|
case 2:
|
|
flags |= kPhysDebrisSwim;
|
|
flags |= kPhysDebrisFloat;
|
|
flags &= ~kPhysDebrisFly;
|
|
break;
|
|
case 3:
|
|
flags |= kPhysDebrisFly;
|
|
flags &= ~kPhysDebrisSwim;
|
|
flags &= ~kPhysDebrisFloat;
|
|
break;
|
|
case 4:
|
|
flags |= kPhysDebrisFly;
|
|
flags |= kPhysDebrisFloat;
|
|
flags &= ~kPhysDebrisSwim;
|
|
break;
|
|
case 5:
|
|
flags |= kPhysDebrisSwim;
|
|
flags |= kPhysDebrisFly;
|
|
flags &= ~kPhysDebrisFloat;
|
|
break;
|
|
case 6:
|
|
flags |= kPhysDebrisSwim;
|
|
flags |= kPhysDebrisFly;
|
|
flags |= kPhysDebrisFloat;
|
|
break;
|
|
}
|
|
}
|
|
|
|
int nIndex = debrisGetIndex(targetactor); // check if there is no sprite in list
|
|
|
|
// adding physics sprite in list
|
|
if ((flags & kPhysGravity) != 0 || (flags & kPhysMove) != 0)
|
|
{
|
|
|
|
if (oldFlags == 0)
|
|
targetactor->xvel() = targetactor->yvel() = targetactor->zvel() = 0;
|
|
|
|
if (nIndex != -1)
|
|
{
|
|
pXSprite->physAttr = flags; // just update physics attributes
|
|
}
|
|
else if ((nIndex = debrisGetFreeIndex()) < 0)
|
|
{
|
|
viewSetSystemMessage("Max (%d) Physics affected sprites reached!", kMaxSuperXSprites);
|
|
}
|
|
else
|
|
{
|
|
pXSprite->physAttr = flags; // update physics attributes
|
|
|
|
// allow things to became debris, so they use different physics...
|
|
if (pSprite->statnum == kStatThing) ChangeActorStat(targetactor, 0);
|
|
|
|
// set random goal ang for swimming so they start turning
|
|
if ((flags & kPhysDebrisSwim) && !targetactor->xvel() && !targetactor->yvel() && !targetactor->zvel())
|
|
pXSprite->goalAng = (pSprite->ang + Random3(kAng45)) & 2047;
|
|
|
|
if (pXSprite->physAttr & kPhysDebrisVector)
|
|
pSprite->cstat |= CSTAT_SPRITE_BLOCK_HITSCAN;
|
|
|
|
gPhysSpritesList[nIndex] = targetactor;
|
|
if (nIndex >= gPhysSpritesCount) gPhysSpritesCount++;
|
|
getSpriteMassBySize(targetactor); // create physics cache
|
|
|
|
}
|
|
|
|
// removing physics from sprite in list (don't remove sprite from list)
|
|
}
|
|
else if (nIndex != -1)
|
|
{
|
|
|
|
pXSprite->physAttr = flags;
|
|
targetactor->xvel() = targetactor->yvel() = targetactor->zvel() = 0;
|
|
if (pSprite->lotag >= kThingBase && pSprite->lotag < kThingMax)
|
|
ChangeActorStat(targetactor, kStatThing); // if it was a thing - restore statnum
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
// data4 = sprite cstat
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
{
|
|
old = pSprite->cstat;
|
|
|
|
// set new cstat
|
|
if ((pSource->flags & kModernTypeFlag1)) pSprite->cstat |= pXSource->data4; // relative
|
|
else pSprite->cstat = pXSource->data4 & 0xffff; // absolute
|
|
|
|
// and handle exceptions
|
|
if ((old & 0x1000) && !(pSprite->cstat & 0x1000)) pSprite->cstat |= 0x1000; //kSpritePushable
|
|
if ((old & 0x80) && !(pSprite->cstat & 0x80)) pSprite->cstat |= 0x80; // kSpriteOriginAlign
|
|
|
|
if (old & 0x6000)
|
|
{
|
|
if (!(pSprite->cstat & 0x6000))
|
|
pSprite->cstat |= 0x6000; // kSpriteMoveMask
|
|
|
|
if ((old & 0x0) && !(pSprite->cstat & 0x0)) pSprite->cstat |= 0x0; // kSpriteMoveNone
|
|
else if ((old & 0x2000) && !(pSprite->cstat & 0x2000)) pSprite->cstat |= 0x2000; // kSpriteMoveForward, kSpriteMoveFloor
|
|
else if ((old & 0x4000) && !(pSprite->cstat & 0x4000)) pSprite->cstat |= 0x4000; // kSpriteMoveReverse, kSpriteMoveCeiling
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
case OBJ_SECTOR:
|
|
{
|
|
sectortype* pSector = §or[objIndex];
|
|
XSECTOR* pXSector = &xsector[sector[objIndex].extra];
|
|
|
|
// data1 = sector underwater status and depth level
|
|
if (pXSource->data1 >= 0 && pXSource->data1 < 2) {
|
|
|
|
pXSector->Underwater = (pXSource->data1) ? true : false;
|
|
|
|
spritetype* pLower = (gLowerLink[objIndex] >= 0) ? &sprite[gLowerLink[objIndex]] : NULL;
|
|
XSPRITE* pXLower = NULL; spritetype* pUpper = NULL; XSPRITE* pXUpper = NULL;
|
|
|
|
if (pLower) {
|
|
|
|
pXLower = &xsprite[pLower->extra];
|
|
|
|
// must be sure we found exact same upper link
|
|
for (int i = 0; i < kMaxSectors; i++) {
|
|
if (gUpperLink[i] < 0 || xsprite[sprite[gUpperLink[i]].extra].data1 != pXLower->data1) continue;
|
|
pUpper = &sprite[gUpperLink[i]]; pXUpper = &xsprite[pUpper->extra];
|
|
break;
|
|
}
|
|
}
|
|
|
|
// treat sectors that have links, so warp can detect underwater status properly
|
|
if (pLower) {
|
|
if (pXSector->Underwater) {
|
|
switch (pLower->type) {
|
|
case kMarkerLowStack:
|
|
case kMarkerLowLink:
|
|
pXLower->sysData1 = pLower->type;
|
|
pLower->type = kMarkerLowWater;
|
|
break;
|
|
default:
|
|
if (pSector->ceilingpicnum < 4080 || pSector->ceilingpicnum > 4095) pXLower->sysData1 = kMarkerLowLink;
|
|
else pXLower->sysData1 = kMarkerLowStack;
|
|
break;
|
|
}
|
|
}
|
|
else if (pXLower->sysData1 > 0) pLower->type = pXLower->sysData1;
|
|
else if (pSector->ceilingpicnum < 4080 || pSector->ceilingpicnum > 4095) pLower->type = kMarkerLowLink;
|
|
else pLower->type = kMarkerLowStack;
|
|
}
|
|
|
|
if (pUpper) {
|
|
if (pXSector->Underwater) {
|
|
switch (pUpper->type) {
|
|
case kMarkerUpStack:
|
|
case kMarkerUpLink:
|
|
pXUpper->sysData1 = pUpper->type;
|
|
pUpper->type = kMarkerUpWater;
|
|
break;
|
|
default:
|
|
if (pSector->floorpicnum < 4080 || pSector->floorpicnum > 4095) pXUpper->sysData1 = kMarkerUpLink;
|
|
else pXUpper->sysData1 = kMarkerUpStack;
|
|
break;
|
|
}
|
|
}
|
|
else if (pXUpper->sysData1 > 0) pUpper->type = pXUpper->sysData1;
|
|
else if (pSector->floorpicnum < 4080 || pSector->floorpicnum > 4095) pUpper->type = kMarkerUpLink;
|
|
else pUpper->type = kMarkerUpStack;
|
|
}
|
|
|
|
// search for dudes in this sector and change their underwater status
|
|
BloodSectIterator it(objIndex);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
spritetype* pSpr = &iactor->s();
|
|
if (pSpr->statnum != kStatDude || !iactor->IsDudeActor() || ! iactor->hasX())
|
|
continue;
|
|
|
|
PLAYER* pPlayer = getPlayerById(pSpr->type);
|
|
if (pXSector->Underwater) {
|
|
if (pLower)
|
|
xsprite[pSpr->extra].medium = (pLower->type == kMarkerUpGoo) ? kMediumGoo : kMediumWater;
|
|
|
|
if (pPlayer) {
|
|
int waterPal = kMediumWater;
|
|
if (pLower) {
|
|
if (pXLower->data2 > 0) waterPal = pXLower->data2;
|
|
else if (pLower->type == kMarkerUpGoo) waterPal = kMediumGoo;
|
|
}
|
|
|
|
pPlayer->nWaterPal = waterPal;
|
|
pPlayer->posture = kPostureSwim;
|
|
pPlayer->pXSprite->burnTime = 0;
|
|
}
|
|
|
|
} else {
|
|
|
|
xsprite[pSpr->extra].medium = kMediumNormal;
|
|
if (pPlayer) {
|
|
pPlayer->posture = (!(pPlayer->input.actions & SB_CROUCH)) ? kPostureStand : kPostureCrouch;
|
|
pPlayer->nWaterPal = 0;
|
|
}
|
|
|
|
}
|
|
}
|
|
}
|
|
else if (pXSource->data1 > 9) pXSector->Depth = 7;
|
|
else if (pXSource->data1 > 1) pXSector->Depth = pXSource->data1 - 2;
|
|
|
|
|
|
// data2 = sector visibility
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
sector[objIndex].visibility = ClipRange(pXSource->data2, 0 , 234);
|
|
|
|
// data3 = sector ceil cstat
|
|
if (valueIsBetween(pXSource->data3, -1, 32767)) {
|
|
if ((pSource->flags & kModernTypeFlag1)) sector[objIndex].ceilingstat |= pXSource->data3;
|
|
else sector[objIndex].ceilingstat = pXSource->data3;
|
|
}
|
|
|
|
// data4 = sector floor cstat
|
|
if (valueIsBetween(pXSource->data4, -1, 65535)) {
|
|
if ((pSource->flags & kModernTypeFlag1)) sector[objIndex].floorstat |= pXSource->data4;
|
|
else sector[objIndex].floorstat = pXSource->data4;
|
|
}
|
|
}
|
|
break;
|
|
// no TX id
|
|
case -1:
|
|
// data2 = global visibility
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
gVisibility = ClipRange(pXSource->data2, 0, 4096);
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useTeleportTarget(DBloodActor* sourceactor, DBloodActor* actor)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
auto pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
PLAYER* pPlayer = getPlayerById(pSprite->type);
|
|
XSECTOR* pXSector = (sector[pSource->sectnum].extra >= 0) ? &xsector[sector[pSource->sectnum].extra] : NULL;
|
|
bool isDude = (!pPlayer && actor->IsDudeActor());
|
|
|
|
if (pSprite->sectnum != pSource->sectnum)
|
|
ChangeActorSect(actor, pSource->sectnum);
|
|
|
|
pSprite->x = pSource->x; pSprite->y = pSource->y;
|
|
int zTop, zBot;
|
|
GetActorExtents(sourceactor, &zTop, &zBot);
|
|
pSprite->z = zBot;
|
|
|
|
clampSprite(pSprite, 0x01);
|
|
|
|
if (pSource->flags & kModernTypeFlag1) // force telefrag
|
|
TeleFrag(pSprite->index, pSource->sectnum);
|
|
|
|
if (pSprite->flags & kPhysGravity)
|
|
pSprite->flags |= kPhysFalling;
|
|
|
|
if (pXSector)
|
|
{
|
|
|
|
if (pXSector->Enter && (pPlayer || (isDude && !pXSector->dudeLockout)))
|
|
trTriggerSector(pSource->sectnum, pXSector, kCmdSectorEnter);
|
|
|
|
if (pXSector->Underwater)
|
|
{
|
|
spritetype* pLink = (gLowerLink[pSource->sectnum] >= 0) ? &sprite[gLowerLink[pSource->sectnum]] : NULL;
|
|
if (pLink)
|
|
{
|
|
// must be sure we found exact same upper link
|
|
for (int i = 0; i < kMaxSectors; i++) {
|
|
if (gUpperLink[i] < 0 || xsprite[sprite[gUpperLink[i]].extra].data1 != xsprite[pLink->extra].data1) continue;
|
|
pLink = &sprite[gUpperLink[i]];
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (pLink)
|
|
xsprite[pSprite->extra].medium = (pLink->type == kMarkerUpGoo) ? kMediumGoo : kMediumWater;
|
|
|
|
if (pPlayer)
|
|
{
|
|
int waterPal = kMediumWater;
|
|
if (pLink)
|
|
{
|
|
if (xsprite[pLink->extra].data2 > 0) waterPal = xsprite[pLink->extra].data2;
|
|
else if (pLink->type == kMarkerUpGoo) waterPal = kMediumGoo;
|
|
}
|
|
|
|
pPlayer->nWaterPal = waterPal;
|
|
pPlayer->posture = kPostureSwim;
|
|
pPlayer->pXSprite->burnTime = 0;
|
|
}
|
|
|
|
}
|
|
else
|
|
{
|
|
actor->x().medium = kMediumNormal;
|
|
if (pPlayer)
|
|
{
|
|
pPlayer->posture = (!(pPlayer->input.actions & SB_CROUCH)) ? kPostureStand : kPostureCrouch;
|
|
pPlayer->nWaterPal = 0;
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
if (pSprite->statnum == kStatDude && actor->IsDudeActor() && !actor->IsPlayerActor())
|
|
{
|
|
XSPRITE* pXDude = &actor->x();
|
|
int x = pXDude->targetX;
|
|
int y = pXDude->targetY;
|
|
int z = pXDude->targetZ;
|
|
auto target = actor->GetTarget();
|
|
|
|
aiInitSprite(actor);
|
|
|
|
if (target != nullptr)
|
|
{
|
|
pXDude->targetX = x;
|
|
pXDude->targetY = y;
|
|
pXDude->targetZ = z;
|
|
actor->SetTarget(target);
|
|
aiActivateDude(actor);
|
|
}
|
|
}
|
|
|
|
if (pXSource->data2 == 1)
|
|
{
|
|
if (pPlayer)
|
|
{
|
|
pPlayer->angle.settarget(pSource->ang);
|
|
pPlayer->angle.lockinput();
|
|
}
|
|
else if (isDude) pXSource->goalAng = pSprite->ang = pSource->ang;
|
|
else pSprite->ang = pSource->ang;
|
|
}
|
|
|
|
if (pXSource->data3 == 1)
|
|
actor->xvel() = actor->yvel() = actor->zvel() = 0;
|
|
|
|
viewBackupSpriteLoc(pSprite->index, pSprite);
|
|
|
|
if (pXSource->data4 > 0)
|
|
sfxPlay3DSound(pSource, pXSource->data4, -1, 0);
|
|
|
|
if (pPlayer)
|
|
{
|
|
playerResetInertia(pPlayer);
|
|
if (pXSource->data2 == 1)
|
|
pPlayer->zViewVel = pPlayer->zWeaponVel = 0;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useEffectGen(DBloodActor* sourceactor, DBloodActor* actor)
|
|
{
|
|
if (!actor) actor = sourceactor;
|
|
auto pSprite = &actor->s();
|
|
auto pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
int fxId = (pXSource->data3 <= 0) ? pXSource->data2 : pXSource->data2 + Random(pXSource->data3 + 1);
|
|
|
|
|
|
if (!actor->hasX()) return;
|
|
else if (fxId >= kEffectGenCallbackBase)
|
|
{
|
|
int length = sizeof(gEffectGenCallbacks) / sizeof(gEffectGenCallbacks[0]);
|
|
if (fxId < kEffectGenCallbackBase + length)
|
|
{
|
|
fxId = gEffectGenCallbacks[fxId - kEffectGenCallbackBase];
|
|
evKillActor(actor, (CALLBACK_ID)fxId);
|
|
evPostActor(actor, 0, (CALLBACK_ID)fxId);
|
|
}
|
|
|
|
}
|
|
else if (valueIsBetween(fxId, 0, kFXMax))
|
|
{
|
|
int pos, top, bottom;
|
|
GetActorExtents(actor, &top, &bottom);
|
|
DBloodActor* pEffect = nullptr;
|
|
|
|
// select where exactly effect should be spawned
|
|
switch (pXSource->data4)
|
|
{
|
|
case 1:
|
|
pos = bottom;
|
|
break;
|
|
case 2: // middle
|
|
pos = pSprite->z + (tileHeight(pSprite->picnum) / 2 + tileTopOffset(pSprite->picnum));
|
|
break;
|
|
case 3:
|
|
case 4:
|
|
if (!sectRangeIsFine(pSprite->sectnum)) pos = top;
|
|
else pos = (pXSource->data4 == 3) ? sector[pSprite->sectnum].floorz : sector[pSprite->sectnum].ceilingz;
|
|
break;
|
|
default:
|
|
pos = top;
|
|
break;
|
|
}
|
|
|
|
if ((pEffect = gFX.fxSpawnActor((FX_ID)fxId, pSprite->sectnum, pSprite->x, pSprite->y, pos, 0)) != NULL)
|
|
{
|
|
auto pEffectSpr = &pEffect->s();
|
|
pEffectSpr->owner = pSource->index;
|
|
|
|
if (pSource->flags & kModernTypeFlag1)
|
|
{
|
|
pEffectSpr->pal = pSource->pal;
|
|
pEffectSpr->xoffset = pSource->xoffset;
|
|
pEffectSpr->yoffset = pSource->yoffset;
|
|
pEffectSpr->xrepeat = pSource->xrepeat;
|
|
pEffectSpr->yrepeat = pSource->yrepeat;
|
|
pEffectSpr->shade = pSource->shade;
|
|
}
|
|
|
|
if (pSource->flags & kModernTypeFlag2)
|
|
{
|
|
pEffectSpr->cstat = pSource->cstat;
|
|
if (pEffectSpr->cstat & CSTAT_SPRITE_INVISIBLE)
|
|
pEffectSpr->cstat &= ~CSTAT_SPRITE_INVISIBLE;
|
|
}
|
|
|
|
if (pEffectSpr->cstat & CSTAT_SPRITE_ONE_SIDED)
|
|
pEffectSpr->cstat &= ~CSTAT_SPRITE_ONE_SIDED;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSectorWindGen(DBloodActor* sourceactor, sectortype* pSector)
|
|
{
|
|
auto pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
XSECTOR* pXSector = nullptr;
|
|
int nXSector = 0;
|
|
|
|
if (pSector != nullptr)
|
|
{
|
|
pXSector = &xsector[pSector->extra];
|
|
nXSector = sector[pXSector->reference].extra;
|
|
}
|
|
else if (xsectRangeIsFine(sector[pSource->sectnum].extra))
|
|
{
|
|
pXSector = &xsector[sector[pSource->sectnum].extra];
|
|
nXSector = sector[pXSector->reference].extra;
|
|
}
|
|
else
|
|
{
|
|
nXSector = dbInsertXSector(pSource->sectnum);
|
|
pXSector = &xsector[nXSector]; pXSector->windAlways = 1;
|
|
}
|
|
|
|
int windVel = ClipRange(pXSource->data2, 0, 32767);
|
|
if ((pXSource->data1 & 0x0001))
|
|
windVel = nnExtRandom(0, windVel);
|
|
|
|
// process vertical wind in nnExtProcessSuperSprites();
|
|
if ((pSource->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR))
|
|
{
|
|
pXSource->sysData2 = windVel << 1;
|
|
return;
|
|
}
|
|
|
|
pXSector->windVel = windVel;
|
|
if ((pSource->flags & kModernTypeFlag1))
|
|
pXSector->panAlways = pXSector->windAlways = 1;
|
|
|
|
int ang = pSource->ang;
|
|
if (pXSource->data4 <= 0)
|
|
{
|
|
if ((pXSource->data1 & 0x0002))
|
|
{
|
|
while (pSource->ang == ang)
|
|
pSource->ang = nnExtRandom(-kAng360, kAng360) & 2047;
|
|
}
|
|
}
|
|
else if (pSource->cstat & 0x2000) pSource->ang += pXSource->data4;
|
|
else if (pSource->cstat & 0x4000) pSource->ang -= pXSource->data4;
|
|
else if (pXSource->sysData1 == 0)
|
|
{
|
|
if ((ang += pXSource->data4) >= kAng180) pXSource->sysData1 = 1;
|
|
pSource->ang = ClipHigh(ang, kAng180);
|
|
}
|
|
else
|
|
{
|
|
if ((ang -= pXSource->data4) <= -kAng180) pXSource->sysData1 = 0;
|
|
pSource->ang = ClipLow(ang, -kAng180);
|
|
}
|
|
|
|
pXSector->windAng = pSource->ang;
|
|
|
|
if (pXSource->data3 > 0 && pXSource->data3 < 4)
|
|
{
|
|
switch (pXSource->data3)
|
|
{
|
|
case 1:
|
|
pXSector->panFloor = true;
|
|
pXSector->panCeiling = false;
|
|
break;
|
|
case 2:
|
|
pXSector->panFloor = false;
|
|
pXSector->panCeiling = true;
|
|
break;
|
|
case 3:
|
|
pXSector->panFloor = true;
|
|
pXSector->panCeiling = true;
|
|
break;
|
|
}
|
|
if (pXSector->panCeiling)
|
|
{
|
|
StartInterpolation(pXSector->reference, Interp_Sect_CeilingPanX);
|
|
StartInterpolation(pXSector->reference, Interp_Sect_CeilingPanY);
|
|
}
|
|
if (pXSector->panFloor)
|
|
{
|
|
StartInterpolation(pXSector->reference, Interp_Sect_FloorPanX);
|
|
StartInterpolation(pXSector->reference, Interp_Sect_FloorPanY);
|
|
}
|
|
|
|
short oldPan = pXSector->panVel;
|
|
pXSector->panAngle = pXSector->windAng;
|
|
pXSector->panVel = pXSector->windVel;
|
|
|
|
// add to panList if panVel was set to 0 previously
|
|
if (oldPan == 0 && pXSector->panVel != 0 && panCount < kMaxXSectors)
|
|
{
|
|
int i;
|
|
for (i = 0; i < panCount; i++)
|
|
{
|
|
if (panList[i] != nXSector) continue;
|
|
break;
|
|
}
|
|
|
|
if (i == panCount)
|
|
{
|
|
panList[panCount++] = nXSector;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSpriteDamager(DBloodActor* sourceactor, int objType, int objIndex, DBloodActor* targetactor)
|
|
{
|
|
auto pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
sectortype* pSector = §or[pSource->sectnum];
|
|
|
|
int top, bottom;
|
|
bool floor, ceil, wall, enter;
|
|
|
|
switch (objType)
|
|
{
|
|
case OBJ_SPRITE:
|
|
damageSprites(sourceactor, targetactor);
|
|
break;
|
|
case OBJ_SECTOR:
|
|
{
|
|
GetActorExtents(sourceactor, &top, &bottom);
|
|
floor = (bottom >= pSector->floorz);
|
|
ceil = (top <= pSector->ceilingz);
|
|
wall = (pSource->cstat & 0x10);
|
|
enter = (!floor && !ceil && !wall);
|
|
BloodSectIterator it(objIndex);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
auto& hit = iactor->hit();
|
|
|
|
if (!iactor->IsDudeActor() || !iactor->hasX())
|
|
continue;
|
|
else if (enter)
|
|
damageSprites(sourceactor, iactor);
|
|
else if (floor && hit.florhit.type == kHitSector && hit.florhit.index == objIndex)
|
|
damageSprites(sourceactor, iactor);
|
|
else if (ceil && hit.ceilhit.type == kHitSector && hit.ceilhit.index == objIndex)
|
|
damageSprites(sourceactor, iactor);
|
|
else if (wall && hit.hit.type == kHitWall && sectorofwall(hit.hit.index) == objIndex)
|
|
damageSprites(sourceactor, iactor);
|
|
}
|
|
break;
|
|
}
|
|
case -1:
|
|
{
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
if (iactor->s().statnum != kStatDude) continue;
|
|
switch (pXSource->data1)
|
|
{
|
|
case 667:
|
|
if (iactor->IsPlayerActor()) continue;
|
|
damageSprites(sourceactor, iactor);
|
|
break;
|
|
case 668:
|
|
if (iactor->IsPlayerActor()) continue;
|
|
damageSprites(sourceactor, iactor);
|
|
break;
|
|
default:
|
|
damageSprites(sourceactor, iactor);
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
|
|
void damageSprites(DBloodActor* sourceactor, DBloodActor* actor)
|
|
{
|
|
spritetype* pSource = &sourceactor->s();
|
|
if (!actor->IsDudeActor() || !actor->hasX() || actor->x().health <= 0 || sourceactor->x().data3 < 0)
|
|
return;
|
|
|
|
|
|
int health = 0;
|
|
auto pSprite = &actor->s();
|
|
auto pXSprite = &actor->x();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
PLAYER* pPlayer = getPlayerById(pSprite->type);
|
|
int dmgType = (pXSource->data2 >= kDmgFall) ? ClipHigh(pXSource->data2, kDmgElectric) : -1;
|
|
int dmg = pXSprite->health << 4;
|
|
int armor[3];
|
|
|
|
bool godMode = (pPlayer && ((dmgType >= 0 && pPlayer->damageControl[dmgType]) || powerupCheck(pPlayer, kPwUpDeathMask) || pPlayer->godMode)); // kneeling
|
|
|
|
if (godMode || pXSprite->locked) return;
|
|
else if (pXSource->data3)
|
|
{
|
|
if (pSource->flags & kModernTypeFlag1) dmg = ClipHigh(pXSource->data3 << 1, 65535);
|
|
else if (pXSprite->sysData2 > 0) dmg = (ClipHigh(pXSprite->sysData2 << 4, 65535) * pXSource->data3) / kPercFull;
|
|
else dmg = ((getDudeInfo(pSprite->type)->startHealth << 4) * pXSource->data3) / kPercFull;
|
|
|
|
health = pXSprite->health - dmg;
|
|
}
|
|
|
|
if (dmgType >= kDmgFall)
|
|
{
|
|
if (dmg < (int)pXSprite->health << 4)
|
|
{
|
|
if (!nnExtIsImmune(actor, dmgType, 0))
|
|
{
|
|
if (pPlayer)
|
|
{
|
|
playerDamageArmor(pPlayer, (DAMAGE_TYPE)dmgType, dmg);
|
|
for (int i = 0; i < 3; armor[i] = pPlayer->armor[i], pPlayer->armor[i] = 0, i++);
|
|
actDamageSprite(sourceactor, actor, (DAMAGE_TYPE)dmgType, dmg);
|
|
for (int i = 0; i < 3; pPlayer->armor[i] = armor[i], i++);
|
|
|
|
}
|
|
else
|
|
{
|
|
actDamageSprite(sourceactor, actor, (DAMAGE_TYPE)dmgType, dmg);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
//Printf(PRINT_HIGH, "Dude type %d is immune to damage type %d!", pSprite->type, dmgType);
|
|
}
|
|
}
|
|
else if (!pPlayer) actKillDude(sourceactor, actor, (DAMAGE_TYPE)dmgType, dmg);
|
|
else playerDamageSprite(sourceactor, pPlayer, (DAMAGE_TYPE)dmgType, dmg);
|
|
}
|
|
else if ((pXSprite->health = ClipLow(health, 1)) > 16);
|
|
else if (!pPlayer) actKillDude(sourceactor, actor, kDamageBullet, dmg);
|
|
else playerDamageSprite(sourceactor, pPlayer, kDamageBullet, dmg);
|
|
|
|
if (pXSprite->health > 0)
|
|
{
|
|
if (!(pSource->flags & kModernTypeFlag8))
|
|
pXSprite->health = health;
|
|
|
|
bool showEffects = !(pSource->flags & kModernTypeFlag2); // show it by default
|
|
bool forceRecoil = (pSource->flags & kModernTypeFlag4);
|
|
|
|
if (showEffects)
|
|
{
|
|
switch (dmgType)
|
|
{
|
|
case kDmgBurn:
|
|
if (pXSprite->burnTime > 0) break;
|
|
actBurnSprite(sourceactor, actor, ClipLow(dmg >> 1, 128));
|
|
evKillActor(actor, kCallbackFXFlameLick);
|
|
evPostActor(actor, 0, kCallbackFXFlameLick); // show flames
|
|
break;
|
|
case kDmgElectric:
|
|
forceRecoil = true; // show tesla recoil animation
|
|
break;
|
|
case kDmgBullet:
|
|
evKillActor(actor, kCallbackFXBloodSpurt);
|
|
for (int i = 1; i < 6; i++)
|
|
{
|
|
if (Chance(0x16000 >> i))
|
|
fxSpawnBlood(actor, dmg << 4);
|
|
}
|
|
break;
|
|
case kDmgChoke:
|
|
if (!pPlayer || !Chance(0x2000)) break;
|
|
else pPlayer->blindEffect += dmg << 2;
|
|
}
|
|
}
|
|
|
|
if (forceRecoil && !pPlayer)
|
|
{
|
|
pXSprite->data3 = 32767;
|
|
actor->dudeExtra.teslaHit = (dmgType == kDmgElectric) ? 1 : 0;
|
|
if (pXSprite->aiState->stateType != kAiStateRecoil)
|
|
RecoilDude(actor);
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSeqSpawnerGen(DBloodActor* sourceactor, int objType, int index, DBloodActor* iactor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
if (pXSource->data2 > 0 && !getSequence(pXSource->data2))
|
|
{
|
|
Printf(PRINT_HIGH, "Missing sequence #%d", pXSource->data2);
|
|
return;
|
|
}
|
|
|
|
spritetype* pSource = &sourceactor->s();
|
|
|
|
switch (objType)
|
|
{
|
|
case OBJ_SECTOR:
|
|
if (pXSource->data2 <= 0)
|
|
{
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 1)
|
|
seqKill(2, sector[index].extra);
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 2)
|
|
seqKill(1, sector[index].extra);
|
|
}
|
|
else
|
|
{
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 1)
|
|
seqSpawn(pXSource->data2, 2, sector[index].extra, -1);
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 2)
|
|
seqSpawn(pXSource->data2, 1, sector[index].extra, -1);
|
|
}
|
|
return;
|
|
|
|
case OBJ_WALL:
|
|
if (pXSource->data2 <= 0)
|
|
{
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 1)
|
|
seqKill(0, wall[index].extra);
|
|
if ((pXSource->data3 == 3 || pXSource->data3 == 2) && (wall[index].cstat & CSTAT_WALL_MASKED))
|
|
seqKill(4, wall[index].extra);
|
|
}
|
|
else
|
|
{
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 1)
|
|
seqSpawn(pXSource->data2, 0, wall[index].extra, -1);
|
|
|
|
if (pXSource->data3 == 3 || pXSource->data3 == 2) {
|
|
|
|
if (wall[index].nextwall < 0) {
|
|
if (pXSource->data3 == 3)
|
|
seqSpawn(pXSource->data2, 0, wall[index].extra, -1);
|
|
|
|
} else {
|
|
if (!(wall[index].cstat & CSTAT_WALL_MASKED))
|
|
wall[index].cstat |= CSTAT_WALL_MASKED;
|
|
|
|
seqSpawn(pXSource->data2, 4, wall[index].extra, -1);
|
|
}
|
|
}
|
|
|
|
if (pXSource->data4 > 0)
|
|
{
|
|
int cx, cy, cz;
|
|
cx = (wall[index].x + wall[wall[index].point2].x) >> 1;
|
|
cy = (wall[index].y + wall[wall[index].point2].y) >> 1;
|
|
int nSector = sectorofwall(index);
|
|
int32_t ceilZ, floorZ;
|
|
getzsofslope(nSector, cx, cy, &ceilZ, &floorZ);
|
|
int32_t ceilZ2, floorZ2;
|
|
getzsofslope(wall[index].nextsector, cx, cy, &ceilZ2, &floorZ2);
|
|
ceilZ = ClipLow(ceilZ, ceilZ2);
|
|
floorZ = ClipHigh(floorZ, floorZ2);
|
|
cz = (ceilZ + floorZ) >> 1;
|
|
|
|
sfxPlay3DSound(cx, cy, cz, pXSource->data4, nSector);
|
|
}
|
|
}
|
|
return;
|
|
|
|
case OBJ_SPRITE:
|
|
{
|
|
auto pSprite = &iactor->s();
|
|
if (pXSource->data2 <= 0) seqKill(iactor);
|
|
else if (sectRangeIsFine(pSprite->sectnum))
|
|
{
|
|
if (pXSource->data3 > 0)
|
|
{
|
|
int nSpawned = InsertSprite(pSprite->sectnum, kStatDecoration);
|
|
auto spawned = &bloodActors[nSpawned];
|
|
auto pSpawned = &spawned->s();
|
|
int top, bottom; GetSpriteExtents(&sprite[index], &top, &bottom);
|
|
pSpawned->x = pSprite->x;
|
|
pSpawned->y = pSprite->y;
|
|
switch (pXSource->data3)
|
|
{
|
|
default:
|
|
pSpawned->z = pSprite->z;
|
|
break;
|
|
case 2:
|
|
pSpawned->z = bottom;
|
|
break;
|
|
case 3:
|
|
pSpawned->z = top;
|
|
break;
|
|
case 4:
|
|
pSpawned->z = pSprite->z + tileHeight(pSprite->picnum) / 2 + tileTopOffset(pSprite->picnum);
|
|
break;
|
|
case 5:
|
|
case 6:
|
|
if (!sectRangeIsFine(pSprite->sectnum)) pSpawned->z = top;
|
|
else pSpawned->z = (pXSource->data3 == 5) ? sector[pSpawned->sectnum].floorz : sector[pSpawned->sectnum].ceilingz;
|
|
break;
|
|
}
|
|
|
|
if (spawned != nullptr)
|
|
{
|
|
|
|
spawned->addX();
|
|
seqSpawn(pXSource->data2, spawned, -1);
|
|
if (pSource->flags & kModernTypeFlag1)
|
|
{
|
|
pSpawned->pal = pSource->pal;
|
|
pSpawned->shade = pSource->shade;
|
|
pSpawned->xrepeat = pSource->xrepeat;
|
|
pSpawned->yrepeat = pSource->yrepeat;
|
|
pSpawned->xoffset = pSource->xoffset;
|
|
pSpawned->yoffset = pSource->yoffset;
|
|
}
|
|
|
|
if (pSource->flags & kModernTypeFlag2)
|
|
{
|
|
pSpawned->cstat |= pSource->cstat;
|
|
}
|
|
|
|
// should be: the more is seqs, the shorter is timer
|
|
evPostActor(spawned, 1000, kCallbackRemove);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
seqSpawn(pXSource->data2, iactor, -1);
|
|
}
|
|
|
|
if (pXSource->data4 > 0)
|
|
sfxPlay3DSound(iactor, pXSource->data4, -1, 0);
|
|
}
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int condSerialize(int objType, int objIndex) {
|
|
switch (objType) {
|
|
case OBJ_SECTOR: return kCondSerialSector + objIndex;
|
|
case OBJ_WALL: return kCondSerialWall + objIndex;
|
|
case OBJ_SPRITE: return kCondSerialSprite + objIndex;
|
|
}
|
|
I_Error("Unknown object type %d, index %d", objType, objIndex);
|
|
return -1;
|
|
}
|
|
|
|
void condUnserialize(int serial, int* objType, int* objIndex) {
|
|
if (serial >= kCondSerialSector && serial < kCondSerialWall) {
|
|
|
|
*objIndex = serial - kCondSerialSector;
|
|
*objType = OBJ_SECTOR;
|
|
|
|
} else if (serial >= kCondSerialWall && serial < kCondSerialSprite) {
|
|
|
|
*objIndex = serial - kCondSerialWall;
|
|
*objType = OBJ_WALL;
|
|
|
|
} else if (serial >= kCondSerialSprite && serial < kCondSerialMax) {
|
|
|
|
*objIndex = serial - kCondSerialSprite;
|
|
*objType = OBJ_SPRITE;
|
|
|
|
} else {
|
|
|
|
I_Error("%d is not condition serial!", serial);
|
|
|
|
}
|
|
}
|
|
|
|
bool condPush(XSPRITE* pXSprite, int objType, int objIndex) {
|
|
pXSprite->targetX = condSerialize(objType, objIndex);
|
|
return true;
|
|
}
|
|
|
|
bool condRestore(XSPRITE* pXSprite) {
|
|
pXSprite->targetX = pXSprite->targetY;
|
|
return true;
|
|
}
|
|
|
|
// normal comparison
|
|
bool condCmp(int val, int arg1, int arg2, int comOp) {
|
|
if (comOp & 0x2000) return (comOp & CSTAT_SPRITE_BLOCK) ? (val > arg1) : (val >= arg1); // blue sprite
|
|
else if (comOp & 0x4000) return (comOp & CSTAT_SPRITE_BLOCK) ? (val < arg1) : (val <= arg1); // green sprite
|
|
else if (comOp & CSTAT_SPRITE_BLOCK) {
|
|
if (arg1 > arg2) I_Error("Value of argument #1 (%d) must be less than value of argument #2 (%d)", arg1, arg2);
|
|
return (val >= arg1 && val <= arg2);
|
|
}
|
|
else return (val == arg1);
|
|
}
|
|
|
|
void condError(XSPRITE* pXCond, const char* pzFormat, ...) {
|
|
|
|
char buffer[256]; char buffer2[512]; FString condType = "Unknown";
|
|
for (int i = 0; i < 7; i++) {
|
|
if (pXCond->data1 < gCondTypeNames[i].rng1 || pXCond->data1 >= gCondTypeNames[i].rng2) continue;
|
|
condType = gCondTypeNames[i].name;
|
|
condType.ToUpper();
|
|
break;
|
|
}
|
|
|
|
snprintf(buffer, 256, "\n\n%s CONDITION RX: %d, TX: %d, SPRITE: #%d RETURNS:\n", condType.GetChars(), pXCond->rxID, pXCond->txID, pXCond->reference);
|
|
va_list args;
|
|
va_start(args, pzFormat);
|
|
vsnprintf(buffer2, 512, pzFormat, args);
|
|
I_Error("%s%s", buffer, buffer2);
|
|
}
|
|
|
|
bool condCheckGame(XSPRITE* pXCond, EVENT event, int cmpOp, bool PUSH) {
|
|
|
|
//int var = -1;
|
|
int cond = pXCond->data1 - kCondGameBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; int arg3 = pXCond->data4;
|
|
|
|
switch (cond) {
|
|
case 1: return condCmp(gFrameCount / (kTicsPerSec * 60), arg1, arg2, cmpOp); // compare level minutes
|
|
case 2: return condCmp((gFrameCount / kTicsPerSec) % 60, arg1, arg2, cmpOp); // compare level seconds
|
|
case 3: return condCmp(((gFrameCount % kTicsPerSec) * 33) / 10, arg1, arg2, cmpOp); // compare level mseconds
|
|
case 4: return condCmp(gFrameCount, arg1, arg2, cmpOp); // compare level time (unsafe)
|
|
case 5: return condCmp(gKillMgr.Kills, arg1, arg2, cmpOp); // compare current global kills counter
|
|
case 6: return condCmp(gKillMgr.TotalKills, arg1, arg2, cmpOp); // compare total global kills counter
|
|
case 7: return condCmp(gSecretMgr.Founds, arg1, arg2, cmpOp); // compare how many secrets found
|
|
case 8: return condCmp(gSecretMgr.Total, arg1, arg2, cmpOp); // compare total secrets
|
|
/*----------------------------------------------------------------------------------------------------------------------------------*/
|
|
case 20: return condCmp(gVisibility, arg1, arg2, cmpOp); // compare global visibility value
|
|
/*----------------------------------------------------------------------------------------------------------------------------------*/
|
|
case 30: return Chance((0x10000 * arg3) / kPercFull); // check chance
|
|
case 31: return condCmp(nnExtRandom(arg1, arg2), arg1, arg2, cmpOp);
|
|
/*----------------------------------------------------------------------------------------------------------------------------------*/
|
|
case 47: return condCmp(gStatCount[ClipRange(arg3, 0, kMaxStatus)], arg1, arg2, cmpOp); // compare counter of specific statnum sprites
|
|
case 48: return condCmp(Numsprites, arg1, arg2, cmpOp); // compare counter of total sprites
|
|
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition id (%d)!", cond);
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool condCheckMixed(XSPRITE* pXCond, EVENT event, int cmpOp, bool PUSH)
|
|
{
|
|
//int var = -1;
|
|
int cond = pXCond->data1 - kCondMixedBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; int arg3 = pXCond->data4;
|
|
|
|
int objType = -1; int objIndex = -1;
|
|
condUnserialize(pXCond->targetX, &objType, &objIndex);
|
|
|
|
switch (cond) {
|
|
case 0: return (objType == OBJ_SECTOR && sectRangeIsFine(objIndex)); // is a sector?
|
|
case 5: return (objType == OBJ_WALL && wallRangeIsFine(objIndex)); // is a wall?
|
|
case 10: return (objType == OBJ_SPRITE && spriRangeIsFine(objIndex)); // is a sprite?
|
|
case 15: // x-index is fine?
|
|
switch (objType) {
|
|
case OBJ_WALL: return xwallRangeIsFine(wall[objIndex].extra);
|
|
case OBJ_SPRITE: return xspriRangeIsFine(sprite[objIndex].extra);
|
|
case OBJ_SECTOR: return xsectRangeIsFine(sector[objIndex].extra);
|
|
}
|
|
break;
|
|
case 20: // type in a range?
|
|
switch (objType) {
|
|
case OBJ_WALL:
|
|
return condCmp(wall[objIndex].type, arg1, arg2, cmpOp);
|
|
case OBJ_SPRITE:
|
|
return condCmp(sprite[objIndex].type, arg1, arg2, cmpOp);
|
|
case OBJ_SECTOR:
|
|
return condCmp(sector[objIndex].type, arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 24:
|
|
case 25: case 26: case 27:
|
|
case 28: case 29: case 30:
|
|
case 31: case 32: case 33:
|
|
switch (objType) {
|
|
case OBJ_WALL: {
|
|
walltype* pObj = &wall[objIndex];
|
|
switch (cond) {
|
|
case 24: return condCmp(surfType[wall[objIndex].picnum], arg1, arg2, cmpOp);
|
|
case 25: return condCmp(pObj->picnum, arg1, arg2, cmpOp);
|
|
case 26: return condCmp(pObj->pal, arg1, arg2, cmpOp);
|
|
case 27: return condCmp(pObj->shade, arg1, arg2, cmpOp);
|
|
case 28: return (pObj->cstat & arg1);
|
|
case 29: return (pObj->hitag & arg1);
|
|
case 30: return condCmp(pObj->xrepeat, arg1, arg2, cmpOp);
|
|
case 31: return condCmp(pObj->xpan(), arg1, arg2, cmpOp);
|
|
case 32: return condCmp(pObj->yrepeat, arg1, arg2, cmpOp);
|
|
case 33: return condCmp(pObj->ypan(), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
}
|
|
case OBJ_SPRITE: {
|
|
spritetype* pObj = &sprite[objIndex];
|
|
switch (cond) {
|
|
case 24: return condCmp(surfType[sprite[objIndex].picnum], arg1, arg2, cmpOp);
|
|
case 25: return condCmp(pObj->picnum, arg1, arg2, cmpOp);
|
|
case 26: return condCmp(pObj->pal, arg1, arg2, cmpOp);
|
|
case 27: return condCmp(pObj->shade, arg1, arg2, cmpOp);
|
|
case 28: return (pObj->cstat & arg1);
|
|
case 29: return (pObj->hitag & arg1);
|
|
case 30: return condCmp(pObj->xrepeat, arg1, arg2, cmpOp);
|
|
case 31: return condCmp(pObj->xoffset, arg1, arg2, cmpOp);
|
|
case 32: return condCmp(pObj->yrepeat, arg1, arg2, cmpOp);
|
|
case 33: return condCmp(pObj->yoffset, arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
}
|
|
case OBJ_SECTOR: {
|
|
sectortype* pObj = §or[objIndex];
|
|
switch (cond) {
|
|
case 24:
|
|
switch (arg3) {
|
|
default: return (condCmp(surfType[sector[objIndex].floorpicnum], arg1, arg2, cmpOp) || condCmp(surfType[sector[objIndex].ceilingpicnum], arg1, arg2, cmpOp));
|
|
case 1: return condCmp(surfType[sector[objIndex].floorpicnum], arg1, arg2, cmpOp);
|
|
case 2: return condCmp(surfType[sector[objIndex].ceilingpicnum], arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 25:
|
|
switch (arg3) {
|
|
default: return (condCmp(pObj->floorpicnum, arg1, arg2, cmpOp) || condCmp(pObj->ceilingpicnum, arg1, arg2, cmpOp));
|
|
case 1: return condCmp(pObj->floorpicnum, arg1, arg2, cmpOp);
|
|
case 2: return condCmp(pObj->ceilingpicnum, arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 26:
|
|
switch (arg3) {
|
|
default: return (condCmp(pObj->floorpal, arg1, arg2, cmpOp) || condCmp(pObj->ceilingpal, arg1, arg2, cmpOp));
|
|
case 1: return condCmp(pObj->floorpal, arg1, arg2, cmpOp);
|
|
case 2: return condCmp(pObj->ceilingpal, arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 27:
|
|
switch (arg3) {
|
|
default: return (condCmp(pObj->floorshade, arg1, arg2, cmpOp) || condCmp(pObj->ceilingshade, arg1, arg2, cmpOp));
|
|
case 1: return condCmp(pObj->floorshade, arg1, arg2, cmpOp);
|
|
case 2: return condCmp(pObj->ceilingshade, arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 28:
|
|
switch (arg3) {
|
|
default: return ((pObj->floorstat & arg1) || (pObj->ceilingshade & arg1));
|
|
case 1: return (pObj->floorstat & arg1);
|
|
case 2: return (pObj->ceilingshade & arg1);
|
|
}
|
|
break;
|
|
case 29: return (pObj->hitag & arg1);
|
|
case 30: return condCmp(pObj->floorxpan(), arg1, arg2, cmpOp);
|
|
case 31: return condCmp(pObj->ceilingxpan(), arg1, arg2, cmpOp);
|
|
case 32: return condCmp(pObj->floorypan(), arg1, arg2, cmpOp);
|
|
case 33: return condCmp(pObj->ceilingypan(), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
case 41: case 42: case 43:
|
|
case 44: case 50: case 51:
|
|
case 52: case 53: case 54:
|
|
case 55: case 56: case 57:
|
|
case 58: case 59: case 70:
|
|
case 71:
|
|
switch (objType) {
|
|
case OBJ_WALL: {
|
|
if (!xwallRangeIsFine(wall[objIndex].extra))
|
|
return condCmp(0, arg1, arg2, cmpOp);
|
|
|
|
XWALL* pXObj = &xwall[wall[objIndex].extra];
|
|
switch (cond) {
|
|
case 41: return condCmp(pXObj->data, arg1, arg2, cmpOp);
|
|
case 50: return condCmp(pXObj->rxID, arg1, arg2, cmpOp);
|
|
case 51: return condCmp(pXObj->txID, arg1, arg2, cmpOp);
|
|
case 52: return pXObj->locked;
|
|
case 53: return pXObj->triggerOn;
|
|
case 54: return pXObj->triggerOff;
|
|
case 55: return pXObj->triggerOnce;
|
|
case 56: return pXObj->isTriggered;
|
|
case 57: return pXObj->state;
|
|
case 58: return condCmp((kPercFull * pXObj->busy) / 65536, arg1, arg2, cmpOp);
|
|
case 59: return pXObj->dudeLockout;
|
|
case 70:
|
|
switch (arg3) {
|
|
default: return (condCmp(seqGetID(0, wall[objIndex].extra), arg1, arg2, cmpOp) || condCmp(seqGetID(4, wall[objIndex].extra), arg1, arg2, cmpOp));
|
|
case 1: return condCmp(seqGetID(0, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
case 2: return condCmp(seqGetID(4, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 71:
|
|
switch (arg3) {
|
|
default: return (condCmp(seqGetStatus(0, wall[objIndex].extra), arg1, arg2, cmpOp) || condCmp(seqGetStatus(4, wall[objIndex].extra), arg1, arg2, cmpOp));
|
|
case 1: return condCmp(seqGetStatus(0, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
case 2: return condCmp(seqGetStatus(4, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
case OBJ_SPRITE: {
|
|
if (!xspriRangeIsFine(sprite[objIndex].extra))
|
|
return condCmp(0, arg1, arg2, cmpOp);
|
|
|
|
XSPRITE* pXObj = &xsprite[sprite[objIndex].extra];
|
|
switch (cond) {
|
|
case 41: case 42:
|
|
case 43: case 44:
|
|
return condCmp(getDataFieldOfObject(OBJ_SPRITE, objIndex, &bloodActors[objIndex], 1 + cond - 41), arg1, arg2, cmpOp);
|
|
case 50: return condCmp(pXObj->rxID, arg1, arg2, cmpOp);
|
|
case 51: return condCmp(pXObj->txID, arg1, arg2, cmpOp);
|
|
case 52: return pXObj->locked;
|
|
case 53: return pXObj->triggerOn;
|
|
case 54: return pXObj->triggerOff;
|
|
case 55: return pXObj->triggerOnce;
|
|
case 56: return pXObj->isTriggered;
|
|
case 57: return pXObj->state;
|
|
case 58: return condCmp((kPercFull * pXObj->busy) / 65536, arg1, arg2, cmpOp);
|
|
case 59: return pXObj->DudeLockout;
|
|
case 70: return condCmp(seqGetID(3, sprite[objIndex].extra), arg1, arg2, cmpOp);
|
|
case 71: return condCmp(seqGetStatus(3, sprite[objIndex].extra), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
}
|
|
case OBJ_SECTOR: {
|
|
if (xsectRangeIsFine(sector[objIndex].extra))
|
|
return condCmp(0, arg1, arg2, cmpOp);
|
|
|
|
XSECTOR* pXObj = &xsector[sector[objIndex].extra];
|
|
switch (cond) {
|
|
case 41: return condCmp(pXObj->data, arg1, arg2, cmpOp);
|
|
case 50: return condCmp(pXObj->rxID, arg1, arg2, cmpOp);
|
|
case 51: return condCmp(pXObj->txID, arg1, arg2, cmpOp);
|
|
case 52: return pXObj->locked;
|
|
case 53: return pXObj->triggerOn;
|
|
case 54: return pXObj->triggerOff;
|
|
case 55: return pXObj->triggerOnce;
|
|
case 56: return pXObj->isTriggered;
|
|
case 57: return pXObj->state;
|
|
case 58: return condCmp((kPercFull * pXObj->busy) / 65536, arg1, arg2, cmpOp);
|
|
case 59: return pXObj->dudeLockout;
|
|
case 70:
|
|
switch (arg3) {
|
|
default: return (condCmp(seqGetID(1, wall[objIndex].extra), arg1, arg2, cmpOp) || condCmp(seqGetID(2, wall[objIndex].extra), arg1, arg2, cmpOp));
|
|
case 1: return condCmp(seqGetID(1, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
case 2: return condCmp(seqGetID(2, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
case 71:
|
|
switch (arg3) {
|
|
default: return (condCmp(seqGetStatus(1, wall[objIndex].extra), arg1, arg2, cmpOp) || condCmp(seqGetStatus(2, wall[objIndex].extra), arg1, arg2, cmpOp));
|
|
case 1: return condCmp(seqGetStatus(1, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
case 2: return condCmp(seqGetStatus(2, wall[objIndex].extra), arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
case 99: return condCmp(event.cmd, arg1, arg2, cmpOp); // this codition received specified command?
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition id (%d)!", cond);
|
|
return false;
|
|
}
|
|
|
|
bool condCheckSector(XSPRITE* pXCond, int cmpOp, bool PUSH) {
|
|
|
|
int var = -1;
|
|
int cond = pXCond->data1 - kCondSectorBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; //int arg3 = pXCond->data4;
|
|
|
|
int objType = -1; int objIndex = -1;
|
|
condUnserialize(pXCond->targetX, &objType, &objIndex);
|
|
|
|
if (objType != OBJ_SECTOR || !sectRangeIsFine(objIndex))
|
|
condError(pXCond, "Object #%d (objType: %d) is not a sector!", objIndex, objType);
|
|
|
|
sectortype* pSect = §or[objIndex];
|
|
XSECTOR* pXSect = (xsectRangeIsFine(pSect->extra)) ? &xsector[pSect->extra] : NULL;
|
|
|
|
if (cond < (kCondRange >> 1)) {
|
|
switch (cond) {
|
|
default: break;
|
|
case 0: return condCmp(pSect->visibility, arg1, arg2, cmpOp);
|
|
case 5: return condCmp(pSect->floorheinum, arg1, arg2, cmpOp);
|
|
case 6: return condCmp(pSect->ceilingheinum, arg1, arg2, cmpOp);
|
|
case 10: // required sprite type is in current sector?
|
|
int nSprite;
|
|
SectIterator it(objIndex);
|
|
while ((nSprite = it.NextIndex()) >= 0)
|
|
{
|
|
if (!condCmp(sprite[nSprite].type, arg1, arg2, cmpOp)) continue;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, nSprite);
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
} else if (pXSect) {
|
|
switch (cond) {
|
|
default: break;
|
|
case 50: return pXSect->Underwater;
|
|
case 51: return condCmp(pXSect->Depth, arg1, arg2, cmpOp);
|
|
case 55: // compare floor height (in %)
|
|
case 56: { // compare ceil height (in %)
|
|
int h = 0; int curH = 0;
|
|
switch (pSect->type) {
|
|
case kSectorZMotion:
|
|
case kSectorRotate:
|
|
case kSectorSlide:
|
|
if (cond == 60) {
|
|
h = ClipLow(abs(pXSect->onFloorZ - pXSect->offFloorZ), 1);
|
|
curH = abs(pSect->floorz - pXSect->offFloorZ);
|
|
} else {
|
|
h = ClipLow(abs(pXSect->onCeilZ - pXSect->offCeilZ), 1);
|
|
curH = abs(pSect->ceilingz - pXSect->offCeilZ);
|
|
}
|
|
return condCmp((kPercFull * curH) / h, arg1, arg2, cmpOp);
|
|
default:
|
|
condError(pXCond, "Usupported sector type %d", pSect->type);
|
|
return false;
|
|
}
|
|
}
|
|
case 57: // this sector in movement?
|
|
return !pXSect->unused1;
|
|
}
|
|
} else {
|
|
switch (cond) {
|
|
default: return false;
|
|
case 55:
|
|
case 56:
|
|
return condCmp(0, arg1, arg2, cmpOp);
|
|
}
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition id (%d)!", cond);
|
|
return false;
|
|
}
|
|
|
|
bool condCheckWall(XSPRITE* pXCond, int cmpOp, bool PUSH) {
|
|
|
|
int var = -1;
|
|
int cond = pXCond->data1 - kCondWallBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; //int arg3 = pXCond->data4;
|
|
|
|
int objType = -1; int objIndex = -1;
|
|
condUnserialize(pXCond->targetX, &objType, &objIndex);
|
|
|
|
if (objType != OBJ_WALL || !wallRangeIsFine(objIndex))
|
|
condError(pXCond, "Object #%d (objType: %d) is not a wall!", objIndex, objType);
|
|
|
|
walltype* pWall = &wall[objIndex];
|
|
//XWALL* pXWall = (xwallRangeIsFine(pWall->extra)) ? &xwall[pWall->extra] : NULL;
|
|
|
|
if (cond < (kCondRange >> 1)) {
|
|
switch (cond) {
|
|
default: break;
|
|
case 0:
|
|
return condCmp(pWall->overpicnum, arg1, arg2, cmpOp);
|
|
case 5:
|
|
if (!sectRangeIsFine((var = sectorofwall(objIndex)))) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, var);
|
|
return true;
|
|
case 10: // this wall is a mirror? // must be as constants here
|
|
return (pWall->type != kWallStack && condCmp(pWall->picnum, 4080, (4080 + 16) - 1, 0));
|
|
case 15:
|
|
if (!sectRangeIsFine(pWall->nextsector)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, pWall->nextsector);
|
|
return true;
|
|
case 20:
|
|
if (!wallRangeIsFine(pWall->nextwall)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_WALL, pWall->nextwall);
|
|
return true;
|
|
case 25: // next wall belongs to sector?
|
|
if (!sectRangeIsFine(var = sectorofwall(pWall->nextwall))) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, var);
|
|
return true;
|
|
}
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition id (%d)!", cond);
|
|
return false;
|
|
}
|
|
|
|
bool condCheckPlayer(XSPRITE* pXCond, int cmpOp, bool PUSH) {
|
|
|
|
int var = -1; PLAYER* pPlayer = NULL;
|
|
int cond = pXCond->data1 - kCondPlayerBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; int arg3 = pXCond->data4;
|
|
|
|
int objType = -1; int objIndex = -1;
|
|
condUnserialize(pXCond->targetX, &objType, &objIndex);
|
|
|
|
if (objType != OBJ_SPRITE || !spriRangeIsFine(objIndex))
|
|
condError(pXCond, "Object #%d (objType: %d) is not a sprite!", objIndex, objType);
|
|
|
|
for (int i = 0; i < kMaxPlayers; i++) {
|
|
if (objIndex != gPlayer[i].nSprite) continue;
|
|
pPlayer = &gPlayer[i];
|
|
break;
|
|
}
|
|
|
|
if (!pPlayer) {
|
|
condError(pXCond, "Object #%d (objType: %d) is not a player!", objIndex, objType);
|
|
return false;
|
|
}
|
|
|
|
switch (cond) {
|
|
case 0: // check if this player is connected
|
|
if (!condCmp(pPlayer->nPlayer + 1, arg1, arg2, cmpOp) || pPlayer->actor() == nullptr) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, pPlayer->nSprite);
|
|
return (pPlayer->nPlayer >= 0);
|
|
case 1: return condCmp((gGameOptions.nGameType != 3) ? 0 : pPlayer->teamId + 1, arg1, arg2, cmpOp); // compare team
|
|
case 2: return (arg1 > 0 && arg1 < 8 && pPlayer->hasKey[arg1 - 1]);
|
|
case 3: return (arg1 > 0 && arg1 < 15 && pPlayer->hasWeapon[arg1 - 1]);
|
|
case 4: return condCmp(pPlayer->curWeapon, arg1, arg2, cmpOp);
|
|
case 5: return (arg1 > 0 && arg1 < 6 && condCmp(pPlayer->packSlots[arg1 - 1].curAmount, arg2, arg3, cmpOp));
|
|
case 6: return (arg1 > 0 && arg1 < 6 && pPlayer->packSlots[arg1 - 1].isActive);
|
|
case 7: return condCmp(pPlayer->packItemId + 1, arg1, arg2, cmpOp);
|
|
case 8: // check for powerup amount in seconds
|
|
if (arg3 > 0 && arg3 <= (kMaxAllowedPowerup - (kMinAllowedPowerup << 1) + 1)) {
|
|
var = (kMinAllowedPowerup + arg3) - 1; // allowable powerups
|
|
return condCmp(pPlayer->pwUpTime[var] / 100, arg1, arg2, cmpOp);
|
|
}
|
|
condError(pXCond, "Unexpected powerup #%d", arg3);
|
|
return false;
|
|
case 9:
|
|
if (!spriRangeIsFine(pPlayer->fraggerId)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, pPlayer->fraggerId);
|
|
return true;
|
|
case 10: // check keys pressed
|
|
switch (arg1) {
|
|
case 1: return (pPlayer->input.fvel > 0); // forward
|
|
case 2: return (pPlayer->input.fvel < 0); // backward
|
|
case 3: return (pPlayer->input.svel > 0); // left
|
|
case 4: return (pPlayer->input.svel < 0); // right
|
|
case 5: return !!(pPlayer->input.actions & SB_JUMP); // jump
|
|
case 6: return !!(pPlayer->input.actions & SB_CROUCH); // crouch
|
|
case 7: return !!(pPlayer->input.actions & SB_FIRE); // normal fire weapon
|
|
case 8: return !!(pPlayer->input.actions & SB_ALTFIRE); // alt fire weapon
|
|
case 9: return !!(pPlayer->input.actions & SB_OPEN); // use
|
|
default:
|
|
condError(pXCond, "Specify a correct key!");
|
|
break;
|
|
}
|
|
return false;
|
|
case 11: return (pPlayer->isRunning);
|
|
case 12: return (pPlayer->fallScream); // falling in abyss?
|
|
case 13: return condCmp(pPlayer->lifeMode + 1, arg1, arg2, cmpOp);
|
|
case 14: return condCmp(pPlayer->posture + 1, arg1, arg2, cmpOp);
|
|
case 46: return condCmp(pPlayer->sceneQav, arg1, arg2, cmpOp);
|
|
case 47: return (pPlayer->godMode || powerupCheck(pPlayer, kPwUpDeathMask));
|
|
case 48: return isShrinked(pPlayer->actor());
|
|
case 49: return isGrown(pPlayer->actor());
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition #%d!", cond);
|
|
return false;
|
|
}
|
|
|
|
bool condCheckDude(XSPRITE* pXCond, int cmpOp, bool PUSH) {
|
|
|
|
int var = -1;
|
|
int cond = pXCond->data1 - kCondDudeBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; int arg3 = pXCond->data4;
|
|
|
|
int objType = -1; int objIndex = -1;
|
|
condUnserialize(pXCond->targetX, &objType, &objIndex);
|
|
if (objType != OBJ_SPRITE || !spriRangeIsFine(objIndex))
|
|
condError(pXCond, "Object #%d (objType: %d) is not a sprite!", objIndex, objType);
|
|
|
|
auto actor = &bloodActors[objIndex];
|
|
spritetype* pSpr = &sprite[objIndex];
|
|
if (!xsprIsFine(pSpr) || pSpr->type == kThingBloodChunks)
|
|
condError(pXCond, "Object #%d (objType: %d) is dead!", objIndex, objType);
|
|
|
|
if (!IsDudeSprite(pSpr) || IsPlayerSprite(pSpr))
|
|
condError(pXCond, "Object #%d (objType: %d) is not an enemy!", objIndex, objType);
|
|
|
|
XSPRITE* pXSpr = &xsprite[pSpr->extra];
|
|
switch (cond) {
|
|
default: break;
|
|
case 0: // dude have any targets?
|
|
if (!spriRangeIsFine(pXSpr->target_i)) return false;
|
|
else if (!IsDudeSprite(&sprite[pXSpr->target_i]) && sprite[pXSpr->target_i].type != kMarkerPath) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, pXSpr->target_i);
|
|
return true;
|
|
case 1: return aiFightDudeIsAffected(actor); // dude affected by ai fight?
|
|
case 2: // distance to the target in a range?
|
|
case 3: // is the target visible?
|
|
case 4: // is the target visible with periphery?
|
|
{
|
|
|
|
if (!spriRangeIsFine(pXSpr->target_i))
|
|
condError(pXCond, "Dude #%d have no target!", objIndex);
|
|
|
|
spritetype* pTrgt = &sprite[pXSpr->target_i];
|
|
DUDEINFO* pInfo = getDudeInfo(pSpr->type);
|
|
int eyeAboveZ = pInfo->eyeHeight * pSpr->yrepeat << 2;
|
|
int dx = pTrgt->x - pSpr->x; int dy = pTrgt->y - pSpr->y;
|
|
|
|
switch (cond) {
|
|
case 2:
|
|
var = condCmp(approxDist(dx, dy), arg1 * 512, arg2 * 512, cmpOp);
|
|
break;
|
|
case 3:
|
|
case 4:
|
|
var = cansee(pSpr->x, pSpr->y, pSpr->z, pSpr->sectnum, pTrgt->x, pTrgt->y, pTrgt->z - eyeAboveZ, pTrgt->sectnum);
|
|
if (cond == 4 && var > 0) {
|
|
var = ((1024 + getangle(dx, dy) - pSpr->ang) & 2047) - 1024;
|
|
var = (abs(var) < ((arg1 <= 0) ? pInfo->periphery : ClipHigh(arg1, 2048)));
|
|
}
|
|
break;
|
|
}
|
|
|
|
if (var <= 0) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, pXSpr->target_i);
|
|
return true;
|
|
|
|
}
|
|
case 5: return pXSpr->dudeFlag4;
|
|
case 6: return pXSpr->dudeDeaf;
|
|
case 7: return pXSpr->dudeGuard;
|
|
case 8: return pXSpr->dudeAmbush;
|
|
case 9: return (pXSpr->unused1 & kDudeFlagStealth);
|
|
case 10: // check if the marker is busy with another dude
|
|
case 11: // check if the marker is reached
|
|
if (!pXSpr->dudeFlag4 || !actor->GetTarget() || actor->GetTarget()->s().type != kMarkerPath) return false;
|
|
switch (cond) {
|
|
case 10:
|
|
{
|
|
auto var = aiPatrolMarkerBusy(actor, actor->GetTarget());
|
|
if (!var) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, var->s().index);
|
|
break;
|
|
}
|
|
case 11:
|
|
if (!aiPatrolMarkerReached(actor)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, pXSpr->target_i);
|
|
break;
|
|
}
|
|
return true;
|
|
case 12: // compare spot progress value in %
|
|
if (!pXSpr->dudeFlag4 || !spriRangeIsFine(pXSpr->target_i) || sprite[pXSpr->target_i].type != kMarkerPath) var = 0;
|
|
else if (!(pXSpr->unused1 & kDudeFlagStealth) || pXSpr->data3 < 0 || pXSpr->data3 > kMaxPatrolSpotValue) var = 0;
|
|
else var = (kPercFull * pXSpr->data3) / kMaxPatrolSpotValue;
|
|
return condCmp(var, arg1, arg2, cmpOp);
|
|
case 15: return getDudeInfo(pSpr->type)->lockOut; // dude allowed to interact with objects?
|
|
case 16: return condCmp(pXSpr->aiState->stateType, arg1, arg2, cmpOp);
|
|
case 17: return condCmp(pXSpr->stateTimer, arg1, arg2, cmpOp);
|
|
case 20: // kDudeModernCustom conditions
|
|
case 21:
|
|
case 22:
|
|
case 23:
|
|
case 24:
|
|
switch (pSpr->type) {
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
switch (cond) {
|
|
case 20: // life leech is thrown?
|
|
{
|
|
auto act = actor->genDudeExtra.pLifeLeech;
|
|
if (!act) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, act->s().index);
|
|
return true;
|
|
}
|
|
case 21: // life leech is destroyed?
|
|
{
|
|
auto act = actor->genDudeExtra.pLifeLeech;
|
|
if (!act) return false;
|
|
if (pSpr->owner == kMaxSprites - 1) return true;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, act->s().index);
|
|
return false;
|
|
}
|
|
case 22: // are required amount of dudes is summoned?
|
|
return condCmp(actor->genDudeExtra.slaveCount, arg1, arg2, cmpOp);
|
|
|
|
case 23: // check if dude can...
|
|
switch (arg3) {
|
|
case 1: return actor->genDudeExtra.canAttack;
|
|
case 2: return actor->genDudeExtra.canBurn;
|
|
case 3: return actor->genDudeExtra.canDuck;
|
|
case 4: return actor->genDudeExtra.canElectrocute;
|
|
case 5: return actor->genDudeExtra.canFly;
|
|
case 6: return actor->genDudeExtra.canRecoil;
|
|
case 7: return actor->genDudeExtra.canSwim;
|
|
case 8: return actor->genDudeExtra.canWalk;
|
|
default: condError(pXCond, "Invalid argument %d", arg3); break;
|
|
}
|
|
break;
|
|
case 24: // compare weapon dispersion
|
|
return condCmp(actor->genDudeExtra.baseDispersion, arg1, arg2, cmpOp);
|
|
}
|
|
break;
|
|
default:
|
|
condError(pXCond, "Dude #%d is not a Custom Dude!", objIndex);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition #%d!", cond);
|
|
return false;
|
|
}
|
|
|
|
bool condCheckSprite(XSPRITE* pXCond, int cmpOp, bool PUSH) {
|
|
|
|
auto actor = &bloodActors[pXCond->reference];
|
|
int var = -1, var2 = -1, var3 = -1; PLAYER* pPlayer = NULL; bool retn = false;
|
|
int cond = pXCond->data1 - kCondSpriteBase; int arg1 = pXCond->data2;
|
|
int arg2 = pXCond->data3; int arg3 = pXCond->data4;
|
|
|
|
int objType = -1; int objIndex = -1;
|
|
condUnserialize(pXCond->targetX, &objType, &objIndex);
|
|
|
|
if (objType != OBJ_SPRITE || !spriRangeIsFine(objIndex))
|
|
condError(pXCond, "Object #%d (objType: %d) is not a sprite!", cond, objIndex, objType);
|
|
|
|
spritetype* pSpr = &sprite[objIndex];
|
|
XSPRITE* pXSpr = (xspriRangeIsFine(pSpr->extra)) ? &xsprite[pSpr->extra] : NULL;
|
|
DBloodActor* spractor = &bloodActors[pXSpr->reference];
|
|
|
|
if (cond < (kCondRange >> 1)) {
|
|
switch (cond) {
|
|
default: break;
|
|
case 0: return condCmp((pSpr->ang & 2047), arg1, arg2, cmpOp);
|
|
case 5: return condCmp(pSpr->statnum, arg1, arg2, cmpOp);
|
|
case 6: return ((pSpr->flags & kHitagRespawn) || pSpr->statnum == kStatRespawn);
|
|
case 7: return condCmp(spriteGetSlope(pSpr), arg1, arg2, cmpOp);
|
|
case 10: return condCmp(pSpr->clipdist, arg1, arg2, cmpOp);
|
|
case 15:
|
|
if (!spriRangeIsFine(pSpr->owner)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, pSpr->owner);
|
|
return true;
|
|
case 20: // stays in a sector?
|
|
if (!sectRangeIsFine(pSpr->sectnum)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, pSpr->sectnum);
|
|
return true;
|
|
case 25:
|
|
switch (arg1) {
|
|
case 0: return (xvel[pSpr->index] || yvel[pSpr->index] || zvel[pSpr->index]);
|
|
case 1: return (xvel[pSpr->index]);
|
|
case 2: return (yvel[pSpr->index]);
|
|
case 3: return (zvel[pSpr->index]);
|
|
}
|
|
break;
|
|
case 30:
|
|
if (!spriteIsUnderwater(spractor) && !spriteIsUnderwater(spractor, true)) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, pSpr->sectnum);
|
|
return true;
|
|
case 31:
|
|
if (arg1 == -1) {
|
|
for (var = 0; var < kDmgMax; var++) {
|
|
if (!nnExtIsImmune(spractor, arg1, 0))
|
|
return false;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
return nnExtIsImmune(spractor, arg1, 0);
|
|
case 35: // hitscan: ceil?
|
|
case 36: // hitscan: floor?
|
|
case 37: // hitscan: wall?
|
|
case 38: // hitscan: sprite?
|
|
switch (arg1) {
|
|
case 0: arg1 = CLIPMASK0 | CLIPMASK1; break;
|
|
case 1: arg1 = CLIPMASK0; break;
|
|
case 2: arg1 = CLIPMASK1; break;
|
|
}
|
|
|
|
if ((pPlayer = getPlayerById(pSpr->type)) != NULL)
|
|
var = HitScan(pSpr, pPlayer->zWeapon, pPlayer->aim.dx, pPlayer->aim.dy, pPlayer->aim.dz, arg1, arg3 << 1);
|
|
else if (IsDudeSprite(pSpr))
|
|
var = HitScan(pSpr, pSpr->z, bcos(pSpr->ang), bsin(pSpr->ang), (!spractor->hasX()) ? 0 : spractor->dudeSlope, arg1, arg3 << 1);
|
|
else if ((var2 & CSTAT_SPRITE_ALIGNMENT_MASK) == CSTAT_SPRITE_ALIGNMENT_FLOOR) {
|
|
|
|
var3 = (var2 & 0x0008) ? 0x10000 << 1 : -(0x10000 << 1);
|
|
var = HitScan(pSpr, pSpr->z, Cos(pSpr->ang) >> 16, Sin(pSpr->ang) >> 16, var3, arg1, arg3 << 1);
|
|
|
|
} else {
|
|
|
|
var = HitScan(pSpr, pSpr->z, bcos(pSpr->ang), bsin(pSpr->ang), 0, arg1, arg3 << 1);
|
|
|
|
}
|
|
|
|
if (var >= 0) {
|
|
|
|
switch (cond) {
|
|
case 35: retn = (var == 1); break;
|
|
case 36: retn = (var == 2); break;
|
|
case 37: retn = (var == 0 || var == 4); break;
|
|
case 38: retn = (var == 3); break;
|
|
}
|
|
|
|
if (!PUSH) return retn;
|
|
switch (var) {
|
|
case 0: case 4: condPush(pXCond, OBJ_WALL, gHitInfo.hitwall); break;
|
|
case 1: case 2: condPush(pXCond, OBJ_SECTOR, gHitInfo.hitsect); break;
|
|
case 3: condPush(pXCond, OBJ_SPRITE, gHitInfo.hitactor? gHitInfo.hitactor->s().index : -1); break;
|
|
}
|
|
|
|
}
|
|
return retn;
|
|
case 45: // this sprite is a target of some dude?
|
|
int nSprite;
|
|
StatIterator it(kStatDude);
|
|
while ((nSprite = it.NextIndex()) >= 0)
|
|
{
|
|
if (pSpr->index == nSprite) continue;
|
|
|
|
spritetype* pDude = &sprite[nSprite];
|
|
if (IsDudeSprite(pDude) && xspriRangeIsFine(pDude->extra)) {
|
|
XSPRITE* pXDude = &xsprite[pDude->extra];
|
|
if (pXDude->health <= 0 || pXDude->target_i != pSpr->index) continue;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, nSprite);
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
} else if (pXSpr) {
|
|
switch (cond) {
|
|
default: break;
|
|
case 50: // compare hp (in %)
|
|
if (IsDudeSprite(pSpr)) var = (pXSpr->sysData2 > 0) ? ClipRange(pXSpr->sysData2 << 4, 1, 65535) : getDudeInfo(pSpr->type)->startHealth << 4;
|
|
else if (pSpr->type == kThingBloodChunks) return condCmp(0, arg1, arg2, cmpOp);
|
|
else if (pSpr->type >= kThingBase && pSpr->type < kThingMax) var = thingInfo[pSpr->type - kThingBase].startHealth << 4;
|
|
return condCmp((kPercFull * pXSpr->health) / ClipLow(var, 1), arg1, arg2, cmpOp);
|
|
case 55: // touching ceil of sector?
|
|
if (gSpriteHit[pSpr->extra].ceilhit.type != kHitSector) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, gSpriteHit[pSpr->extra].ceilhit.index);
|
|
return true;
|
|
case 56: // touching floor of sector?
|
|
if (gSpriteHit[pSpr->extra].florhit.type != kHitSector) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SECTOR, gSpriteHit[pSpr->extra].florhit.index);
|
|
return true;
|
|
case 57: // touching walls of sector?
|
|
if (gSpriteHit[pSpr->extra].hit.type != kHitWall) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_WALL, gSpriteHit[pSpr->extra].hit.index);
|
|
return true;
|
|
case 58: // touching another sprite?
|
|
{
|
|
DBloodActor* actorvar = nullptr;
|
|
switch (arg3) {
|
|
case 0:
|
|
case 1:
|
|
if (gSpriteHit[pSpr->extra].florhit.type == kHitSprite) actorvar = gSpriteHit[pSpr->extra].florhit.actor;
|
|
if (arg3 || var >= 0) break;
|
|
[[fallthrough]];
|
|
case 2:
|
|
if (gSpriteHit[pSpr->extra].hit.type == kHitSprite) actorvar = gSpriteHit[pSpr->extra].hit.actor;
|
|
if (arg3 || var >= 0) break;
|
|
[[fallthrough]];
|
|
case 3:
|
|
if (gSpriteHit[pSpr->extra].ceilhit.type == kHitSprite) actorvar = gSpriteHit[pSpr->extra].ceilhit.actor;
|
|
break;
|
|
}
|
|
if (actorvar == nullptr)
|
|
{
|
|
// check if something touching this sprite
|
|
for (int i = kMaxXSprites - 1, idx = i; i > 0; idx = xsprite[--i].reference)
|
|
{
|
|
if (idx < 0 || (sprite[idx].flags & kHitagRespawn)) continue;
|
|
auto iactor = &bloodActors[idx];
|
|
auto objactor = &bloodActors[objIndex];
|
|
auto& hit = gSpriteHit[i];
|
|
switch (arg3) {
|
|
case 0:
|
|
case 1:
|
|
if (hit.ceilhit.type == kHitSprite && hit.ceilhit.actor == objactor) actorvar = iactor;
|
|
if (arg3 || actorvar) break;
|
|
[[fallthrough]];
|
|
case 2:
|
|
if (hit.hit.type == kHitSprite && hit.hit.actor == objactor) actorvar = iactor;
|
|
if (arg3 || actorvar) break;
|
|
[[fallthrough]];
|
|
case 3:
|
|
if (hit.florhit.type == kHitSprite && hit.florhit.actor == objactor) actorvar = iactor;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
if (actorvar == nullptr) return false;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, actorvar->s().index);
|
|
return true;
|
|
}
|
|
case 65: // compare burn time (in %)
|
|
var = (IsDudeSprite(pSpr)) ? 2400 : 1200;
|
|
if (!condCmp((kPercFull * pXSpr->burnTime) / var, arg1, arg2, cmpOp)) return false;
|
|
else if (PUSH && spriRangeIsFine(pXSpr->burnSource)) condPush(pXCond, OBJ_SPRITE, pXSpr->burnSource);
|
|
return true;
|
|
case 66: // any flares stuck in this sprite?
|
|
{
|
|
int nSprite;
|
|
StatIterator it(kStatFlare);
|
|
while ((nSprite = it.NextIndex()) >= 0)
|
|
{
|
|
spritetype* pFlare = &sprite[nSprite];
|
|
if (!xspriRangeIsFine(pFlare->extra) || (pFlare->flags & kHitagFree))
|
|
continue;
|
|
|
|
XSPRITE* pXFlare = &xsprite[pFlare->extra];
|
|
if (!spriRangeIsFine(pXFlare->target_i) || pXFlare->target_i != objIndex) continue;
|
|
else if (PUSH) condPush(pXCond, OBJ_SPRITE, nSprite);
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
case 70:
|
|
return condCmp(getSpriteMassBySize(spractor), arg1, arg2, cmpOp); // mass of the sprite in a range?
|
|
}
|
|
} else {
|
|
switch (cond) {
|
|
default: return false;
|
|
case 50:
|
|
case 65:
|
|
case 70:
|
|
return condCmp(0, arg1, arg2, cmpOp);
|
|
}
|
|
}
|
|
|
|
condError(pXCond, "Unexpected condition id (%d)!", cond);
|
|
return false;
|
|
}
|
|
|
|
// this updates index of object in all conditions
|
|
void condUpdateObjectIndex(int objType, int oldIndex, int newIndex)
|
|
{
|
|
// this only gets called for player respawns
|
|
auto oldActor = &bloodActors[oldIndex];
|
|
auto newActor = &bloodActors[newIndex];
|
|
|
|
// update index in tracking conditions first
|
|
for (int i = 0; i < gTrackingCondsCount; i++)
|
|
{
|
|
|
|
TRCONDITION* pCond = &gCondition[i];
|
|
for (unsigned k = 0; k < pCond->length; k++)
|
|
{
|
|
if (pCond->obj[k].type != objType || pCond->obj[k].actor != oldActor) continue;
|
|
pCond->obj[k].actor = newActor;
|
|
break;
|
|
}
|
|
}
|
|
|
|
// puke...
|
|
int oldSerial = condSerialize(objType, oldIndex);
|
|
int newSerial = condSerialize(objType, newIndex);
|
|
|
|
// then update serials
|
|
int nSpr;
|
|
StatIterator it(kStatModernCondition);
|
|
while ((nSpr = it.NextIndex()) >= 0)
|
|
{
|
|
XSPRITE* pXCond = &xsprite[sprite[nSpr].extra];
|
|
if (pXCond->targetX == oldSerial) pXCond->targetX = newSerial;
|
|
if (pXCond->targetY == oldSerial) pXCond->targetY = newSerial;
|
|
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool modernTypeSetSpriteState(DBloodActor* actor, int nState)
|
|
{
|
|
auto pXSprite = &actor->x();
|
|
|
|
if ((pXSprite->busy & 0xffff) == 0 && pXSprite->state == nState)
|
|
return false;
|
|
|
|
pXSprite->busy = IntToFixed(nState);
|
|
pXSprite->state = nState;
|
|
|
|
evKillActor(actor);
|
|
if (pXSprite->restState != nState && pXSprite->waitTime > 0)
|
|
evPostActor(actor, (pXSprite->waitTime * 120) / 10, pXSprite->restState ? kCmdOn : kCmdOff);
|
|
|
|
if (pXSprite->txID != 0 && ((pXSprite->triggerOn && pXSprite->state) || (pXSprite->triggerOff && !pXSprite->state)))
|
|
modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
|
|
return true;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void modernTypeSendCommand(DBloodActor* actor, int destChannel, COMMAND_ID command)
|
|
{
|
|
switch (command)
|
|
{
|
|
case kCmdLink:
|
|
evSendActor(actor, destChannel, kCmdModernUse); // just send command to change properties
|
|
return;
|
|
case kCmdUnlock:
|
|
evSendActor(actor, destChannel, command); // send normal command first
|
|
evSendActor(actor, destChannel, kCmdModernUse); // then send command to change properties
|
|
return;
|
|
default:
|
|
evSendActor(actor, destChannel, kCmdModernUse); // send first command to change properties
|
|
evSendActor(actor, destChannel, command); // then send normal command
|
|
return;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function used by various new modern types.
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void modernTypeTrigger(int destObjType, int destObjIndex, DBloodActor* destactor, const EVENT& event)
|
|
{
|
|
if (event.type != OBJ_SPRITE || !event.actor || !event.actor->hasX()) return;
|
|
spritetype* pSource = &event.actor->s();
|
|
XSPRITE* pXSource = &event.actor->x();
|
|
|
|
switch (destObjType) {
|
|
case OBJ_SECTOR:
|
|
if (!xsectRangeIsFine(sector[destObjIndex].extra)) return;
|
|
break;
|
|
case OBJ_WALL:
|
|
if (!xwallRangeIsFine(wall[destObjIndex].extra)) return;
|
|
break;
|
|
case OBJ_SPRITE:
|
|
{
|
|
if (!destactor) return;
|
|
auto pSpr = &destactor->s();
|
|
if (pSpr->flags & kHitagFree) return;
|
|
|
|
// allow redirect events received from some modern types.
|
|
// example: it allows to spawn FX effect if event was received from kModernEffectGen
|
|
// on many TX channels instead of just one.
|
|
switch (pSpr->type)
|
|
{
|
|
case kModernRandomTX:
|
|
case kModernSequentialTX:
|
|
XSPRITE* pXSpr = &destactor->x();
|
|
if (pXSpr->command != kCmdLink || pXSpr->locked) break; // no redirect mode detected
|
|
switch (pSpr->type)
|
|
{
|
|
case kModernRandomTX:
|
|
useRandomTx(destactor, (COMMAND_ID)pXSource->command, false); // set random TX id
|
|
break;
|
|
case kModernSequentialTX:
|
|
if (pSpr->flags & kModernTypeFlag1)
|
|
{
|
|
seqTxSendCmdAll(destactor, event.actor, (COMMAND_ID)pXSource->command, true);
|
|
return;
|
|
}
|
|
useSequentialTx(destactor, (COMMAND_ID)pXSource->command, false); // set next TX id
|
|
break;
|
|
}
|
|
if (pXSpr->txID <= 0 || pXSpr->txID >= kChannelUserMax) return;
|
|
modernTypeSendCommand(event.actor, pXSpr->txID, (COMMAND_ID)pXSource->command);
|
|
return;
|
|
}
|
|
break;
|
|
}
|
|
default:
|
|
return;
|
|
}
|
|
|
|
switch (pSource->type)
|
|
{
|
|
// allows teleport any sprite from any location to the source destination
|
|
case kMarkerWarpDest:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useTeleportTarget(event.actor, destactor);
|
|
break;
|
|
// changes slope of sprite or sector
|
|
case kModernSlopeChanger:
|
|
switch (destObjType)
|
|
{
|
|
case OBJ_SPRITE:
|
|
case OBJ_SECTOR:
|
|
useSlopeChanger(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
}
|
|
break;
|
|
case kModernSpriteDamager:
|
|
// damages xsprite via TX ID or xsprites in a sector
|
|
switch (destObjType)
|
|
{
|
|
case OBJ_SPRITE:
|
|
case OBJ_SECTOR:
|
|
useSpriteDamager(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
}
|
|
break;
|
|
// can spawn any effect passed in data2 on it's or txID sprite
|
|
case kModernEffectSpawner:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useEffectGen(event.actor, destactor);
|
|
break;
|
|
// takes data2 as SEQ ID and spawns it on it's or TX ID object
|
|
case kModernSeqSpawner:
|
|
useSeqSpawnerGen(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
// creates wind on TX ID sector
|
|
case kModernWindGenerator:
|
|
if (destObjType != OBJ_SECTOR || pXSource->data2 < 0) break;
|
|
useSectorWindGen(event.actor, §or[destObjIndex]);
|
|
break;
|
|
// size and pan changer of sprite/wall/sector via TX ID
|
|
case kModernObjSizeChanger:
|
|
useObjResizer(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
// iterate data filed value of destination object
|
|
case kModernObjDataAccumulator:
|
|
useIncDecGen(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
// change data field value of destination object
|
|
case kModernObjDataChanger:
|
|
useDataChanger(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
// change sector lighting dynamically
|
|
case kModernSectorFXChanger:
|
|
if (destObjType != OBJ_SECTOR) break;
|
|
useSectorLigthChanger(event.actor, &xsector[sector[destObjIndex].extra]);
|
|
break;
|
|
// change target of dudes and make it fight
|
|
case kModernDudeTargetChanger:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useTargetChanger(event.actor, destactor);
|
|
break;
|
|
// change picture and palette of TX ID object
|
|
case kModernObjPicnumChanger:
|
|
usePictureChanger(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
// change various properties
|
|
case kModernObjPropertiesChanger:
|
|
usePropertiesChanger(event.actor, destObjType, destObjIndex, destactor);
|
|
break;
|
|
// updated vanilla sound gen that now allows to play sounds on TX ID sprites
|
|
case kGenModernSound:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useSoundGen(event.actor, destactor);
|
|
break;
|
|
// updated ecto skull gen that allows to fire missile from TX ID sprites
|
|
case kGenModernMissileUniversal:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useUniMissileGen(event.actor, destactor);
|
|
break;
|
|
// spawn enemies on TX ID sprites
|
|
case kMarkerDudeSpawn:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useDudeSpawn(event.actor, destactor);
|
|
break;
|
|
// spawn custom dude on TX ID sprites
|
|
case kModernCustomDudeSpawn:
|
|
if (destObjType != OBJ_SPRITE) break;
|
|
useCustomDudeSpawn(event.actor, destactor);
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// the following functions required for kModernDudeTargetChanger
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DBloodActor* aiFightGetTargetInRange(DBloodActor* actor, int minDist, int maxDist, int data, int teamMode)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
XSPRITE* pXSprite = &actor->x();
|
|
|
|
DUDEINFO* pDudeInfo = getDudeInfo(pSprite->type);
|
|
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto targactor = it.Next())
|
|
{
|
|
if (!aiFightDudeCanSeeTarget(actor, pDudeInfo, targactor)) continue;
|
|
|
|
auto pTarget = &targactor->s();
|
|
auto pXTarget = &targactor->x();
|
|
|
|
int dist = aiFightGetTargetDist(actor, pDudeInfo, targactor);
|
|
if (dist < minDist || dist > maxDist) continue;
|
|
else if (actor->GetTarget() == targactor) return targactor;
|
|
else if (!targactor->IsDudeActor() || targactor == actor || targactor->IsPlayerActor()) continue;
|
|
else if (IsBurningDude(targactor) || !IsKillableDude(targactor) || targactor->GetOwner() == actor) continue;
|
|
else if ((teamMode == 1 && pXSprite->rxID == pXTarget->rxID) || aiFightMatesHaveSameTarget(actor, targactor, 1)) continue;
|
|
else if (data == 666 || pXTarget->data1 == data)
|
|
{
|
|
if (actor->GetTarget())
|
|
{
|
|
int fineDist1 = aiFightGetFineTargetDist(actor, actor->GetTarget());
|
|
int fineDist2 = aiFightGetFineTargetDist(actor, targactor);
|
|
if (fineDist1 < fineDist2)
|
|
continue;
|
|
}
|
|
return targactor;
|
|
}
|
|
}
|
|
return nullptr;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DBloodActor* aiFightTargetIsPlayer(DBloodActor* actor)
|
|
{
|
|
auto targ = actor->GetTarget();
|
|
if (targ && targ->IsPlayerActor()) return targ;
|
|
return nullptr;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DBloodActor* aiFightGetMateTargets(DBloodActor* actor)
|
|
{
|
|
auto pXSprite = &actor->x();
|
|
int rx = pXSprite->rxID;
|
|
|
|
for (int i = bucketHead[rx]; i < bucketHead[rx + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type == OBJ_SPRITE)
|
|
{
|
|
auto mate = rxBucket[i].GetActor();
|
|
if (!mate || !mate->hasX() || mate == actor || !mate->IsDudeActor())
|
|
continue;
|
|
|
|
if (mate->GetTarget())
|
|
{
|
|
if (!mate->GetTarget()->IsPlayerActor())
|
|
return mate->GetTarget();
|
|
}
|
|
}
|
|
}
|
|
return nullptr;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool aiFightMatesHaveSameTarget(DBloodActor* leaderactor, DBloodActor* targetactor, int allow)
|
|
{
|
|
auto pXLeader = &leaderactor->x();
|
|
int rx = pXLeader->rxID;
|
|
|
|
for (int i = bucketHead[rx]; i < bucketHead[rx + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SPRITE)
|
|
continue;
|
|
|
|
auto mate = rxBucket[i].actor;
|
|
if (!mate || !mate->hasX() || mate == leaderactor || !mate->IsDudeActor())
|
|
continue;
|
|
|
|
if (mate->GetTarget() == targetactor && allow-- <= 0)
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool aiFightDudeCanSeeTarget(DBloodActor* dudeactor, DUDEINFO* pDudeInfo, DBloodActor* targetactor)
|
|
{
|
|
auto pDude = &dudeactor->s();
|
|
auto pXDude = &dudeactor->x();
|
|
auto pTarget = &targetactor->s();
|
|
|
|
int dx = pTarget->x - pDude->x; int dy = pTarget->y - pDude->y;
|
|
|
|
// check target
|
|
if (approxDist(dx, dy) < pDudeInfo->seeDist)
|
|
{
|
|
int eyeAboveZ = pDudeInfo->eyeHeight * pDude->yrepeat << 2;
|
|
|
|
// is there a line of sight to the target?
|
|
if (cansee(pDude->x, pDude->y, pDude->z, pDude->sectnum, pTarget->x, pTarget->y, pTarget->z - eyeAboveZ, pTarget->sectnum))
|
|
{
|
|
/*int nAngle = getangle(dx, dy);
|
|
int losAngle = ((1024 + nAngle - pDude->ang) & 2047) - 1024;
|
|
|
|
// is the target visible?
|
|
if (abs(losAngle) < 2048) // 360 deg periphery here*/
|
|
return true;
|
|
}
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function required if monsters in genIdle ai state. It wakes up monsters
|
|
// when kModernDudeTargetChanger goes to off state, so they won't ignore the world.
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiFightActivateDudes(int rx)
|
|
{
|
|
for (int i = bucketHead[rx]; i < bucketHead[rx + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SPRITE) continue;
|
|
auto dudeactor = rxBucket[i].GetActor();
|
|
if (!dudeactor || !dudeactor->hasX() || !dudeactor->IsDudeActor() || dudeactor->x().aiState->stateType != kAiStateGenIdle) continue;
|
|
aiInitSprite(dudeactor);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function sets target to -1 for all dudes that hunting for nSprite
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiFightFreeTargets(DBloodActor* actor)
|
|
{
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto targetactor = it.Next())
|
|
{
|
|
if (!targetactor->IsDudeActor() || !targetactor->hasX()) continue;
|
|
else if (targetactor->GetTarget() == actor)
|
|
aiSetTarget(targetactor, targetactor->s().x, targetactor->s().y, targetactor->s().z);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function sets target to -1 for all targets that hunting for dudes affected by selected kModernDudeTargetChanger
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiFightFreeAllTargets(DBloodActor* sourceactor)
|
|
{
|
|
auto txID = sourceactor->x().txID;
|
|
if (txID <= 0) return;
|
|
for (int i = bucketHead[txID]; i < bucketHead[txID + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type == OBJ_SPRITE && rxBucket[i].actor && rxBucket[i].actor->hasX())
|
|
aiFightFreeTargets(rxBucket[i].actor);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool aiFightDudeIsAffected(DBloodActor* dudeactor)
|
|
{
|
|
auto pXDude = &dudeactor->x();
|
|
if (pXDude->rxID <= 0 || pXDude->locked == 1) return false;
|
|
BloodStatIterator it(kStatModernDudeTargetChanger);
|
|
while (auto actor = it.Next())
|
|
{
|
|
if (!actor->hasX()) continue;
|
|
XSPRITE* pXSprite = &actor->x();
|
|
if (pXSprite->txID <= 0 || pXSprite->state != 1) continue;
|
|
for (int i = bucketHead[pXSprite->txID]; i < bucketHead[pXSprite->txID + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SPRITE) continue;
|
|
|
|
auto rxactor = rxBucket[i].actor;
|
|
if (!rxactor || !rxactor->hasX() || !rxactor->IsDudeActor()) continue;
|
|
else if (rxactor == dudeactor) return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// this function tells if there any dude found for kModernDudeTargetChanger
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool aiFightGetDudesForBattle(DBloodActor* actor)
|
|
{
|
|
auto txID = actor->x().txID;
|
|
for (int i = bucketHead[txID]; i < bucketHead[txID + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SPRITE) continue;
|
|
auto actor = rxBucket[i].GetActor();
|
|
if (!actor || !actor->hasX() || !actor->IsDudeActor()) continue;
|
|
if (actor->x().health > 0) return true;
|
|
}
|
|
|
|
// check redirected TX buckets
|
|
int rx = -1;
|
|
XSPRITE* pXRedir = NULL;
|
|
while ((pXRedir = evrListRedirectors(OBJ_SPRITE, actor->s().extra, pXRedir, &rx)) != NULL)
|
|
{
|
|
for (int i = bucketHead[rx]; i < bucketHead[rx + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type != OBJ_SPRITE) continue;
|
|
auto actor = rxBucket[i].GetActor();
|
|
if (!actor || !actor->hasX() || !actor->IsDudeActor()) continue;
|
|
if (actor->x().health > 0) return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiFightAlarmDudesInSight(DBloodActor* actor, int max)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
auto pSXprite = &actor->x();
|
|
|
|
DUDEINFO* pDudeInfo = getDudeInfo(pSprite->type);
|
|
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto dudeactor = it.Next())
|
|
{
|
|
if (dudeactor == actor || !dudeactor->IsDudeActor() || !dudeactor->hasX())
|
|
continue;
|
|
|
|
if (aiFightDudeCanSeeTarget(actor, pDudeInfo, dudeactor))
|
|
{
|
|
if (dudeactor->GetTarget() != nullptr || dudeactor->x().rxID > 0)
|
|
continue;
|
|
|
|
auto pDude = &dudeactor->s();
|
|
aiSetTarget(dudeactor, pDude->x, pDude->y, pDude->z);
|
|
aiActivateDude(dudeactor);
|
|
if (max-- < 1)
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool aiFightUnitCanFly(DBloodActor* dude)
|
|
{
|
|
return (dude->IsDudeActor() && gDudeInfoExtra[dude->s().type - kDudeBase].flying);
|
|
}
|
|
|
|
bool aiFightIsMeleeUnit(DBloodActor* dude)
|
|
{
|
|
if (dude->s().type == kDudeModernCustom) return (dude->hasX() && dudeIsMelee(dude));
|
|
else return (dude->IsDudeActor() && gDudeInfoExtra[dude->s().type - kDudeBase].melee);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int aiFightGetTargetDist(DBloodActor* actor, DUDEINFO* pDudeInfo, DBloodActor* target)
|
|
{
|
|
int dx = target->s().x - actor->s().x;
|
|
int dy = target->s().y - actor->s().y;
|
|
|
|
int dist = approxDist(dx, dy);
|
|
if (dist <= pDudeInfo->meleeDist) return 0;
|
|
if (dist >= pDudeInfo->seeDist) return 13;
|
|
if (dist <= pDudeInfo->seeDist / 12) return 1;
|
|
if (dist <= pDudeInfo->seeDist / 11) return 2;
|
|
if (dist <= pDudeInfo->seeDist / 10) return 3;
|
|
if (dist <= pDudeInfo->seeDist / 9) return 4;
|
|
if (dist <= pDudeInfo->seeDist / 8) return 5;
|
|
if (dist <= pDudeInfo->seeDist / 7) return 6;
|
|
if (dist <= pDudeInfo->seeDist / 6) return 7;
|
|
if (dist <= pDudeInfo->seeDist / 5) return 8;
|
|
if (dist <= pDudeInfo->seeDist / 4) return 9;
|
|
if (dist <= pDudeInfo->seeDist / 3) return 10;
|
|
if (dist <= pDudeInfo->seeDist / 2) return 11;
|
|
return 12;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int aiFightGetFineTargetDist(DBloodActor* actor, DBloodActor* target)
|
|
{
|
|
int dx = target->s().x - actor->s().x;
|
|
int dy = target->s().y - actor->s().y;
|
|
|
|
int dist = approxDist(dx, dy);
|
|
return dist;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int sectorInMotion(int nSector)
|
|
{
|
|
|
|
for (int i = 0; i < kMaxBusyCount; i++)
|
|
{
|
|
if (gBusy->index == nSector) return i;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void sectorKillSounds(int nSector)
|
|
{
|
|
BloodSectIterator it(nSector);
|
|
while (auto actor = it.Next())
|
|
{
|
|
if (actor->s().type != kSoundSector) continue;
|
|
sfxKill3DSound(actor);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void sectorPauseMotion(int nSector)
|
|
{
|
|
if (!xsectRangeIsFine(sector[nSector].extra)) return;
|
|
XSECTOR* pXSector = &xsector[sector[nSector].extra];
|
|
pXSector->unused1 = 1;
|
|
|
|
evKillSector(nSector);
|
|
|
|
sectorKillSounds(nSector);
|
|
if ((pXSector->busy == 0 && !pXSector->state) || (pXSector->busy == 65536 && pXSector->state))
|
|
SectorEndSound(nSector, xsector[sector[nSector].extra].state);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void sectorContinueMotion(int nSector, EVENT event)
|
|
{
|
|
if (!xsectRangeIsFine(sector[nSector].extra)) return;
|
|
else if (gBusyCount >= kMaxBusyCount)
|
|
{
|
|
Printf(PRINT_HIGH, "Failed to continue motion for sector #%d. Max (%d) busy objects count reached!", nSector, kMaxBusyCount);
|
|
return;
|
|
}
|
|
|
|
XSECTOR* pXSector = &xsector[sector[nSector].extra];
|
|
pXSector->unused1 = 0;
|
|
|
|
int busyTimeA = pXSector->busyTimeA;
|
|
int waitTimeA = pXSector->waitTimeA;
|
|
int busyTimeB = pXSector->busyTimeB;
|
|
int waitTimeB = pXSector->waitTimeB;
|
|
if (sector[nSector].type == kSectorPath)
|
|
{
|
|
if (!spriRangeIsFine(pXSector->marker0)) return;
|
|
busyTimeA = busyTimeB = xsprite[sprite[pXSector->marker0].extra].busyTime;
|
|
waitTimeA = waitTimeB = xsprite[sprite[pXSector->marker0].extra].waitTime;
|
|
}
|
|
|
|
if (!pXSector->interruptable && event.cmd != kCmdSectorMotionContinue
|
|
&& ((!pXSector->state && pXSector->busy) || (pXSector->state && pXSector->busy != 65536)))
|
|
{
|
|
event.cmd = kCmdSectorMotionContinue;
|
|
}
|
|
else if (event.cmd == kCmdToggle)
|
|
{
|
|
event.cmd = (pXSector->state) ? kCmdOn : kCmdOff;
|
|
}
|
|
|
|
//viewSetSystemMessage("%d / %d", pXSector->busy, pXSector->state);
|
|
|
|
int nDelta = 1;
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSector->busy == 0)
|
|
{
|
|
if (pXSector->reTriggerB && waitTimeB) evPostSector(nSector, (waitTimeB * 120) / 10, kCmdOff);
|
|
return;
|
|
}
|
|
pXSector->state = 1;
|
|
nDelta = 65536 / ClipLow((busyTimeB * 120) / 10, 1);
|
|
break;
|
|
|
|
case kCmdOn:
|
|
if (pXSector->busy == 65536)
|
|
{
|
|
if (pXSector->reTriggerA && waitTimeA) evPostSector(nSector, (waitTimeA * 120) / 10, kCmdOn);
|
|
return;
|
|
}
|
|
pXSector->state = 0;
|
|
nDelta = 65536 / ClipLow((busyTimeA * 120) / 10, 1);
|
|
break;
|
|
|
|
case kCmdSectorMotionContinue:
|
|
nDelta = 65536 / ClipLow((((pXSector->state) ? busyTimeB : busyTimeA) * 120) / 10, 1);
|
|
break;
|
|
}
|
|
|
|
//bool crush = pXSector->Crush;
|
|
int busyFunc = BUSYID_0;
|
|
switch (sector[nSector].type)
|
|
{
|
|
case kSectorZMotion:
|
|
busyFunc = BUSYID_2;
|
|
break;
|
|
case kSectorZMotionSprite:
|
|
busyFunc = BUSYID_1;
|
|
break;
|
|
case kSectorSlideMarked:
|
|
case kSectorSlide:
|
|
busyFunc = BUSYID_3;
|
|
break;
|
|
case kSectorRotateMarked:
|
|
case kSectorRotate:
|
|
busyFunc = BUSYID_4;
|
|
break;
|
|
case kSectorRotateStep:
|
|
busyFunc = BUSYID_5;
|
|
break;
|
|
case kSectorPath:
|
|
busyFunc = BUSYID_7;
|
|
break;
|
|
default:
|
|
I_Error("Unsupported sector type %d", sector[nSector].type);
|
|
break;
|
|
}
|
|
|
|
SectorStartSound(nSector, pXSector->state);
|
|
nDelta = (pXSector->state) ? -nDelta : nDelta;
|
|
gBusy[gBusyCount].index = nSector;
|
|
gBusy[gBusyCount].delta = nDelta;
|
|
gBusy[gBusyCount].busy = pXSector->busy;
|
|
gBusy[gBusyCount].type = (BUSYID)busyFunc;
|
|
gBusyCount++;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool modernTypeOperateSector(int nSector, sectortype* pSector, XSECTOR* pXSector, const EVENT& event)
|
|
{
|
|
if (event.cmd >= kCmdLock && event.cmd <= kCmdToggleLock)
|
|
{
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdLock:
|
|
pXSector->locked = 1;
|
|
break;
|
|
case kCmdUnlock:
|
|
pXSector->locked = 0;
|
|
break;
|
|
case kCmdToggleLock:
|
|
pXSector->locked = pXSector->locked ^ 1;
|
|
break;
|
|
}
|
|
|
|
switch (pSector->type)
|
|
{
|
|
case kSectorCounter:
|
|
if (pXSector->locked != 1) break;
|
|
SetSectorState(nSector, pXSector, 0);
|
|
evPostSector(nSector, 0, kCallbackCounterCheck);
|
|
break;
|
|
}
|
|
return true;
|
|
|
|
// continue motion of the paused sector
|
|
}
|
|
else if (pXSector->unused1)
|
|
{
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
case kCmdOn:
|
|
case kCmdToggle:
|
|
case kCmdSectorMotionContinue:
|
|
sectorContinueMotion(nSector, event);
|
|
return true;
|
|
}
|
|
|
|
// pause motion of the sector
|
|
}
|
|
else if (event.cmd == kCmdSectorMotionPause)
|
|
{
|
|
sectorPauseMotion(nSector);
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useCustomDudeSpawn(DBloodActor* pSource, DBloodActor* pSprite)
|
|
{
|
|
genDudeSpawn(pSource, pSprite, pSprite->s().clipdist << 1);
|
|
}
|
|
|
|
void useDudeSpawn(DBloodActor* pSource, DBloodActor* pSprite)
|
|
{
|
|
if (randomSpawnDude(pSource, pSprite, pSprite->s().clipdist << 1, 0) == nullptr)
|
|
nnExtSpawnDude(pSource, pSprite, pSource->x().data1, pSprite->s().clipdist << 1, 0);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool modernTypeOperateSprite(DBloodActor* actor, EVENT event)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
auto pXSprite = &actor->x();
|
|
|
|
if (event.cmd >= kCmdLock && event.cmd <= kCmdToggleLock)
|
|
{
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdLock:
|
|
pXSprite->locked = 1;
|
|
break;
|
|
case kCmdUnlock:
|
|
pXSprite->locked = 0;
|
|
break;
|
|
case kCmdToggleLock:
|
|
pXSprite->locked = pXSprite->locked ^ 1;
|
|
break;
|
|
}
|
|
|
|
switch (pSprite->type)
|
|
{
|
|
case kModernCondition:
|
|
case kModernConditionFalse:
|
|
pXSprite->restState = 0;
|
|
if (pXSprite->busyTime <= 0) break;
|
|
else if (!pXSprite->locked) pXSprite->busy = 0;
|
|
break;
|
|
}
|
|
return true;
|
|
}
|
|
else if (event.cmd == kCmdDudeFlagsSet)
|
|
{
|
|
if (event.type != OBJ_SPRITE)
|
|
{
|
|
viewSetSystemMessage("Only sprites can use command #%d", event.cmd);
|
|
return true;
|
|
|
|
}
|
|
else if (event.actor && event.actor->hasX())
|
|
{
|
|
|
|
// copy dude flags from the source to destination sprite
|
|
aiPatrolFlagsMgr(&event.actor->s(), &event.actor->x(), pSprite, pXSprite, true, false);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (pSprite->statnum == kStatDude && actor->IsDudeActor())
|
|
{
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSprite->state) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
if (!pXSprite->state) SetSpriteState(actor, 1);
|
|
if (!actor->IsDudeActor() || actor->IsPlayerActor() || pXSprite->health <= 0) break;
|
|
else if (pXSprite->aiState->stateType >= kAiStatePatrolBase && pXSprite->aiState->stateType < kAiStatePatrolMax)
|
|
break;
|
|
|
|
switch (pXSprite->aiState->stateType)
|
|
{
|
|
case kAiStateIdle:
|
|
case kAiStateGenIdle:
|
|
aiActivateDude(actor);
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case kCmdDudeFlagsSet:
|
|
if (!event.actor || !event.actor->hasX()) break;
|
|
else aiPatrolFlagsMgr(&event.actor->s(), &event.actor->x(), pSprite, pXSprite, false, true); // initialize patrol dude with possible new flags
|
|
break;
|
|
|
|
default:
|
|
if (!pXSprite->state) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
switch (pSprite->type)
|
|
{
|
|
default:
|
|
return false; // no modern type found to work with, go normal OperateSprite();
|
|
case kThingBloodBits:
|
|
case kThingBloodChunks:
|
|
// dude to thing morphing causing a lot of problems since it continues receiving commands after dude is dead.
|
|
// this leads to weird stuff like exploding with gargoyle gib or corpse disappearing immediately.
|
|
// let's allow only specific commands here to avoid this.
|
|
if (pSprite->inittype < kDudeBase || pSprite->inittype >= kDudeMax) return false;
|
|
else if (event.cmd != kCmdToggle && event.cmd != kCmdOff && event.cmd != kCmdSpriteImpact) return true;
|
|
DudeToGibCallback1(0, actor); // set proper gib type just in case DATAs was changed from the outside.
|
|
return false;
|
|
|
|
case kModernCondition:
|
|
case kModernConditionFalse:
|
|
if (!pXSprite->isTriggered) useCondition(actor, event);
|
|
return true;
|
|
|
|
// add spawn random dude feature - works only if at least 2 data fields are not empty.
|
|
case kMarkerDudeSpawn:
|
|
if (!gGameOptions.nMonsterSettings) return true;
|
|
else if (!(pSprite->flags & kModernTypeFlag4)) useDudeSpawn(actor, actor);
|
|
else if (pXSprite->txID) evSendActor(actor, pXSprite->txID, kCmdModernUse);
|
|
return true;
|
|
|
|
case kModernCustomDudeSpawn:
|
|
if (!gGameOptions.nMonsterSettings) return true;
|
|
else if (!(pSprite->flags & kModernTypeFlag4)) useCustomDudeSpawn(actor, actor);
|
|
else if (pXSprite->txID) evSendActor(actor, pXSprite->txID, kCmdModernUse);
|
|
return true;
|
|
|
|
case kModernRandomTX: // random Event Switch takes random data field and uses it as TX ID
|
|
case kModernSequentialTX: // sequential Switch takes values from data fields starting from data1 and uses it as TX ID
|
|
if (pXSprite->command == kCmdLink) return true; // work as event redirector
|
|
switch (pSprite->type)
|
|
{
|
|
case kModernRandomTX:
|
|
useRandomTx(actor, (COMMAND_ID)pXSprite->command, true);
|
|
break;
|
|
|
|
case kModernSequentialTX:
|
|
if (!(pSprite->flags & kModernTypeFlag1)) useSequentialTx(actor, (COMMAND_ID)pXSprite->command, true);
|
|
else seqTxSendCmdAll(actor, actor, (COMMAND_ID)pXSprite->command, false);
|
|
break;
|
|
}
|
|
return true;
|
|
|
|
case kModernSpriteDamager:
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
if (pXSprite->txID > 0) modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
else if (pXSprite->data1 == 0 && sectRangeIsFine(pSprite->sectnum)) useSpriteDamager(actor, OBJ_SECTOR, pSprite->sectnum, nullptr);
|
|
else if (pXSprite->data1 >= 666 && pXSprite->data1 < 669) useSpriteDamager(actor, -1, -1, nullptr);
|
|
else
|
|
{
|
|
PLAYER* pPlayer = getPlayerById(pXSprite->data1);
|
|
if (pPlayer != NULL)
|
|
useSpriteDamager(actor, OBJ_SPRITE, 0, pPlayer->actor());
|
|
}
|
|
|
|
if (pXSprite->busyTime > 0)
|
|
evPostActor(actor, pXSprite->busyTime, kCmdRepeat);
|
|
break;
|
|
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
|
|
case kMarkerWarpDest:
|
|
if (pXSprite->txID <= 0) {
|
|
|
|
PLAYER* pPlayer = getPlayerById(pXSprite->data1);
|
|
if (pPlayer != NULL && SetSpriteState(actor, pXSprite->state ^ 1) == 1)
|
|
useTeleportTarget(actor, pPlayer->actor());
|
|
return true;
|
|
}
|
|
[[fallthrough]];
|
|
case kModernObjPropertiesChanger:
|
|
if (pXSprite->txID <= 0)
|
|
{
|
|
if (SetSpriteState(actor, pXSprite->state ^ 1) == 1)
|
|
usePropertiesChanger(actor, -1, -1, nullptr);
|
|
return true;
|
|
}
|
|
[[fallthrough]];
|
|
case kModernSlopeChanger:
|
|
case kModernObjSizeChanger:
|
|
case kModernObjPicnumChanger:
|
|
case kModernSectorFXChanger:
|
|
case kModernObjDataChanger:
|
|
modernTypeSetSpriteState(actor, pXSprite->state ^ 1);
|
|
return true;
|
|
|
|
case kModernSeqSpawner:
|
|
case kModernEffectSpawner:
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
if (pSprite->type == kModernSeqSpawner) seqSpawnerOffSameTx(pXSprite);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
if (pXSprite->txID > 0) modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
else if (pSprite->type == kModernSeqSpawner) useSeqSpawnerGen(actor, 3, 0, actor);
|
|
else useEffectGen(actor, nullptr);
|
|
|
|
if (pXSprite->busyTime > 0)
|
|
evPostActor(actor, ClipLow((int(pXSprite->busyTime) + Random2(pXSprite->data1)) * 120 / 10, 0), kCmdRepeat);
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
|
|
case kModernWindGenerator:
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
windGenStopWindOnSectors(actor);
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
if (pXSprite->txID > 0) modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
else useSectorWindGen(actor, nullptr);
|
|
|
|
if (pXSprite->busyTime > 0) evPostActor(actor, pXSprite->busyTime, kCmdRepeat);
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
case kModernDudeTargetChanger:
|
|
|
|
// this one is required if data4 of generator was dynamically changed
|
|
// it turns monsters in normal idle state instead of genIdle, so they not ignore the world.
|
|
if (pXSprite->dropMsg == 3 && 3 != pXSprite->data4)
|
|
aiFightActivateDudes(pXSprite->txID);
|
|
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSprite->data4 == 3) aiFightActivateDudes(pXSprite->txID);
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
if (pXSprite->txID <= 0 || !aiFightGetDudesForBattle(actor))
|
|
{
|
|
aiFightFreeAllTargets(actor);
|
|
evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
else
|
|
{
|
|
modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
}
|
|
|
|
if (pXSprite->busyTime > 0) evPostActor(actor, pXSprite->busyTime, kCmdRepeat);
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
pXSprite->dropMsg = uint8_t(pXSprite->data4);
|
|
return true;
|
|
|
|
case kModernObjDataAccumulator:
|
|
switch (event.cmd) {
|
|
case kCmdOff:
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
// force OFF after *all* TX objects reach the goal value
|
|
if (pSprite->flags == kModernTypeFlag0 && incDecGoalValueIsReached(pXSprite))
|
|
{
|
|
evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
|
|
modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
if (pXSprite->busyTime > 0) evPostActor(actor, pXSprite->busyTime, kCmdRepeat);
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
case kModernRandom:
|
|
case kModernRandom2:
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
useRandomItemGen(actor);
|
|
if (pXSprite->busyTime > 0)
|
|
evPostActor(actor, (120 * pXSprite->busyTime) / 10, kCmdRepeat);
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
|
|
case kModernThingTNTProx:
|
|
if (pSprite->statnum != kStatRespawn)
|
|
{
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdSpriteProximity:
|
|
if (pXSprite->state) break;
|
|
sfxPlay3DSound(pSprite, 452, 0, 0);
|
|
evPostActor(actor, 30, kCmdOff);
|
|
pXSprite->state = 1;
|
|
[[fallthrough]];
|
|
case kCmdOn:
|
|
sfxPlay3DSound(pSprite, 451, 0, 0);
|
|
pXSprite->Proximity = 1;
|
|
break;
|
|
default:
|
|
actExplodeSprite(actor);
|
|
break;
|
|
}
|
|
}
|
|
return true;
|
|
case kModernThingEnemyLifeLeech:
|
|
dudeLeechOperate(actor, event);
|
|
return true;
|
|
case kModernPlayerControl: { // WIP
|
|
PLAYER* pPlayer = NULL; int cmd = (event.cmd >= kCmdNumberic) ? event.cmd : pXSprite->command;
|
|
if ((pPlayer = getPlayerById(pXSprite->data1)) == NULL
|
|
|| ((cmd < 67 || cmd > 68) && !modernTypeSetSpriteState(actor, pXSprite->state ^ 1)))
|
|
return true;
|
|
|
|
TRPLAYERCTRL* pCtrl = &gPlayerCtrl[pPlayer->nPlayer];
|
|
|
|
/// !!! COMMANDS OF THE CURRENT SPRITE, NOT OF THE EVENT !!! ///
|
|
if ((cmd -= kCmdNumberic) < 0) return true;
|
|
else if (pPlayer->pXSprite->health <= 0)
|
|
{
|
|
|
|
switch (cmd) {
|
|
case 36:
|
|
actHealDude(pPlayer->actor(), ((pXSprite->data2 > 0) ? ClipHigh(pXSprite->data2, 200) : getDudeInfo(pPlayer->pSprite->type)->startHealth), 200);
|
|
pPlayer->curWeapon = kWeapPitchFork;
|
|
break;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
switch (cmd)
|
|
{
|
|
case 0: // 64 (player life form)
|
|
if (pXSprite->data2 < kModeHuman || pXSprite->data2 > kModeHumanGrown) break;
|
|
else trPlayerCtrlSetRace(pXSprite->data2, pPlayer);
|
|
break;
|
|
case 1: // 65 (move speed and jump height)
|
|
// player movement speed (for all races and postures)
|
|
if (valueIsBetween(pXSprite->data2, -1, 32767))
|
|
trPlayerCtrlSetMoveSpeed(pXSprite->data2, pPlayer);
|
|
|
|
// player jump height (for all races and stand posture only)
|
|
if (valueIsBetween(pXSprite->data3, -1, 32767))
|
|
trPlayerCtrlSetJumpHeight(pXSprite->data3, pPlayer);
|
|
break;
|
|
case 2: // 66 (player screen effects)
|
|
if (pXSprite->data3 < 0) break;
|
|
else trPlayerCtrlSetScreenEffect(pXSprite->data2, pXSprite->data3, pPlayer);
|
|
break;
|
|
case 3: // 67 (start playing qav scene)
|
|
trPlayerCtrlStartScene(actor, pPlayer, (pXSprite->data4 == 1) ? true : false);
|
|
break;
|
|
case 4: // 68 (stop playing qav scene)
|
|
if (pXSprite->data2 > 0 && pXSprite->data2 != pPlayer->sceneQav) break;
|
|
else trPlayerCtrlStopScene(pPlayer);
|
|
break;
|
|
case 5: // 69 (set player look angle, TO-DO: if tx > 0, take a look on TX ID sprite)
|
|
//data4 is reserved
|
|
if (pXSprite->data4 != 0) break;
|
|
else if (valueIsBetween(pXSprite->data2, -128, 128))
|
|
trPlayerCtrlSetLookAngle(pXSprite->data2, pPlayer);
|
|
break;
|
|
case 6: // 70 (erase player stuff...)
|
|
if (pXSprite->data2 < 0) break;
|
|
else trPlayerCtrlEraseStuff(pXSprite->data2, pPlayer);
|
|
break;
|
|
case 7: // 71 (give something to player...)
|
|
if (pXSprite->data2 <= 0) break;
|
|
else trPlayerCtrlGiveStuff(pXSprite->data2, pXSprite->data3,pXSprite->data4, pPlayer, pCtrl);
|
|
break;
|
|
case 8: // 72 (use inventory item)
|
|
if (pXSprite->data2 < 1 || pXSprite->data2 > 5) break;
|
|
else trPlayerCtrlUsePackItem(pXSprite->data2, pXSprite->data3, pXSprite->data4, pPlayer, event.cmd);
|
|
break;
|
|
case 9: // 73 (set player's sprite angle, TO-DO: if tx > 0, take a look on TX ID sprite)
|
|
//data4 is reserved
|
|
if (pXSprite->data4 != 0) break;
|
|
else if (pSprite->flags & kModernTypeFlag1)
|
|
{
|
|
pPlayer->angle.settarget(pSprite->ang);
|
|
pPlayer->angle.lockinput();
|
|
}
|
|
else if (valueIsBetween(pXSprite->data2, -kAng360, kAng360))
|
|
{
|
|
pPlayer->angle.settarget(pXSprite->data2);
|
|
pPlayer->angle.lockinput();
|
|
}
|
|
break;
|
|
case 10: // 74 (de)activate powerup
|
|
if (pXSprite->data2 <= 0 || pXSprite->data2 > (kMaxAllowedPowerup - (kMinAllowedPowerup << 1) + 1)) break;
|
|
trPlayerCtrlUsePowerup(actor, pPlayer, event.cmd);
|
|
break;
|
|
// case 11: // 75 (print the book)
|
|
// data2: RFF TXT id
|
|
// data3: background tile
|
|
// data4: font base tile
|
|
// pal: font / background palette
|
|
// hitag:
|
|
// d1: 0: print whole text at a time, 1: print line by line, 2: word by word, 3: letter by letter
|
|
// d2: 1: force pause the game (sp only)
|
|
// d3: 1: inherit palette for font, 2: inherit palette for background, 3: both
|
|
// busyTime: speed of word/letter/line printing
|
|
// waitTime: if TX ID > 0 and TX ID object is book reader, trigger it?
|
|
//break;
|
|
|
|
}
|
|
}
|
|
return true;
|
|
|
|
case kGenModernSound:
|
|
switch (event.cmd) {
|
|
case kCmdOff:
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
if (pXSprite->txID) modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
else useSoundGen(actor, actor);
|
|
|
|
if (pXSprite->busyTime > 0)
|
|
evPostActor(actor, (120 * pXSprite->busyTime) / 10, kCmdRepeat);
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
case kGenModernMissileUniversal:
|
|
switch (event.cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (pXSprite->state == 1) SetSpriteState(actor, 0);
|
|
break;
|
|
case kCmdOn:
|
|
evKillActor(actor); // queue overflow protect
|
|
if (pXSprite->state == 0) SetSpriteState(actor, 1);
|
|
[[fallthrough]];
|
|
case kCmdRepeat:
|
|
if (pXSprite->txID) modernTypeSendCommand(actor, pXSprite->txID, (COMMAND_ID)pXSprite->command);
|
|
else useUniMissileGen(actor, actor);
|
|
|
|
if (pXSprite->busyTime > 0)
|
|
evPostActor(actor, (120 * pXSprite->busyTime) / 10, kCmdRepeat);
|
|
|
|
break;
|
|
default:
|
|
if (pXSprite->state == 0) evPostActor(actor, 0, kCmdOn);
|
|
else evPostActor(actor, 0, kCmdOff);
|
|
break;
|
|
}
|
|
return true;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool modernTypeOperateWall(int nWall, walltype* pWall, XWALL* pXWall, EVENT event)
|
|
{
|
|
|
|
switch (pWall->type)
|
|
{
|
|
case kSwitchOneWay:
|
|
switch (event.cmd) {
|
|
case kCmdOff:
|
|
SetWallState(nWall, pXWall, 0);
|
|
break;
|
|
case kCmdOn:
|
|
SetWallState(nWall, pXWall, 1);
|
|
break;
|
|
default:
|
|
SetWallState(nWall, pXWall, pXWall->restState ^ 1);
|
|
break;
|
|
}
|
|
return true;
|
|
default:
|
|
return false; // no modern type found to work with, go normal OperateWall();
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool txIsRanged(DBloodActor* source)
|
|
{
|
|
if (!source->hasX()) return false;
|
|
auto pXSource = &source->x();
|
|
if (pXSource->data1 > 0 && pXSource->data2 <= 0 && pXSource->data3 <= 0 && pXSource->data4 > 0)
|
|
{
|
|
if (pXSource->data1 > pXSource->data4)
|
|
{
|
|
// data1 must be less than data4
|
|
int tmp = pXSource->data1; pXSource->data1 = pXSource->data4;
|
|
pXSource->data4 = tmp;
|
|
}
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void seqTxSendCmdAll(DBloodActor* source, DBloodActor* actor, COMMAND_ID cmd, bool modernSend)
|
|
{
|
|
bool ranged = txIsRanged(source);
|
|
auto pXSource = &source->x();
|
|
if (ranged)
|
|
{
|
|
for (pXSource->txID = pXSource->data1; pXSource->txID <= pXSource->data4; pXSource->txID++)
|
|
{
|
|
if (pXSource->txID <= 0 || pXSource->txID >= kChannelUserMax) continue;
|
|
else if (!modernSend) evSendActor(actor, pXSource->txID, cmd);
|
|
else modernTypeSendCommand(actor, pXSource->txID, cmd);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
for (int i = 0; i <= 3; i++)
|
|
{
|
|
pXSource->txID = GetDataVal(&bloodActors[pXSource->reference], i);
|
|
if (pXSource->txID <= 0 || pXSource->txID >= kChannelUserMax) continue;
|
|
else if (!modernSend) evSendActor(actor, pXSource->txID, cmd);
|
|
else modernTypeSendCommand(actor, pXSource->txID, cmd);
|
|
}
|
|
}
|
|
pXSource->txID = pXSource->sysData1 = 0;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useRandomTx(DBloodActor* sourceactor, COMMAND_ID cmd, bool setState)
|
|
{
|
|
spritetype* pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
int tx = 0; int maxRetries = kMaxRandomizeRetries;
|
|
|
|
if (txIsRanged(sourceactor))
|
|
{
|
|
while (maxRetries-- >= 0)
|
|
{
|
|
if ((tx = nnExtRandom(pXSource->data1, pXSource->data4)) != pXSource->txID)
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
while (maxRetries-- >= 0)
|
|
{
|
|
if ((tx = randomGetDataValue(sourceactor, kRandomizeTX)) > 0 && tx != pXSource->txID)
|
|
break;
|
|
}
|
|
}
|
|
|
|
pXSource->txID = (tx > 0 && tx < kChannelUserMax) ? tx : 0;
|
|
if (setState)
|
|
SetSpriteState(sourceactor, pXSource->state ^ 1);
|
|
//evSendActor(pSource->index, pXSource->txID, (COMMAND_ID)pXSource->command);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSequentialTx(DBloodActor* sourceactor, COMMAND_ID cmd, bool setState)
|
|
{
|
|
spritetype* pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
bool range = txIsRanged(sourceactor); int cnt = 3; int tx = 0;
|
|
|
|
if (range)
|
|
{
|
|
// make sure sysData is correct as we store current index of TX ID here.
|
|
if (pXSource->sysData1 < pXSource->data1) pXSource->sysData1 = pXSource->data1;
|
|
else if (pXSource->sysData1 > pXSource->data4) pXSource->sysData1 = pXSource->data4;
|
|
|
|
}
|
|
else
|
|
{
|
|
// make sure sysData is correct as we store current index of data field here.
|
|
if (pXSource->sysData1 > 3) pXSource->sysData1 = 0;
|
|
else if (pXSource->sysData1 < 0) pXSource->sysData1 = 3;
|
|
}
|
|
|
|
switch (cmd)
|
|
{
|
|
case kCmdOff:
|
|
if (!range)
|
|
{
|
|
while (cnt-- >= 0) // skip empty data fields
|
|
{
|
|
if (pXSource->sysData1-- < 0) pXSource->sysData1 = 3;
|
|
if ((tx = GetDataVal(sourceactor, pXSource->sysData1)) <= 0) continue;
|
|
else break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if (--pXSource->sysData1 < pXSource->data1) pXSource->sysData1 = pXSource->data4;
|
|
tx = pXSource->sysData1;
|
|
}
|
|
break;
|
|
|
|
default:
|
|
if (!range)
|
|
{
|
|
while (cnt-- >= 0) // skip empty data fields
|
|
{
|
|
if (pXSource->sysData1 > 3) pXSource->sysData1 = 0;
|
|
if ((tx = GetDataVal(sourceactor, pXSource->sysData1++)) <= 0) continue;
|
|
else break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
tx = pXSource->sysData1;
|
|
if (pXSource->sysData1 >= pXSource->data4)
|
|
{
|
|
pXSource->sysData1 = pXSource->data1;
|
|
break;
|
|
}
|
|
pXSource->sysData1++;
|
|
}
|
|
break;
|
|
}
|
|
|
|
pXSource->txID = (tx > 0 && tx < kChannelUserMax) ? tx : 0;
|
|
if (setState)
|
|
SetSpriteState(sourceactor, pXSource->state ^ 1);
|
|
//evSendActor(pSource->index, pXSource->txID, (COMMAND_ID)pXSource->command);
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int useCondition(DBloodActor* sourceactor, const EVENT& event)
|
|
{
|
|
spritetype* pSource = &sourceactor->s();
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
int objType = event.type;
|
|
int objIndex = event.index_;
|
|
bool srcIsCondition = false;
|
|
if (objType == OBJ_SPRITE && event.actor == nullptr) return -1;
|
|
if (objType == OBJ_SPRITE) objIndex = event.actor->s().index; // need this below for calling nnExtTriggerObject
|
|
if (objType == OBJ_SPRITE && event.actor != sourceactor)
|
|
srcIsCondition = (sprite[objIndex].type == kModernCondition || sprite[objIndex].type == kModernConditionFalse);
|
|
|
|
// if it's a tracking condition, it must ignore all the commands sent from objects
|
|
if (pXSource->busyTime > 0 && event.funcID != kCallbackMax) return -1;
|
|
else if (!srcIsCondition) { // save object serials in the stack and make copy of initial object
|
|
|
|
pXSource->targetX = pXSource->targetY = condSerialize(objType, objIndex);
|
|
|
|
} else { // or grab serials of objects from previous conditions
|
|
|
|
pXSource->targetX = event.actor->x().targetX;
|
|
pXSource->targetY = event.actor->x().targetY;
|
|
|
|
}
|
|
|
|
int cond = pXSource->data1; bool ok = false; bool RVRS = (pSource->type == kModernConditionFalse);
|
|
bool RSET = (pXSource->command == kCmdNumberic + 36); bool PUSH = (pXSource->command == kCmdNumberic);
|
|
int comOp = pSource->cstat; // comparison operator
|
|
|
|
if (pXSource->restState == 0) {
|
|
|
|
if (cond == 0) ok = true; // dummy
|
|
else if (cond >= kCondGameBase && cond < kCondGameMax) ok = condCheckGame(pXSource, event, comOp, PUSH);
|
|
else if (cond >= kCondMixedBase && cond < kCondMixedMax) ok = condCheckMixed(pXSource, event, comOp, PUSH);
|
|
else if (cond >= kCondWallBase && cond < kCondWallMax) ok = condCheckWall(pXSource, comOp, PUSH);
|
|
else if (cond >= kCondSectorBase && cond < kCondSectorMax) ok = condCheckSector(pXSource, comOp, PUSH);
|
|
else if (cond >= kCondPlayerBase && cond < kCondPlayerMax) ok = condCheckPlayer(pXSource, comOp, PUSH);
|
|
else if (cond >= kCondDudeBase && cond < kCondDudeMax) ok = condCheckDude(pXSource, comOp, PUSH);
|
|
else if (cond >= kCondSpriteBase && cond < kCondSpriteMax) ok = condCheckSprite(pXSource, comOp, PUSH);
|
|
else condError(pXSource,"Unexpected condition id %d!", cond);
|
|
|
|
pXSource->state = (ok ^ RVRS);
|
|
|
|
if (pXSource->waitTime > 0 && pXSource->state > 0) {
|
|
|
|
pXSource->restState = 1;
|
|
evKillActor(sourceactor);
|
|
evPostActor(sourceactor, (pXSource->waitTime * 120) / 10, kCmdRepeat);
|
|
return -1;
|
|
|
|
}
|
|
|
|
} else if (event.cmd == kCmdRepeat) {
|
|
|
|
pXSource->restState = 0;
|
|
|
|
} else {
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
if (pXSource->state) {
|
|
|
|
pXSource->isTriggered = pXSource->triggerOnce;
|
|
|
|
if (RSET)
|
|
condRestore(pXSource); // reset focus to the initial object
|
|
|
|
// send command to rx bucket
|
|
if (pXSource->txID)
|
|
evSendActor(sourceactor, pXSource->txID, (COMMAND_ID)pXSource->command);
|
|
|
|
if (pSource->flags) {
|
|
|
|
// send it for object currently in the focus
|
|
if (pSource->flags & kModernTypeFlag1) {
|
|
condUnserialize(pXSource->targetX, &objType, &objIndex);
|
|
nnExtTriggerObject(objType, objIndex, pXSource->command);
|
|
}
|
|
|
|
// send it for initial object
|
|
if ((pSource->flags & kModernTypeFlag2) && (pXSource->targetX != pXSource->targetY || !(pSource->hitag & kModernTypeFlag1))) {
|
|
condUnserialize(pXSource->targetY, &objType, &objIndex);
|
|
nnExtTriggerObject(objType, objIndex, pXSource->command);
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return pXSource->state;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useRandomItemGen(DBloodActor* actor)
|
|
{
|
|
spritetype* pSource = &actor->s();
|
|
XSPRITE* pXSource = &actor->x();
|
|
|
|
// let's first search for previously dropped items and remove it
|
|
if (pXSource->dropMsg > 0)
|
|
{
|
|
BloodStatIterator it(kStatItem);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
spritetype* pItem = &iactor->s();
|
|
if ((unsigned int)pItem->type == pXSource->dropMsg && pItem->x == pSource->x && pItem->y == pSource->y && pItem->z == pSource->z)
|
|
{
|
|
gFX.fxSpawnActor((FX_ID)29, pSource->sectnum, pSource->x, pSource->y, pSource->z, 0);
|
|
pItem->type = kSpriteDecoration;
|
|
actPostSprite(iactor, kStatFree);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
// then drop item
|
|
auto dropactor = randomDropPickupObject(actor, pXSource->dropMsg);
|
|
|
|
if (dropactor != nullptr)
|
|
{
|
|
auto pDrop = &dropactor->s();
|
|
clampSprite(pDrop);
|
|
|
|
// check if generator affected by physics
|
|
if (debrisGetIndex(actor) != -1)
|
|
{
|
|
dropactor->addX();
|
|
int nIndex = debrisGetFreeIndex();
|
|
if (nIndex >= 0)
|
|
{
|
|
dropactor->x().physAttr |= kPhysMove | kPhysGravity | kPhysFalling; // must fall always
|
|
pSource->cstat &= ~CSTAT_SPRITE_BLOCK;
|
|
|
|
gPhysSpritesList[nIndex] = dropactor;
|
|
if (nIndex >= gPhysSpritesCount) gPhysSpritesCount++;
|
|
getSpriteMassBySize(dropactor); // create mass cache
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useUniMissileGen(DBloodActor* sourceactor, DBloodActor* actor)
|
|
{
|
|
if (actor == nullptr) actor = sourceactor;
|
|
XSPRITE* pXSource = &sourceactor->x();
|
|
spritetype* pSource = &sourceactor->s();
|
|
spritetype* pSprite = &actor->s();
|
|
|
|
int dx = 0, dy = 0, dz = 0;
|
|
|
|
if (pXSource->data1 < kMissileBase || pXSource->data1 >= kMissileMax)
|
|
return;
|
|
|
|
if (pSprite->cstat & 32)
|
|
{
|
|
if (pSprite->cstat & 8) dz = 0x4000;
|
|
else dz = -0x4000;
|
|
}
|
|
else
|
|
{
|
|
dx = bcos(pSprite->ang);
|
|
dy = bsin(pSprite->ang);
|
|
dz = pXSource->data3 << 6; // add slope controlling
|
|
if (dz > 0x10000) dz = 0x10000;
|
|
else if (dz < -0x10000) dz = -0x10000;
|
|
}
|
|
|
|
auto missileactor = actFireMissile(actor, 0, 0, dx, dy, dz, actor->x().data1);
|
|
if (missileactor)
|
|
{
|
|
auto pMissile = &missileactor->s();
|
|
int from; // inherit some properties of the generator
|
|
if ((from = (pSource->flags & kModernTypeFlag3)) > 0)
|
|
{
|
|
int canInherit = 0xF;
|
|
if (missileactor->hasX() && seqGetStatus(missileactor) >= 0)
|
|
{
|
|
canInherit &= ~0x8;
|
|
|
|
SEQINST* pInst = GetInstance(missileactor);
|
|
Seq* pSeq = pInst->pSequence;
|
|
for (int i = 0; i < pSeq->nFrames; i++)
|
|
{
|
|
if ((canInherit & 0x4) && pSeq->frames[i].palette != 0) canInherit &= ~0x4;
|
|
if ((canInherit & 0x2) && pSeq->frames[i].xrepeat != 0) canInherit &= ~0x2;
|
|
if ((canInherit & 0x1) && pSeq->frames[i].yrepeat != 0) canInherit &= ~0x1;
|
|
}
|
|
}
|
|
|
|
if (canInherit != 0)
|
|
{
|
|
if (canInherit & 0x2)
|
|
pMissile->xrepeat = (from == kModernTypeFlag1) ? pSource->xrepeat : pSprite->xrepeat;
|
|
|
|
if (canInherit & 0x1)
|
|
pMissile->yrepeat = (from == kModernTypeFlag1) ? pSource->yrepeat : pSprite->yrepeat;
|
|
|
|
if (canInherit & 0x4)
|
|
pMissile->pal = (from == kModernTypeFlag1) ? pSource->pal : pSprite->pal;
|
|
|
|
if (canInherit & 0x8)
|
|
pMissile->shade = (from == kModernTypeFlag1) ? pSource->shade : pSprite->shade;
|
|
}
|
|
}
|
|
|
|
// add velocity controlling
|
|
if (pXSource->data2 > 0)
|
|
{
|
|
int velocity = pXSource->data2 << 12;
|
|
missileactor->xvel() = MulScale(velocity, dx, 14);
|
|
missileactor->yvel() = MulScale(velocity, dy, 14);
|
|
missileactor->zvel() = MulScale(velocity, dz, 14);
|
|
}
|
|
|
|
// add bursting for missiles
|
|
if (pMissile->type != kMissileFlareAlt && pXSource->data4 > 0)
|
|
evPostActor(missileactor, ClipHigh(pXSource->data4, 500), kCallbackMissileBurst);
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSoundGen(DBloodActor* sourceactor, DBloodActor* actor)
|
|
{
|
|
int pitch = sourceactor->x().data4 << 1;
|
|
if (pitch < 2000) pitch = 0;
|
|
sfxPlay3DSoundCP(actor, sourceactor->x().data2, -1, 0, pitch, sourceactor->x().data3);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useIncDecGen(DBloodActor* sourceactor, short objType, int objIndex, DBloodActor* objactor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
spritetype* pSource = &sourceactor->s();
|
|
|
|
char buffer[7];
|
|
int data = -65535;
|
|
short tmp = 0;
|
|
int dataIndex = 0;
|
|
snprintf(buffer, 7, "%d", abs(pXSource->data1));
|
|
int len = int(strlen(buffer));
|
|
|
|
for (int i = 0; i < len; i++)
|
|
{
|
|
dataIndex = (buffer[i] - 52) + 4;
|
|
if ((data = getDataFieldOfObject(objType, objIndex, objactor, dataIndex)) == -65535)
|
|
{
|
|
Printf(PRINT_HIGH, "\nWrong index of data (%c) for IncDec Gen #%d! Only 1, 2, 3 and 4 indexes allowed!\n", buffer[i], objIndex);
|
|
continue;
|
|
}
|
|
|
|
if (pXSource->data2 < pXSource->data3)
|
|
{
|
|
data = ClipRange(data, pXSource->data2, pXSource->data3);
|
|
if ((data += pXSource->data4) >= pXSource->data3)
|
|
{
|
|
switch (pSource->flags)
|
|
{
|
|
case kModernTypeFlag0:
|
|
case kModernTypeFlag1:
|
|
if (data > pXSource->data3) data = pXSource->data3;
|
|
break;
|
|
case kModernTypeFlag2:
|
|
if (data > pXSource->data3) data = pXSource->data3;
|
|
if (!incDecGoalValueIsReached(pXSource)) break;
|
|
tmp = pXSource->data3;
|
|
pXSource->data3 = pXSource->data2;
|
|
pXSource->data2 = tmp;
|
|
break;
|
|
case kModernTypeFlag3:
|
|
if (data > pXSource->data3) data = pXSource->data2;
|
|
break;
|
|
}
|
|
}
|
|
|
|
}
|
|
else if (pXSource->data2 > pXSource->data3)
|
|
{
|
|
data = ClipRange(data, pXSource->data3, pXSource->data2);
|
|
if ((data -= pXSource->data4) <= pXSource->data3)
|
|
{
|
|
switch (pSource->flags)
|
|
{
|
|
case kModernTypeFlag0:
|
|
case kModernTypeFlag1:
|
|
if (data < pXSource->data3) data = pXSource->data3;
|
|
break;
|
|
case kModernTypeFlag2:
|
|
if (data < pXSource->data3) data = pXSource->data3;
|
|
if (!incDecGoalValueIsReached(pXSource)) break;
|
|
tmp = pXSource->data3;
|
|
pXSource->data3 = pXSource->data2;
|
|
pXSource->data2 = tmp;
|
|
break;
|
|
case kModernTypeFlag3:
|
|
if (data < pXSource->data3) data = pXSource->data2;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
pXSource->sysData1 = data;
|
|
setDataValueOfObject(objType, objIndex, objactor, dataIndex, data);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void sprite2sectorSlope(DBloodActor* actor, sectortype* pSector, char rel, bool forcez)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
int slope = 0, z = 0;
|
|
switch (rel) {
|
|
default:
|
|
z = getflorzofslope(pSprite->sectnum, pSprite->x, pSprite->y);
|
|
if ((pSprite->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR) && actor->hasX() && actor->x().Touch) z--;
|
|
slope = pSector->floorheinum;
|
|
break;
|
|
case 1:
|
|
z = getceilzofslope(pSprite->sectnum, pSprite->x, pSprite->y);
|
|
if ((pSprite->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR) && actor->hasX() && actor->x().Touch) z++;
|
|
slope = pSector->ceilingheinum;
|
|
break;
|
|
}
|
|
|
|
spriteSetSlope(pSprite, slope);
|
|
if (forcez) pSprite->z = z;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSlopeChanger(DBloodActor* sourceactor, int objType, int objIndex, DBloodActor* objActor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
spritetype* pSource = &sourceactor->s();
|
|
|
|
int slope, oslope;
|
|
bool flag2 = (pSource->flags & kModernTypeFlag2);
|
|
|
|
if (pSource->flags & kModernTypeFlag1) slope = ClipRange(pXSource->data2, -32767, 32767);
|
|
else slope = (32767 / kPercFull) * ClipRange(pXSource->data2, -kPercFull, kPercFull);
|
|
|
|
if (objType == OBJ_SECTOR)
|
|
{
|
|
sectortype* pSect = §or[objIndex];
|
|
|
|
switch (pXSource->data1)
|
|
{
|
|
case 2:
|
|
case 0:
|
|
if (slope == 0) pSect->floorstat &= ~0x0002;
|
|
else if (!(pSect->floorstat & 0x0002))
|
|
pSect->floorstat |= 0x0002;
|
|
|
|
// just set floor slope
|
|
if (flag2)
|
|
{
|
|
pSect->floorheinum = slope;
|
|
}
|
|
else
|
|
{
|
|
// force closest floor aligned sprites to inherit slope of the sector's floor
|
|
oslope = pSect->floorheinum;
|
|
BloodSectIterator it(objIndex);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
auto spr = &iactor->s();
|
|
if (!(spr->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR)) continue;
|
|
else if (getflorzofslope(objIndex, spr->x, spr->y) - kSlopeDist <= spr->z)
|
|
{
|
|
sprite2sectorSlope(iactor, §or[objIndex], 0, true);
|
|
|
|
// set new slope of floor
|
|
pSect->floorheinum = slope;
|
|
|
|
// force sloped sprites to be on floor slope z
|
|
sprite2sectorSlope(iactor, §or[objIndex], 0, true);
|
|
|
|
// restore old slope for next sprite
|
|
pSect->floorheinum = oslope;
|
|
}
|
|
}
|
|
|
|
// finally set new slope of floor
|
|
pSect->floorheinum = slope;
|
|
|
|
}
|
|
|
|
if (pXSource->data1 == 0) break;
|
|
[[fallthrough]];
|
|
case 1:
|
|
if (slope == 0) pSect->ceilingstat &= ~0x0002;
|
|
else if (!(pSect->ceilingstat & 0x0002))
|
|
pSect->ceilingstat |= 0x0002;
|
|
|
|
// just set ceiling slope
|
|
if (flag2)
|
|
{
|
|
pSect->ceilingheinum = slope;
|
|
}
|
|
else
|
|
{
|
|
oslope = pSect->ceilingheinum;
|
|
BloodSectIterator it(objIndex);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
auto spr = &iactor->s();
|
|
if (!(spr->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR)) continue;
|
|
else if (getceilzofslope(objIndex, spr->x, spr->y) + kSlopeDist >= spr->z)
|
|
{
|
|
sprite2sectorSlope(iactor, §or[objIndex], 1, true);
|
|
|
|
// set new slope of ceiling
|
|
pSect->ceilingheinum = slope;
|
|
|
|
// force sloped sprites to be on ceiling slope z
|
|
sprite2sectorSlope(iactor, §or[objIndex], 1, true);
|
|
|
|
// restore old slope for next sprite
|
|
pSect->ceilingheinum = oslope;
|
|
}
|
|
}
|
|
|
|
// finally set new slope of ceiling
|
|
pSect->ceilingheinum = slope;
|
|
|
|
}
|
|
break;
|
|
}
|
|
|
|
// let's give a little impulse to the physics sprites...
|
|
BloodSectIterator it(objIndex);
|
|
while (auto iactor = it.Next())
|
|
{
|
|
auto spr = &iactor->s();
|
|
auto xspr = &iactor->x();
|
|
if (spr->extra > 0 && xspr->physAttr > 0)
|
|
{
|
|
xspr->physAttr |= kPhysFalling;
|
|
iactor->zvel()++;
|
|
}
|
|
else if ((spr->statnum == kStatThing || spr->statnum == kStatDude) && (spr->flags & kPhysGravity))
|
|
{
|
|
spr->flags |= kPhysFalling;
|
|
iactor->zvel()++;
|
|
}
|
|
}
|
|
}
|
|
else if (objType == OBJ_SPRITE)
|
|
{
|
|
spritetype* pSpr = &objActor->s();
|
|
if (!(pSpr->cstat & CSTAT_SPRITE_ALIGNMENT_FLOOR)) pSpr->cstat |= CSTAT_SPRITE_ALIGNMENT_FLOOR;
|
|
if ((pSpr->cstat & CSTAT_SPRITE_ALIGNMENT_SLOPE) != CSTAT_SPRITE_ALIGNMENT_SLOPE)
|
|
pSpr->cstat |= CSTAT_SPRITE_ALIGNMENT_SLOPE;
|
|
|
|
switch (pXSource->data4)
|
|
{
|
|
case 1:
|
|
case 2:
|
|
case 3:
|
|
if (!sectRangeIsFine(pSpr->sectnum)) break;
|
|
switch (pXSource->data4)
|
|
{
|
|
case 1: sprite2sectorSlope(objActor, §or[pSpr->sectnum], 0, flag2); break;
|
|
case 2: sprite2sectorSlope(objActor, §or[pSpr->sectnum], 1, flag2); break;
|
|
case 3:
|
|
if (getflorzofslope(pSpr->sectnum, pSpr->x, pSpr->y) - kSlopeDist <= pSpr->z) sprite2sectorSlope(objActor, §or[pSpr->sectnum], 0, flag2);
|
|
if (getceilzofslope(pSpr->sectnum, pSpr->x, pSpr->y) + kSlopeDist >= pSpr->z) sprite2sectorSlope(objActor, §or[pSpr->sectnum], 1, flag2);
|
|
break;
|
|
}
|
|
break;
|
|
default:
|
|
spriteSetSlope(pSpr, slope);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useDataChanger(DBloodActor* sourceactor, int objType, int objIndex, DBloodActor* objActor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
spritetype* pSource = &sourceactor->s();
|
|
|
|
switch (objType)
|
|
{
|
|
case OBJ_SECTOR:
|
|
if ((pSource->flags & kModernTypeFlag1) || (pXSource->data1 != -1 && pXSource->data1 != 32767))
|
|
setDataValueOfObject(objType, objIndex, nullptr, 1, pXSource->data1);
|
|
break;
|
|
case OBJ_SPRITE:
|
|
if ((pSource->flags & kModernTypeFlag1) || (pXSource->data1 != -1 && pXSource->data1 != 32767))
|
|
setDataValueOfObject(objType, objIndex, objActor, 1, pXSource->data1);
|
|
|
|
if ((pSource->flags & kModernTypeFlag1) || (pXSource->data2 != -1 && pXSource->data2 != 32767))
|
|
setDataValueOfObject(objType, objIndex, objActor, 2, pXSource->data2);
|
|
|
|
if ((pSource->flags & kModernTypeFlag1) || (pXSource->data3 != -1 && pXSource->data3 != 32767))
|
|
setDataValueOfObject(objType, objIndex, objActor, 3, pXSource->data3);
|
|
|
|
if ((pSource->flags & kModernTypeFlag1) || pXSource->data4 != 65535)
|
|
setDataValueOfObject(objType, objIndex, objActor, 4, pXSource->data4);
|
|
break;
|
|
case OBJ_WALL:
|
|
if ((pSource->flags & kModernTypeFlag1) || (pXSource->data1 != -1 && pXSource->data1 != 32767))
|
|
setDataValueOfObject(objType, objIndex, nullptr, 1, pXSource->data1);
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useSectorLigthChanger(DBloodActor* sourceactor, XSECTOR* pXSector)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
spritetype* pSource = &sourceactor->s();
|
|
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
pXSector->wave = ClipHigh(pXSource->data1, 11);
|
|
|
|
int oldAmplitude = pXSector->amplitude;
|
|
if (valueIsBetween(pXSource->data2, -128, 128))
|
|
pXSector->amplitude = uint8_t(pXSource->data2);
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
pXSector->freq = ClipHigh(pXSource->data3, 255);
|
|
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
pXSector->phase = ClipHigh(pXSource->data4, 255);
|
|
|
|
if (pSource->flags)
|
|
{
|
|
if (pSource->flags != kModernTypeFlag1)
|
|
{
|
|
pXSector->shadeAlways = (pSource->flags & 0x0001) ? true : false;
|
|
pXSector->shadeFloor = (pSource->flags & 0x0002) ? true : false;
|
|
pXSector->shadeCeiling = (pSource->flags & 0x0004) ? true : false;
|
|
pXSector->shadeWalls = (pSource->flags & 0x0008) ? true : false;
|
|
}
|
|
else
|
|
{
|
|
pXSector->shadeAlways = true;
|
|
}
|
|
}
|
|
|
|
// add to shadeList if amplitude was set to 0 previously
|
|
if (oldAmplitude != pXSector->amplitude && shadeCount < kMaxXSectors)
|
|
{
|
|
bool found = false;
|
|
for (int i = 0; i < shadeCount; i++)
|
|
{
|
|
if (shadeList[i] != sector[pXSector->reference].extra) continue;
|
|
found = true;
|
|
break;
|
|
}
|
|
|
|
if (!found)
|
|
shadeList[shadeCount++] = sector[pXSector->reference].extra;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void useTargetChanger(DBloodActor* sourceactor, DBloodActor* actor)
|
|
{
|
|
spritetype* pSprite = &actor->s();
|
|
|
|
if (!actor->IsDudeActor() || pSprite->statnum != kStatDude)
|
|
{
|
|
switch (pSprite->type) // can be dead dude turned in gib
|
|
{
|
|
// make current target and all other dudes not attack this dude anymore
|
|
case kThingBloodBits:
|
|
case kThingBloodChunks:
|
|
aiFightFreeTargets(actor);
|
|
return;
|
|
default:
|
|
return;
|
|
}
|
|
}
|
|
|
|
|
|
auto pXSource = &sourceactor->x();
|
|
XSPRITE* pXSprite = &actor->x();
|
|
|
|
int receiveHp = 33 + Random(33);
|
|
DUDEINFO* pDudeInfo = getDudeInfo(pSprite->type);
|
|
int matesPerEnemy = 1;
|
|
|
|
// dude is burning?
|
|
if (pXSprite->burnTime > 0 && spriRangeIsFine(pXSprite->burnSource))
|
|
{
|
|
if (IsBurningDude(actor)) return;
|
|
else
|
|
{
|
|
auto burnactor = actor->GetBurnSource();
|
|
spritetype* pBurnSource = &burnactor->s();
|
|
if (burnactor->hasX())
|
|
{
|
|
if (pXSource->data2 == 1 && pXSprite->rxID == burnactor->x().rxID)
|
|
{
|
|
pXSprite->burnTime = 0;
|
|
|
|
// heal dude a bit in case of friendly fire
|
|
int startHp = (pXSprite->sysData2 > 0) ? ClipRange(pXSprite->sysData2 << 4, 1, 65535) : pDudeInfo->startHealth << 4;
|
|
if (pXSprite->health < (unsigned)startHp) actHealDude(actor, receiveHp, startHp);
|
|
}
|
|
else if (burnactor->x().health <= 0)
|
|
{
|
|
pXSprite->burnTime = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
auto playeractor = aiFightTargetIsPlayer(actor);
|
|
// special handling for player(s) if target changer data4 > 2.
|
|
if (playeractor != nullptr)
|
|
{
|
|
auto pPlayer = &playeractor->s();
|
|
auto actLeech = leechIsDropped(actor);
|
|
if (pXSource->data4 == 3)
|
|
{
|
|
aiSetTarget(actor, pSprite->x, pSprite->y, pSprite->z);
|
|
aiSetGenIdleState(actor);
|
|
if (pSprite->type == kDudeModernCustom && actLeech)
|
|
removeLeech(actLeech);
|
|
}
|
|
else if (pXSource->data4 == 4)
|
|
{
|
|
aiSetTarget(actor, pPlayer->x, pPlayer->y, pPlayer->z);
|
|
if (pSprite->type == kDudeModernCustom && actLeech)
|
|
removeLeech(actLeech);
|
|
}
|
|
}
|
|
|
|
int maxAlarmDudes = 8 + Random(8);
|
|
auto targetactor = actor->GetTarget();
|
|
if (targetactor && targetactor->hasX() && playeractor == nullptr)
|
|
{
|
|
auto pTarget = &targetactor->s();
|
|
auto pXTarget = &targetactor->x();
|
|
|
|
if (aiFightUnitCanFly(actor) && aiFightIsMeleeUnit(targetactor) && !aiFightUnitCanFly(targetactor))
|
|
pSprite->flags |= 0x0002;
|
|
else if (aiFightUnitCanFly(actor))
|
|
pSprite->flags &= ~0x0002;
|
|
|
|
if (!targetactor->IsDudeActor() || pXTarget->health < 1 || !aiFightDudeCanSeeTarget(actor, pDudeInfo, targetactor))
|
|
{
|
|
aiSetTarget(actor, pSprite->x, pSprite->y, pSprite->z);
|
|
}
|
|
// dude attack or attacked by target that does not fit by data id?
|
|
else if (pXSource->data1 != 666 && pXTarget->data1 != pXSource->data1)
|
|
{
|
|
if (aiFightDudeIsAffected(targetactor))
|
|
{
|
|
// force stop attack target
|
|
aiSetTarget(actor, pSprite->x, pSprite->y, pSprite->z);
|
|
if (actor->GetBurnSource() == targetactor)
|
|
{
|
|
pXSprite->burnTime = 0;
|
|
pXSprite->burnSource = -1;
|
|
}
|
|
|
|
// force stop attack dude
|
|
aiSetTarget(targetactor, pTarget->x, pTarget->y, pTarget->z);
|
|
if (targetactor->GetBurnSource() == actor)
|
|
{
|
|
pXTarget->burnTime = 0;
|
|
pXTarget->burnSource = -1;
|
|
}
|
|
}
|
|
}
|
|
else if (pXSource->data2 == 1 && pXSprite->rxID == pXTarget->rxID)
|
|
{
|
|
auto mateactor = targetactor;
|
|
spritetype* pMate = pTarget;
|
|
XSPRITE* pXMate = pXTarget;
|
|
|
|
// heal dude
|
|
int startHp = (pXSprite->sysData2 > 0) ? ClipRange(pXSprite->sysData2 << 4, 1, 65535) : pDudeInfo->startHealth << 4;
|
|
if (pXSprite->health < (unsigned)startHp) actHealDude(actor, receiveHp, startHp);
|
|
|
|
// heal mate
|
|
startHp = (pXMate->sysData2 > 0) ? ClipRange(pXMate->sysData2 << 4, 1, 65535) : getDudeInfo(pMate->type)->startHealth << 4;
|
|
if (pXMate->health < (unsigned)startHp) actHealDude(mateactor, receiveHp, startHp);
|
|
|
|
auto matetarget = mateactor->GetTarget();
|
|
if (matetarget != nullptr && matetarget->hasX())
|
|
{
|
|
auto pMateTarget = &matetarget->s();
|
|
// force mate stop attack dude, if he does
|
|
if (matetarget == actor)
|
|
{
|
|
aiSetTarget(mateactor, pMate->x, pMate->y, pMate->z);
|
|
}
|
|
else if (pXSprite->rxID != matetarget->x().rxID)
|
|
{
|
|
// force dude to attack same target that mate have
|
|
aiSetTarget(actor, matetarget);
|
|
return;
|
|
}
|
|
else
|
|
{
|
|
// force mate to stop attack another mate
|
|
aiSetTarget(mateactor, pMate->x, pMate->y, pMate->z);
|
|
}
|
|
}
|
|
|
|
// force dude stop attack mate, if target was not changed previously
|
|
if (actor == mateactor)
|
|
aiSetTarget(actor, pSprite->x, pSprite->y, pSprite->z);
|
|
|
|
|
|
}
|
|
// check if targets aims player then force this target to fight with dude
|
|
else if (aiFightTargetIsPlayer(actor) != nullptr)
|
|
{
|
|
aiSetTarget(targetactor, actor);
|
|
}
|
|
|
|
int mDist = 3;
|
|
if (aiFightIsMeleeUnit(actor)) mDist = 2;
|
|
|
|
if (targetactor != nullptr && aiFightGetTargetDist(actor, pDudeInfo, targetactor) < mDist)
|
|
{
|
|
if (!isActive(actor)) aiActivateDude(actor);
|
|
return;
|
|
}
|
|
// lets try to look for target that fits better by distance
|
|
else if ((PlayClock & 256) != 0 && (targetactor == nullptr || aiFightGetTargetDist(actor, pDudeInfo, targetactor) >= mDist))
|
|
{
|
|
auto newtargactor = aiFightGetTargetInRange(actor, 0, mDist, pXSource->data1, pXSource->data2);
|
|
if (newtargactor != nullptr)
|
|
{
|
|
auto pNewTarg = &newtargactor->s();
|
|
auto pXNewTarg = &newtargactor->x();
|
|
|
|
// Make prev target not aim in dude
|
|
if (targetactor)
|
|
{
|
|
aiSetTarget(targetactor, targetactor->s().x, targetactor->s().y, targetactor->s().z);
|
|
if (!isActive(newtargactor))
|
|
aiActivateDude(newtargactor);
|
|
}
|
|
|
|
// Change target for dude
|
|
aiSetTarget(actor, newtargactor);
|
|
if (!isActive(actor))
|
|
aiActivateDude(actor);
|
|
|
|
// ...and change target of target to dude to force it fight
|
|
if (pXSource->data3 > 0 && newtargactor->GetTarget() != actor)
|
|
{
|
|
aiSetTarget(newtargactor, actor);
|
|
if (!isActive(newtargactor))
|
|
aiActivateDude(newtargactor);
|
|
}
|
|
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
|
|
if ((targetactor == nullptr || playeractor != nullptr) && (PlayClock & 32) != 0)
|
|
{
|
|
// try find first target that dude can see
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto newtargactor = it.Next())
|
|
{
|
|
auto pXNewTarg = &newtargactor->x();
|
|
|
|
if (newtargactor->GetTarget() == actor)
|
|
{
|
|
aiSetTarget(actor, newtargactor);
|
|
return;
|
|
}
|
|
|
|
// skip non-dudes and players
|
|
if (!newtargactor->IsDudeActor() || (newtargactor->IsPlayerActor() && pXSource->data4 > 0) || newtargactor->GetOwner() == actor) continue;
|
|
// avoid self aiming, those who dude can't see, and those who dude own
|
|
else if (!aiFightDudeCanSeeTarget(actor, pDudeInfo, newtargactor) || actor == newtargactor) continue;
|
|
// if Target Changer have data1 = 666, everyone can be target, except AI team mates.
|
|
else if (pXSource->data1 != 666 && pXSource->data1 != pXNewTarg->data1) continue;
|
|
// don't attack immortal, burning dudes and mates
|
|
if (IsBurningDude(newtargactor) || !IsKillableDude(newtargactor) || (pXSource->data2 == 1 && pXSprite->rxID == pXNewTarg->rxID))
|
|
continue;
|
|
|
|
if (pXSource->data2 == 0 || (pXSource->data2 == 1 && !aiFightMatesHaveSameTarget(actor, newtargactor, matesPerEnemy)))
|
|
{
|
|
// Change target for dude
|
|
aiSetTarget(actor, newtargactor);
|
|
if (!isActive(actor))
|
|
aiActivateDude(actor);
|
|
|
|
// ...and change target of target to dude to force it fight
|
|
if (pXSource->data3 > 0 && newtargactor->GetTarget() != actor)
|
|
{
|
|
aiSetTarget(newtargactor, actor);
|
|
if (playeractor == nullptr && !isActive(newtargactor))
|
|
aiActivateDude(newtargactor);
|
|
|
|
if (pXSource->data3 == 2)
|
|
aiFightAlarmDudesInSight(newtargactor, maxAlarmDudes);
|
|
}
|
|
return;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
// got no target - let's ask mates if they have targets
|
|
if ((actor->GetTarget() == nullptr || playeractor != nullptr) && pXSource->data2 == 1 && (PlayClock & 64) != 0)
|
|
{
|
|
DBloodActor* pMateTargetActor = aiFightGetMateTargets(actor);
|
|
if (pMateTargetActor != nullptr && pMateTargetActor->hasX())
|
|
{
|
|
auto pMateTarget = &pMateTargetActor->s();
|
|
XSPRITE* pXMateTarget = &pMateTargetActor->x();
|
|
|
|
if (aiFightDudeCanSeeTarget(actor, pDudeInfo, pMateTargetActor))
|
|
{
|
|
if (pMateTargetActor->GetTarget() == nullptr)
|
|
{
|
|
aiSetTarget(pMateTargetActor, actor);
|
|
if (pMateTargetActor->IsDudeActor() && !isActive(pMateTargetActor))
|
|
aiActivateDude(pMateTargetActor);
|
|
}
|
|
|
|
aiSetTarget(actor, pMateTargetActor);
|
|
if (!isActive(actor))
|
|
aiActivateDude(actor);
|
|
return;
|
|
|
|
// try walk in mate direction in case if not see the target
|
|
}
|
|
else if (pMateTargetActor->GetTarget() && aiFightDudeCanSeeTarget(actor, pDudeInfo, pMateTargetActor->GetTarget()))
|
|
{
|
|
actor->SetTarget(pMateTargetActor);
|
|
spritetype* pMate = &pMateTargetActor->GetTarget()->s();
|
|
pXSprite->targetX = pMate->x;
|
|
pXSprite->targetY = pMate->y;
|
|
pXSprite->targetZ = pMate->z;
|
|
if (!isActive(actor))
|
|
aiActivateDude(actor);
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void usePictureChanger(DBloodActor* sourceactor, int objType, int objIndex, DBloodActor* objActor)
|
|
{
|
|
auto pXSource = &sourceactor->x();
|
|
|
|
switch (objType) {
|
|
case OBJ_SECTOR:
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
sector[objIndex].floorpicnum = pXSource->data1;
|
|
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
sector[objIndex].ceilingpicnum = pXSource->data2;
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
sector[objIndex].floorpal = uint8_t(pXSource->data3);
|
|
|
|
if (valueIsBetween(pXSource->data4, -1, 65535))
|
|
sector[objIndex].ceilingpal = uint8_t(pXSource->data4);
|
|
break;
|
|
case OBJ_SPRITE:
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
objActor->s().picnum = pXSource->data1;
|
|
|
|
if (pXSource->data2 >= 0) objActor->s().shade = (pXSource->data2 > 127) ? 127 : pXSource->data2;
|
|
else if (pXSource->data2 < -1) objActor->s().shade = (pXSource->data2 < -127) ? -127 : pXSource->data2;
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
objActor->s().pal = uint8_t(pXSource->data3);
|
|
break;
|
|
case OBJ_WALL:
|
|
if (valueIsBetween(pXSource->data1, -1, 32767))
|
|
wall[objIndex].picnum = pXSource->data1;
|
|
|
|
if (valueIsBetween(pXSource->data2, -1, 32767))
|
|
wall[objIndex].overpicnum = pXSource->data2;
|
|
|
|
if (valueIsBetween(pXSource->data3, -1, 32767))
|
|
wall[objIndex].pal = uint8_t(pXSource->data3);
|
|
break;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
QAV* playerQavSceneLoad(int qavId)
|
|
{
|
|
QAV* pQav = getQAV(qavId);
|
|
if (!pQav) viewSetSystemMessage("Failed to load QAV animation #%d", qavId);
|
|
return pQav;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void playerQavSceneProcess(PLAYER* pPlayer, QAVSCENE* pQavScene)
|
|
{
|
|
auto initiator = pQavScene->initiator;
|
|
if (initiator->hasX())
|
|
{
|
|
XSPRITE* pXSprite = &initiator->x();
|
|
if (pXSprite->waitTime > 0 && --pXSprite->sysData1 <= 0)
|
|
{
|
|
if (pXSprite->txID >= kChannelUser)
|
|
{
|
|
for (int i = bucketHead[pXSprite->txID]; i < bucketHead[pXSprite->txID + 1]; i++)
|
|
{
|
|
if (rxBucket[i].type == OBJ_SPRITE)
|
|
{
|
|
auto rxactor = rxBucket[i].GetActor();
|
|
if (!rxactor || !rxactor->hasX() || rxactor == initiator) continue;
|
|
|
|
spritetype* pSpr = &rxactor->s();
|
|
auto pXSpr = &rxactor->x();
|
|
if (pSpr->type == kModernPlayerControl && pXSpr->command == 67)
|
|
{
|
|
if (pXSpr->data2 == pXSprite->data2 || pXSpr->locked) continue;
|
|
else trPlayerCtrlStartScene(rxactor, pPlayer, true);
|
|
return;
|
|
}
|
|
nnExtTriggerObject(rxBucket[i].type, rxactor->s().index, pXSprite->command);
|
|
|
|
}
|
|
else nnExtTriggerObject(rxBucket[i].type, rxBucket[i].rxindex, pXSprite->command);
|
|
|
|
}
|
|
}
|
|
trPlayerCtrlStopScene(pPlayer);
|
|
}
|
|
else
|
|
{
|
|
playerQavScenePlay(pPlayer);
|
|
pPlayer->weaponTimer = ClipLow(pPlayer->weaponTimer -= 4, 0);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
|
|
pQavScene->initiator = nullptr;
|
|
pPlayer->sceneQav = -1;
|
|
pQavScene->qavResrc = NULL;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void playerQavSceneDraw(PLAYER* pPlayer, int a2, double a3, double a4, int a5)
|
|
{
|
|
if (pPlayer == NULL || pPlayer->sceneQav == -1) return;
|
|
|
|
QAVSCENE* pQavScene = &gPlayerCtrl[pPlayer->nPlayer].qavScene;
|
|
spritetype* pSprite = &pQavScene->initiator->s();
|
|
|
|
if (pQavScene->qavResrc != NULL)
|
|
{
|
|
QAV* pQAV = pQavScene->qavResrc;
|
|
int v4;
|
|
double smoothratio;
|
|
|
|
qavProcessTimer(pPlayer, pQAV, &v4, &smoothratio);
|
|
|
|
int flags = 2; int nInv = powerupCheck(pPlayer, kPwUpShadowCloak);
|
|
if (nInv >= 120 * 8 || (nInv != 0 && (PlayClock & 32)))
|
|
{
|
|
a2 = -128; flags |= 1;
|
|
}
|
|
|
|
// draw as weapon
|
|
if (!(pSprite->flags & kModernTypeFlag1))
|
|
{
|
|
pQAV->x = int(a3); pQAV->y = int(a4);
|
|
pQAV->Draw(a3, a4, v4, flags, a2, a5, true, smoothratio);
|
|
|
|
// draw fullscreen (currently 4:3 only)
|
|
}
|
|
else
|
|
{
|
|
// What an awful hack. This throws proper ordering out of the window, but there is no way to reproduce this better with strict layering of elements.
|
|
// From the above commit it seems to be incomplete anyway...
|
|
pQAV->Draw(v4, flags, a2, a5, false, smoothratio);
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void playerQavScenePlay(PLAYER* pPlayer)
|
|
{
|
|
if (pPlayer == NULL) return;
|
|
|
|
QAVSCENE* pQavScene = &gPlayerCtrl[pPlayer->nPlayer].qavScene;
|
|
if (pPlayer->sceneQav == -1 && pQavScene->initiator != nullptr)
|
|
pPlayer->sceneQav = pQavScene->initiator->x().data2;
|
|
|
|
if (pQavScene->qavResrc != NULL)
|
|
{
|
|
QAV* pQAV = pQavScene->qavResrc;
|
|
pQAV->nSprite = pPlayer->pSprite->index;
|
|
int nTicks = pQAV->duration - pPlayer->weaponTimer;
|
|
pQAV->Play(nTicks - 4, nTicks, pPlayer->qavCallback, pPlayer);
|
|
}
|
|
}
|
|
|
|
void playerQavSceneReset(PLAYER* pPlayer)
|
|
{
|
|
QAVSCENE* pQavScene = &gPlayerCtrl[pPlayer->nPlayer].qavScene;
|
|
pQavScene->initiator = nullptr;
|
|
pQavScene->dummy = pPlayer->sceneQav = -1;
|
|
pQavScene->qavResrc = NULL;
|
|
}
|
|
|
|
bool playerSizeShrink(PLAYER* pPlayer, int divider)
|
|
{
|
|
pPlayer->pXSprite->scale = 256 / divider;
|
|
playerSetRace(pPlayer, kModeHumanShrink);
|
|
return true;
|
|
}
|
|
|
|
bool playerSizeGrow(PLAYER* pPlayer, int multiplier)
|
|
{
|
|
pPlayer->pXSprite->scale = 256 * multiplier;
|
|
playerSetRace(pPlayer, kModeHumanGrown);
|
|
return true;
|
|
}
|
|
|
|
bool playerSizeReset(PLAYER* pPlayer)
|
|
{
|
|
playerSetRace(pPlayer, kModeHuman);
|
|
pPlayer->pXSprite->scale = 0;
|
|
return true;
|
|
}
|
|
|
|
void playerDeactivateShrooms(PLAYER* pPlayer)
|
|
{
|
|
powerupDeactivate(pPlayer, kPwUpGrowShroom);
|
|
pPlayer->pwUpTime[kPwUpGrowShroom] = 0;
|
|
|
|
powerupDeactivate(pPlayer, kPwUpShrinkShroom);
|
|
pPlayer->pwUpTime[kPwUpShrinkShroom] = 0;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
PLAYER* getPlayerById(short id)
|
|
{
|
|
// relative to connected players
|
|
if (id >= 1 && id <= kMaxPlayers)
|
|
{
|
|
id = id - 1;
|
|
for (int i = connecthead; i >= 0; i = connectpoint2[i])
|
|
{
|
|
if (id == gPlayer[i].nPlayer)
|
|
return &gPlayer[i];
|
|
}
|
|
|
|
// absolute sprite type
|
|
}
|
|
else if (id >= kDudePlayer1 && id <= kDudePlayer8)
|
|
{
|
|
for (int i = connecthead; i >= 0; i = connectpoint2[i])
|
|
{
|
|
if (id == gPlayer[i].pSprite->type)
|
|
return &gPlayer[i];
|
|
}
|
|
}
|
|
|
|
//viewSetSystemMessage("There is no player id #%d", id);
|
|
return NULL;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool IsBurningDude(DBloodActor* actor)
|
|
{
|
|
if (actor == NULL) return false;
|
|
switch (actor->s().type)
|
|
{
|
|
case kDudeBurningInnocent:
|
|
case kDudeBurningCultist:
|
|
case kDudeBurningZombieAxe:
|
|
case kDudeBurningZombieButcher:
|
|
case kDudeBurningTinyCaleb:
|
|
case kDudeBurningBeast:
|
|
case kDudeModernCustomBurning:
|
|
return true;
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
bool IsKillableDude(DBloodActor* actor)
|
|
{
|
|
switch (actor->s().type)
|
|
{
|
|
case kDudeGargoyleStatueFlesh:
|
|
case kDudeGargoyleStatueStone:
|
|
return false;
|
|
default:
|
|
if (!actor->IsDudeActor() || actor->x().locked == 1) return false;
|
|
return true;
|
|
}
|
|
}
|
|
|
|
bool isGrown(DBloodActor* actor)
|
|
{
|
|
if (powerupCheck(&gPlayer[actor->s().type - kDudePlayer1], kPwUpGrowShroom) > 0) return true;
|
|
else if (actor->hasX() && actor->x().scale >= 512) return true;
|
|
else return false;
|
|
}
|
|
|
|
bool isShrinked(DBloodActor* actor)
|
|
{
|
|
if (powerupCheck(&gPlayer[actor->s().type - kDudePlayer1], kPwUpShrinkShroom) > 0) return true;
|
|
else if (actor->hasX() && actor->x().scale > 0 && actor->x().scale <= 128) return true;
|
|
else return false;
|
|
}
|
|
|
|
bool isActive(DBloodActor* actor)
|
|
{
|
|
if (!actor->hasX())
|
|
return false;
|
|
|
|
switch (actor->x().aiState->stateType)
|
|
{
|
|
case kAiStateIdle:
|
|
case kAiStateGenIdle:
|
|
case kAiStateSearch:
|
|
case kAiStateMove:
|
|
case kAiStateOther:
|
|
return false;
|
|
default:
|
|
return true;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int getDataFieldOfObject(int objType, int objIndex, DBloodActor* actor, int dataIndex)
|
|
{
|
|
int data = -65535;
|
|
switch (objType)
|
|
{
|
|
case OBJ_SPRITE:
|
|
switch (dataIndex)
|
|
{
|
|
case 1: return actor->x().data1;
|
|
case 2: return actor->x().data2;
|
|
case 3:
|
|
switch (actor->s().type)
|
|
{
|
|
case kDudeModernCustom: return actor->x().sysData1;
|
|
default: return actor->x().data3;
|
|
}
|
|
case 4: return actor->x().data4;
|
|
default: return data;
|
|
}
|
|
case OBJ_SECTOR: return xsector[sector[objIndex].extra].data;
|
|
case OBJ_WALL: return xwall[wall[objIndex].extra].data;
|
|
default: return data;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool setDataValueOfObject(int objType, int objIndex, DBloodActor* objActor, int dataIndex, int value)
|
|
{
|
|
switch (objType)
|
|
{
|
|
case OBJ_SPRITE:
|
|
{
|
|
XSPRITE* pXSprite = &objActor->x();
|
|
int type = objActor->s().type;
|
|
|
|
// exceptions
|
|
if (objActor->IsDudeActor() && pXSprite->health <= 0) return true;
|
|
switch (type)
|
|
{
|
|
case kThingBloodBits:
|
|
case kThingBloodChunks:
|
|
case kThingZombieHead:
|
|
return true;
|
|
break;
|
|
}
|
|
|
|
switch (dataIndex)
|
|
{
|
|
case 1:
|
|
pXSprite->data1 = value;
|
|
switch (type)
|
|
{
|
|
case kSwitchCombo:
|
|
if (value == pXSprite->data2) SetSpriteState(objActor, 1);
|
|
else SetSpriteState(objActor, 0);
|
|
break;
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
objActor->genDudeExtra.updReq[kGenDudePropertyWeapon] = true;
|
|
objActor->genDudeExtra.updReq[kGenDudePropertyDmgScale] = true;
|
|
evPostActor(objActor, kGenDudeUpdTimeRate, kCallbackGenDudeUpdate);
|
|
break;
|
|
}
|
|
return true;
|
|
case 2:
|
|
pXSprite->data2 = value;
|
|
switch (type)
|
|
{
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
objActor->genDudeExtra.updReq[kGenDudePropertySpriteSize] = true;
|
|
objActor->genDudeExtra.updReq[kGenDudePropertyMass] = true;
|
|
objActor->genDudeExtra.updReq[kGenDudePropertyDmgScale] = true;
|
|
objActor->genDudeExtra.updReq[kGenDudePropertyStates] = true;
|
|
objActor->genDudeExtra.updReq[kGenDudePropertyAttack] = true;
|
|
evPostActor(objActor, kGenDudeUpdTimeRate, kCallbackGenDudeUpdate);
|
|
break;
|
|
}
|
|
return true;
|
|
case 3:
|
|
pXSprite->data3 = value;
|
|
switch (type)
|
|
{
|
|
case kDudeModernCustom:
|
|
case kDudeModernCustomBurning:
|
|
pXSprite->sysData1 = value;
|
|
break;
|
|
}
|
|
return true;
|
|
case 4:
|
|
pXSprite->data4 = value;
|
|
return true;
|
|
default:
|
|
return false;
|
|
}
|
|
}
|
|
case OBJ_SECTOR:
|
|
xsector[sector[objIndex].extra].data = value;
|
|
return true;
|
|
case OBJ_WALL:
|
|
xwall[wall[objIndex].extra].data = value;
|
|
return true;
|
|
default:
|
|
return false;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// a replacement of vanilla CanMove for patrol dudes
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool nnExtCanMove(DBloodActor* actor, DBloodActor* target, int nAngle, int nRange)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
int x = pSprite->x, y = pSprite->y, z = pSprite->z, nSector = pSprite->sectnum;
|
|
HitScan(pSprite, z, Cos(nAngle) >> 16, Sin(nAngle) >> 16, 0, CLIPMASK0, nRange);
|
|
int nDist = approxDist(x - gHitInfo.hitx, y - gHitInfo.hity);
|
|
if (target != nullptr && nDist - (pSprite->clipdist << 2) < nRange)
|
|
return (target == gHitInfo.hitactor);
|
|
|
|
x += MulScale(nRange, Cos(nAngle), 30);
|
|
y += MulScale(nRange, Sin(nAngle), 30);
|
|
if (!FindSector(x, y, z, &nSector))
|
|
return false;
|
|
|
|
if (sector[nSector].extra > 0) {
|
|
|
|
XSECTOR* pXSector = &xsector[sector[nSector].extra];
|
|
return !((sector[nSector].type == kSectorDamage || pXSector->damageType > 0) && pXSector->state && !nnExtIsImmune(actor, pXSector->damageType, 16));
|
|
|
|
}
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// a replacement of vanilla aiChooseDirection for patrol dudes
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void nnExtAiSetDirection(DBloodActor* actor, int a3)
|
|
{
|
|
spritetype* pSprite = &actor->s();
|
|
XSPRITE* pXSprite = &actor->x();
|
|
assert(pSprite->type >= kDudeBase && pSprite->type < kDudeMax);
|
|
|
|
int nSprite = pSprite->index;
|
|
int vc = ((a3 + 1024 - pSprite->ang) & 2047) - 1024;
|
|
int t1 = DMulScale(actor->xvel(), Cos(pSprite->ang), actor->yvel(), Sin(pSprite->ang), 30);
|
|
int vsi = ((t1 * 15) >> 12) / 2;
|
|
int v8 = 341;
|
|
|
|
if (vc < 0)
|
|
v8 = -341;
|
|
|
|
if (nnExtCanMove(actor, actor->GetTarget(), pSprite->ang + vc, vsi))
|
|
pXSprite->goalAng = pSprite->ang + vc;
|
|
else if (nnExtCanMove(actor, actor->GetTarget(), pSprite->ang + vc / 2, vsi))
|
|
pXSprite->goalAng = pSprite->ang + vc / 2;
|
|
else if (nnExtCanMove(actor, actor->GetTarget(), pSprite->ang - vc / 2, vsi))
|
|
pXSprite->goalAng = pSprite->ang - vc / 2;
|
|
else if (nnExtCanMove(actor, actor->GetTarget(), pSprite->ang + v8, vsi))
|
|
pXSprite->goalAng = pSprite->ang + v8;
|
|
else if (nnExtCanMove(actor, actor->GetTarget(), pSprite->ang, vsi))
|
|
pXSprite->goalAng = pSprite->ang;
|
|
else if (nnExtCanMove(actor, actor->GetTarget(), pSprite->ang - v8, vsi))
|
|
pXSprite->goalAng = pSprite->ang - v8;
|
|
else
|
|
pXSprite->goalAng = pSprite->ang + 341;
|
|
|
|
if (pXSprite->dodgeDir)
|
|
{
|
|
if (!nnExtCanMove(actor, actor->GetTarget(), pSprite->ang + pXSprite->dodgeDir * 512, 512))
|
|
{
|
|
pXSprite->dodgeDir = -pXSprite->dodgeDir;
|
|
if (!nnExtCanMove(actor, actor->GetTarget(), pSprite->ang + pXSprite->dodgeDir * 512, 512))
|
|
pXSprite->dodgeDir = 0;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
/// patrol functions
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolState(DBloodActor* actor, int state)
|
|
{
|
|
spritetype* pSprite = &actor->s();
|
|
assert(pSprite->type >= kDudeBase && pSprite->type < kDudeMax && actor->hasX());
|
|
assert(actor->GetTarget());
|
|
|
|
XSPRITE* pXSprite = &actor->x();
|
|
|
|
auto markeractor = actor->GetTarget();
|
|
spritetype* pMarker = &markeractor->s();
|
|
XSPRITE* pXMarker = &markeractor->x();
|
|
assert(pMarker->type == kMarkerPath);
|
|
|
|
bool nSeqOverride = false, crouch = false;
|
|
int i, seq = -1, start = 0, end = kPatrolStateSize;
|
|
|
|
const DUDEINFO_EXTRA* pExtra = &gDudeInfoExtra[pSprite->type - kDudeBase];
|
|
|
|
switch (state) {
|
|
case kAiStatePatrolWaitL:
|
|
seq = pExtra->idlgseqofs;
|
|
start = 0; end = 2;
|
|
break;
|
|
case kAiStatePatrolMoveL:
|
|
seq = pExtra->mvegseqofs;
|
|
start = 2, end = 7;
|
|
break;
|
|
case kAiStatePatrolTurnL:
|
|
seq = pExtra->mvegseqofs;
|
|
start = 7, end = 12;
|
|
break;
|
|
case kAiStatePatrolWaitW:
|
|
seq = pExtra->idlwseqofs;
|
|
start = 12; end = 18;
|
|
break;
|
|
case kAiStatePatrolMoveW:
|
|
seq = pExtra->mvewseqofs;
|
|
start = 18; end = 25;
|
|
break;
|
|
case kAiStatePatrolTurnW:
|
|
seq = pExtra->mvewseqofs;
|
|
start = 25; end = 32;
|
|
break;
|
|
case kAiStatePatrolWaitC:
|
|
seq = pExtra->idlcseqofs;
|
|
start = 32; end = 36;
|
|
crouch = true;
|
|
break;
|
|
case kAiStatePatrolMoveC:
|
|
seq = pExtra->mvecseqofs;
|
|
start = 36; end = 39;
|
|
crouch = true;
|
|
break;
|
|
case kAiStatePatrolTurnC:
|
|
seq = pExtra->mvecseqofs;
|
|
start = 39; end = kPatrolStateSize;
|
|
crouch = true;
|
|
break;
|
|
}
|
|
|
|
|
|
if (pXMarker->data4 > 0) seq = pXMarker->data4, nSeqOverride = true;
|
|
else if (!nSeqOverride && state == kAiStatePatrolWaitC && (pSprite->type == kDudeCultistTesla || pSprite->type == kDudeCultistTNT))
|
|
seq = 11537, nSeqOverride = true; // these don't have idle crouch seq for some reason...
|
|
|
|
if (seq < 0)
|
|
return aiPatrolStop(actor, nullptr);
|
|
|
|
for (i = start; i < end; i++)
|
|
{
|
|
AISTATE* newState = &genPatrolStates[i];
|
|
if (newState->stateType != state || (!nSeqOverride && seq != newState->seqId))
|
|
continue;
|
|
|
|
if (pSprite->type == kDudeModernCustom) aiGenDudeNewState(actor, newState);
|
|
else aiNewState(actor, newState);
|
|
|
|
if (crouch) pXSprite->unused1 |= kDudeFlagCrouch;
|
|
else pXSprite->unused1 &= ~kDudeFlagCrouch;
|
|
|
|
if (nSeqOverride)
|
|
seqSpawn(seq, actor);
|
|
|
|
return;
|
|
}
|
|
|
|
if (i == end)
|
|
{
|
|
viewSetSystemMessage("No patrol state #%d found for dude #%d (type = %d)", state, actor->GetIndex(), pSprite->type);
|
|
aiPatrolStop(actor, nullptr);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// check if some dude already follows the given marker
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DBloodActor* aiPatrolMarkerBusy(DBloodActor* except, DBloodActor* marker)
|
|
{
|
|
BloodStatIterator it(kStatDude);
|
|
while (auto actor = it.Next())
|
|
{
|
|
if (!actor->IsDudeActor() || actor == except || !actor->hasX())
|
|
continue;
|
|
|
|
auto targ = actor->GetTarget();
|
|
if (actor->x().health > 0 && targ != nullptr && targ->s().type == kMarkerPath && targ == marker)
|
|
return actor;
|
|
}
|
|
return nullptr;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
// check if some dude already follows the given marker
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool aiPatrolMarkerReached(DBloodActor* actor)
|
|
{
|
|
spritetype* pSprite = &actor->s();
|
|
XSPRITE* pXSprite = &actor->x();
|
|
assert(pSprite->type >= kDudeBase && pSprite->type < kDudeMax);
|
|
|
|
const DUDEINFO_EXTRA* pExtra = &gDudeInfoExtra[pSprite->type - kDudeBase];
|
|
auto markeractor = actor->GetTarget();
|
|
if (markeractor && markeractor->s().type == kMarkerPath)
|
|
{
|
|
spritetype* pMarker = &markeractor->s();
|
|
int okDist = ClipLow(pMarker->clipdist << 1, 4);
|
|
int oX = abs(pMarker->x - pSprite->x) >> 4;
|
|
int oY = abs(pMarker->y - pSprite->y) >> 4;
|
|
|
|
if (approxDist(oX, oY) <= okDist)
|
|
{
|
|
if (spriteIsUnderwater(actor) || pExtra->flying)
|
|
{
|
|
okDist = pMarker->clipdist << 4;
|
|
int ztop, zbot, ztop2, zbot2;
|
|
GetActorExtents(actor, &ztop, &zbot);
|
|
GetActorExtents(markeractor, &ztop2, &zbot2);
|
|
|
|
int oZ1 = abs(zbot - ztop2) >> 6;
|
|
int oZ2 = abs(ztop - zbot2) >> 6;
|
|
if (oZ1 > okDist && oZ2 > okDist)
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DBloodActor* findNextMarker(DBloodActor* mark, bool back)
|
|
{
|
|
auto pXMark = &mark->x();
|
|
|
|
BloodStatIterator it(kStatPathMarker);
|
|
while (auto next = it.Next())
|
|
{
|
|
if (!next->hasX() || next == mark) continue;
|
|
|
|
XSPRITE* pXNext = &next->x();
|
|
if ((pXNext->locked || pXNext->isTriggered || pXNext->DudeLockout) || (back && pXNext->data2 != pXMark->data1) || (!back && pXNext->data1 != pXMark->data2))
|
|
continue;
|
|
|
|
return next;
|
|
}
|
|
return nullptr;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool markerIsNode(DBloodActor* mark, bool back)
|
|
{
|
|
auto pXMark = &mark->x();
|
|
int cnt = 0;
|
|
|
|
BloodStatIterator it(kStatPathMarker);
|
|
while (auto next = it.Next())
|
|
{
|
|
if (!next->hasX() || next == mark) continue;
|
|
|
|
XSPRITE* pXNext = &next->x();
|
|
|
|
if ((pXNext->locked || pXNext->isTriggered || pXNext->DudeLockout) || (back && pXNext->data2 != pXMark->data1) || (!back && pXNext->data1 != pXMark->data2))
|
|
continue;
|
|
|
|
if (++cnt > 1)
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolSetMarker(spritetype* pSprite, XSPRITE* pXSprite)
|
|
{
|
|
auto actor = &bloodActors[pSprite->index];
|
|
auto targetactor = actor->GetTarget();
|
|
|
|
spritetype* pNext = NULL; XSPRITE* pXNext = NULL;
|
|
spritetype* pPrev = NULL; XSPRITE* pXPrev = NULL;
|
|
|
|
int path = -1; int firstFinePath = -1; int prev = -1, next, i, closest = 200000;
|
|
|
|
// select closest marker that dude can see
|
|
if (pXSprite->target_i <= 0) {
|
|
|
|
int zt1, zb1, zt2, zb2, dist;
|
|
GetActorExtents(actor, &zt2, &zb2);
|
|
for (i = headspritestat[kStatPathMarker]; i != -1; i = nextspritestat[i]) {
|
|
|
|
if (!xspriRangeIsFine(sprite[i].extra))
|
|
continue;
|
|
|
|
pNext = &sprite[i]; pXNext = &xsprite[pNext->extra];
|
|
if (pXNext->locked || pXNext->isTriggered || pXNext->DudeLockout || (dist = approxDist(pNext->x - pSprite->x, pNext->y - pSprite->y)) > closest)
|
|
continue;
|
|
|
|
GetSpriteExtents(pNext, &zt1, &zb1);
|
|
if (cansee(pNext->x, pNext->y, zt1, pNext->sectnum, pSprite->x, pSprite->y, zt2, pSprite->sectnum))
|
|
{
|
|
closest = dist;
|
|
path = pNext->index;
|
|
}
|
|
}
|
|
}
|
|
// set next marker
|
|
else if (targetactor->s().type == kMarkerPath && targetactor->hasX())
|
|
{
|
|
// idea: which one of next (allowed) markers are closer to the potential target?
|
|
// idea: -3 select random next marker that dude can see in radius of reached marker
|
|
// if reached marker is in radius of another marker with -3, but greater radius, use that marker
|
|
// idea: for nodes only flag32 = specify if enemy must return back to node or allowed to select
|
|
// another marker which belongs that node?
|
|
|
|
int breakChance = 0;
|
|
auto pCur = &targetactor->s();
|
|
auto pXCur = &targetactor->x();
|
|
if (pXSprite->targetX >= 0)
|
|
{
|
|
pPrev = &sprite[pXSprite->targetX];
|
|
pXPrev = &xsprite[pPrev->extra];
|
|
}
|
|
prev = pCur->index;
|
|
|
|
bool node = markerIsNode(targetactor, false);
|
|
pXSprite->unused2 = aiPatrolGetPathDir(pXSprite, pXCur); // decide if it should go back or forward
|
|
if (pXSprite->unused2 == kPatrolMoveBackward && Chance(0x8000) && node)
|
|
pXSprite->unused2 = kPatrolMoveForward;
|
|
|
|
bool back = (pXSprite->unused2 == kPatrolMoveBackward); next = (back) ? pXCur->data1 : pXCur->data2;
|
|
for (i = headspritestat[kStatPathMarker]; i != -1; i = nextspritestat[i]) {
|
|
|
|
if (sprite[i].index == pXSprite->target_i || !xspriRangeIsFine(sprite[i].extra)) continue;
|
|
else if (pXSprite->targetX >= 0 && sprite[i].index == pPrev->index && node) {
|
|
if (pXCur->data2 == pXPrev->data1)
|
|
continue;
|
|
}
|
|
|
|
pXNext = &xsprite[sprite[i].extra];
|
|
if ((pXNext->locked || pXNext->isTriggered || pXNext->DudeLockout) || (back && pXNext->data2 != next) || (!back && pXNext->data1 != next))
|
|
continue;
|
|
|
|
if (firstFinePath == -1) firstFinePath = pXNext->reference;
|
|
if (aiPatrolMarkerBusy(&bloodActors[pSprite->index], &bloodActors[pXNext->reference]) && !Chance(0x0010)) continue;
|
|
else path = pXNext->reference;
|
|
|
|
breakChance += nnExtRandom(1, 5);
|
|
if (breakChance >= 5)
|
|
break;
|
|
|
|
}
|
|
|
|
if (firstFinePath == -1) {
|
|
|
|
viewSetSystemMessage("No markers with id #%d found for dude #%d! (back = %d)", next, pSprite->index, back);
|
|
return;
|
|
|
|
}
|
|
|
|
if (path == -1)
|
|
path = firstFinePath;
|
|
|
|
}
|
|
|
|
if (!spriRangeIsFine(path))
|
|
return;
|
|
|
|
pXSprite->target_i = path;
|
|
pXSprite->targetX = prev; // keep previous marker index here, use actual sprite coords when selecting direction
|
|
sprite[path].owner = pSprite->index;
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolStop(DBloodActor* actor, DBloodActor* targetactor, bool alarm)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
if (actor->hasX())
|
|
{
|
|
XSPRITE* pXSprite = &actor->x();
|
|
pXSprite->data3 = 0; // reset spot progress
|
|
pXSprite->unused1 &= ~kDudeFlagCrouch; // reset the crouch status
|
|
pXSprite->unused2 = kPatrolMoveForward; // reset path direction
|
|
pXSprite->targetX = -1; // reset the previous marker index
|
|
if (pXSprite->health <= 0)
|
|
return;
|
|
|
|
auto mytarget = actor->GetTarget();
|
|
|
|
if (mytarget && mytarget->s().type == kMarkerPath)
|
|
{
|
|
if (targetactor == nullptr) pSprite->ang = mytarget->s().ang & 2047;
|
|
actor->SetTarget(nullptr);
|
|
}
|
|
|
|
bool patrol = pXSprite->dudeFlag4;
|
|
pXSprite->dudeFlag4 = 0;
|
|
if (targetactor && targetactor->hasX() && targetactor->IsDudeActor())
|
|
{
|
|
aiSetTarget(actor, targetactor);
|
|
aiActivateDude(actor);
|
|
|
|
// alarm only when in non-recoil state?
|
|
//if (((pXSprite->unused1 & kDudeFlagStealth) && stype != kAiStateRecoil) || !(pXSprite->unused1 & kDudeFlagStealth)) {
|
|
if (alarm) aiPatrolAlarmFull(pSprite, &targetactor->x(), Chance(0x0100));
|
|
else aiPatrolAlarmLite(pSprite, &targetactor->x());
|
|
//}
|
|
|
|
}
|
|
else
|
|
{
|
|
aiInitSprite(actor);
|
|
aiSetTarget(actor, pXSprite->targetX, pXSprite->targetY, pXSprite->targetZ);
|
|
}
|
|
|
|
pXSprite->dudeFlag4 = patrol; // this must be kept so enemy can patrol after respawn again
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolRandGoalAng(DBloodActor* actor)
|
|
{
|
|
int goal = kAng90;
|
|
if (Chance(0x4000))
|
|
goal = kAng120;
|
|
|
|
if (Chance(0x4000))
|
|
goal = kAng180;
|
|
|
|
if (Chance(0x8000))
|
|
goal = -goal;
|
|
|
|
actor->x().goalAng = (actor->s().ang + goal) & 2047;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolTurn(DBloodActor* actor)
|
|
{
|
|
auto pXSprite = &actor->x();
|
|
auto pSprite = &actor->s();
|
|
|
|
int nTurnRange = (getDudeInfo(pSprite->type)->angSpeed << 1) >> 4;
|
|
int nAng = ((pXSprite->goalAng + 1024 - pSprite->ang) & 2047) - 1024;
|
|
pSprite->ang = (pSprite->ang + ClipRange(nAng, -nTurnRange, nTurnRange)) & 2047;
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolMove(DBloodActor* actor)
|
|
{
|
|
auto pXSprite = &actor->x();
|
|
auto pSprite = &actor->s();
|
|
auto targetactor = actor->GetTarget();
|
|
|
|
if (!(pSprite->type >= kDudeBase && pSprite->type < kDudeMax) || !targetactor)
|
|
return;
|
|
|
|
|
|
int dudeIdx = pSprite->type - kDudeBase;
|
|
switch (pSprite->type)
|
|
{
|
|
case kDudeCultistShotgunProne: dudeIdx = kDudeCultistShotgun - kDudeBase; break;
|
|
case kDudeCultistTommyProne: dudeIdx = kDudeCultistTommy - kDudeBase; break;
|
|
}
|
|
|
|
spritetype* pTarget = &targetactor->s();
|
|
XSPRITE* pXTarget = &targetactor->x();
|
|
DUDEINFO* pDudeInfo = &dudeInfo[dudeIdx];
|
|
const DUDEINFO_EXTRA* pExtra = &gDudeInfoExtra[dudeIdx];
|
|
|
|
int dx = (pTarget->x - pSprite->x);
|
|
int dy = (pTarget->y - pSprite->y);
|
|
int dz = (pTarget->z - (pSprite->z - pDudeInfo->eyeHeight)) * 6;
|
|
int vel = (pXSprite->unused1 & kDudeFlagCrouch) ? kMaxPatrolCrouchVelocity : kMaxPatrolVelocity;
|
|
int goalAng = 341;
|
|
|
|
if (pExtra->flying || spriteIsUnderwater(actor))
|
|
{
|
|
goalAng >>= 1;
|
|
zvel[pSprite->index] = dz;
|
|
if (pSprite->flags & kPhysGravity)
|
|
pSprite->flags &= ~kPhysGravity;
|
|
}
|
|
else if (!pExtra->flying)
|
|
{
|
|
pSprite->flags |= kPhysGravity | kPhysFalling;
|
|
}
|
|
|
|
int nTurnRange = (pDudeInfo->angSpeed << 2) >> 4;
|
|
int nAng = ((pXSprite->goalAng + 1024 - pSprite->ang) & 2047) - 1024;
|
|
pSprite->ang = (pSprite->ang + ClipRange(nAng, -nTurnRange, nTurnRange)) & 2047;
|
|
|
|
if (abs(nAng) > goalAng || ((pXTarget->waitTime > 0 || pXTarget->data1 == pXTarget->data2) && aiPatrolMarkerReached(actor)))
|
|
{
|
|
actor->xvel() = 0;
|
|
actor->yvel() = 0;
|
|
return;
|
|
}
|
|
|
|
if (actor->hit().hit.type == kHitSprite)
|
|
{
|
|
auto hitactor = actor->hit().hit.actor;
|
|
hitactor->x().dodgeDir = -1;
|
|
pXSprite->dodgeDir = 1;
|
|
aiMoveDodge(hitactor);
|
|
}
|
|
else
|
|
{
|
|
int frontSpeed = aiPatrolGetVelocity(pDudeInfo->frontSpeed, pXTarget->busyTime);
|
|
actor->xvel() += MulScale(frontSpeed, Cos(pSprite->ang), 30);
|
|
actor->yvel() += MulScale(frontSpeed, Sin(pSprite->ang), 30);
|
|
}
|
|
|
|
vel = MulScale(vel, approxDist(dx, dy) << 6, 16);
|
|
actor->xvel() = ClipRange(actor->xvel(), -vel, vel);
|
|
actor->yvel() = ClipRange(actor->yvel(), -vel, vel);
|
|
return;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void aiPatrolAlarmLite(spritetype* pSprite, XSPRITE* pXTarget) {
|
|
|
|
if (!xsprIsFine(pSprite) || !IsDudeSprite(pSprite))
|
|
return;
|
|
|
|
auto targetactor = &bloodActors[pXTarget->reference];
|
|
XSPRITE* pXSprite = &xsprite[pSprite->extra];
|
|
if (pXSprite->health <= 0)
|
|
return;
|
|
|
|
spritetype* pDude = NULL; XSPRITE* pXDude = NULL;
|
|
spritetype* pTarget = &sprite[pXTarget->reference];
|
|
|
|
int zt1, zb1, zt2, zb2; //int eaz1 = (getDudeInfo(pSprite->type)->eyeHeight * pSprite->yrepeat) << 2;
|
|
GetSpriteExtents(pSprite, &zt1, &zb1); GetSpriteExtents(pTarget, &zt2, &zb2);
|
|
|
|
for (int nSprite = headspritestat[kStatDude]; nSprite >= 0; nSprite = nextspritestat[nSprite]) {
|
|
|
|
auto dudeactor = &bloodActors[nSprite];
|
|
pDude = &dudeactor->s();
|
|
if (pDude->index == pSprite->index || !IsDudeSprite(pDude) || IsPlayerSprite(pDude) || pDude->extra < 0)
|
|
continue;
|
|
|
|
pXDude = &dudeactor->x();
|
|
if (pXDude->health <= 0)
|
|
continue;
|
|
|
|
int eaz2 = (getDudeInfo(pTarget->type)->eyeHeight * pTarget->yrepeat) << 2;
|
|
int nDist = approxDist(pDude->x - pSprite->x, pDude->y - pSprite->y);
|
|
if (nDist >= kPatrolAlarmSeeDist || !cansee(pSprite->x, pSprite->y, zt1, pSprite->sectnum, pDude->x, pDude->y, pDude->z - eaz2, pDude->sectnum)) {
|
|
|
|
nDist = approxDist(pDude->x - pTarget->x, pDude->y - pTarget->y);
|
|
if (nDist >= kPatrolAlarmSeeDist || !cansee(pTarget->x, pTarget->y, zt2, pTarget->sectnum, pDude->x, pDude->y, pDude->z - eaz2, pDude->sectnum))
|
|
continue;
|
|
|
|
}
|
|
|
|
if (aiInPatrolState(pXDude->aiState)) aiPatrolStop(dudeactor, dudeactor->GetTarget());
|
|
if (pXDude->target_i >= 0 || pXDude->target_i == pXSprite->target_i)
|
|
continue;
|
|
|
|
aiSetTarget(dudeactor, targetactor);
|
|
aiActivateDude(dudeactor);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
void aiPatrolAlarmFull(spritetype* pSprite, XSPRITE* pXTarget, bool chain) {
|
|
|
|
if (!xsprIsFine(pSprite) || !IsDudeSprite(pSprite))
|
|
return;
|
|
|
|
XSPRITE* pXSprite = &xsprite[pSprite->extra];
|
|
if (pXSprite->health <= 0)
|
|
return;
|
|
|
|
spritetype* pDude = NULL; XSPRITE* pXDude = NULL;
|
|
spritetype* pTarget = &sprite[pXTarget->reference];
|
|
|
|
int eaz2 = (getDudeInfo(pSprite->type)->eyeHeight * pSprite->yrepeat) << 2;
|
|
int x2 = pSprite->x, y2 = pSprite->y, z2 = pSprite->z - eaz2, sect2 = pSprite->sectnum;
|
|
|
|
int tzt, tzb; GetSpriteExtents(pTarget, &tzt, &tzb);
|
|
int x3 = pTarget->x, y3 = pTarget->y, z3 = tzt, sect3 = pTarget->sectnum;
|
|
|
|
|
|
for (int nSprite = headspritestat[kStatDude]; nSprite >= 0; nSprite = nextspritestat[nSprite]) {
|
|
|
|
auto dudeactor = &bloodActors[nSprite];
|
|
pDude = &dudeactor->s();
|
|
if (pDude->index == pSprite->index || !IsDudeSprite(pDude) || IsPlayerSprite(pDude) || pDude->extra < 0)
|
|
continue;
|
|
|
|
pXDude = &dudeactor->x();
|
|
if (pXDude->health <= 0)
|
|
continue;
|
|
|
|
int eaz1 = (getDudeInfo(pDude->type)->eyeHeight * pDude->yrepeat) << 2;
|
|
int x1 = pDude->x, y1 = pDude->y, z1 = pDude->z - eaz1, sect1 = pDude->sectnum;
|
|
|
|
int nDist1 = approxDist(x1 - x2, y1 - y2);
|
|
int nDist2 = approxDist(x1 - x3, y1 - y3);
|
|
//int hdist = (pXDude->dudeDeaf) ? 0 : getDudeInfo(pDude->type)->hearDist / 4;
|
|
int sdist = (pXDude->dudeGuard) ? 0 : getDudeInfo(pDude->type)->seeDist / 2;
|
|
|
|
if (//(nDist1 < hdist || nDist2 < hdist) ||
|
|
((nDist1 < sdist && cansee(x1, y1, z1, sect1, x2, y2, z2, sect2)) || (nDist2 < sdist && cansee(x1, y1, z1, sect1, x3, y3, z3, sect3)))) {
|
|
|
|
if (aiInPatrolState(pXDude->aiState)) aiPatrolStop(dudeactor, dudeactor->GetTarget());
|
|
if (pXDude->target_i >= 0 || pXDude->target_i == pXSprite->target_i)
|
|
continue;
|
|
|
|
if (spriRangeIsFine(pXSprite->target_i)) aiSetTarget(dudeactor, &bloodActors[pXSprite->target_i]);
|
|
else aiSetTarget(dudeactor, pSprite->x, pSprite->y, pSprite->z);
|
|
aiActivateDude(dudeactor);
|
|
|
|
if (chain)
|
|
aiPatrolAlarmFull(pDude, pXTarget, Chance(0x0010));
|
|
|
|
//Printf("Dude #%d alarms dude #%d", pSprite->index, pDude->index);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
bool spritesTouching(int nXSprite1, int nXSprite2) {
|
|
|
|
if (!xspriRangeIsFine(nXSprite1) || !xspriRangeIsFine(nXSprite2))
|
|
return false;
|
|
|
|
DBloodActor* hitactor = nullptr;
|
|
if (gSpriteHit[nXSprite1].hit.type == kHitSprite) hitactor = gSpriteHit[nXSprite1].hit.actor;
|
|
else if (gSpriteHit[nXSprite1].florhit.type == kHitSprite) hitactor = gSpriteHit[nXSprite1].florhit.actor;
|
|
else if (gSpriteHit[nXSprite1].ceilhit.type == kHitSprite) hitactor = gSpriteHit[nXSprite1].ceilhit.actor;
|
|
else return false;
|
|
return hitactor->hasX() && hitactor->s().extra == nXSprite2;
|
|
}
|
|
|
|
bool aiCanCrouch(DBloodActor* actor)
|
|
{
|
|
auto pSprite = &actor->s();
|
|
if (pSprite->type >= kDudeBase && pSprite->type < kDudeVanillaMax)
|
|
return (gDudeInfoExtra[pSprite->type - kDudeBase].idlcseqofs >= 0 && gDudeInfoExtra[pSprite->type - kDudeBase].mvecseqofs >= 0);
|
|
else if (pSprite->type == kDudeModernCustom || pSprite->type == kDudeModernCustomBurning)
|
|
return actor->genDudeExtra.canDuck;
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
bool readyForCrit(spritetype* pHunter, spritetype* pVictim) {
|
|
|
|
if (!(pHunter->type >= kDudeBase && pHunter->type < kDudeMax) || !(pVictim->type >= kDudeBase && pVictim->type < kDudeMax))
|
|
return false;
|
|
|
|
int dx, dy;
|
|
dx = pVictim->x - pHunter->x;
|
|
dy = pVictim->y - pHunter->y;
|
|
if (approxDist(dx, dy) >= (7000 / ClipLow(gGameOptions.nDifficulty >> 1, 1)))
|
|
return false;
|
|
|
|
return (abs(((getangle(dx, dy) + 1024 - pVictim->ang) & 2047) - 1024) <= kAng45);
|
|
}
|
|
|
|
|
|
|
|
int aiPatrolSearchTargets(spritetype* pSprite, XSPRITE* pXSprite) {
|
|
|
|
enum { kMaxPatrolFoundSounds = 256 }; // should be the maximum amount of sound channels the engine can play at the same time.
|
|
PATROL_FOUND_SOUNDS patrolBonkles[kMaxPatrolFoundSounds];
|
|
|
|
assert(pSprite->type >= kDudeBase && pSprite->type < kDudeMax);
|
|
DUDEINFO* pDudeInfo = getDudeInfo(pSprite->type); PLAYER* pPlayer = NULL;
|
|
|
|
for (int i = 0; i < kMaxPatrolFoundSounds; i++) {
|
|
patrolBonkles[i].snd = patrolBonkles[i].cur = 0;
|
|
patrolBonkles[i].max = ClipLow((gGameOptions.nDifficulty + 1) >> 1, 1);
|
|
}
|
|
|
|
int i, j, f, mod, x, y, z, dx, dy, nDist, eyeAboveZ, target = -1, sndCnt = 0, seeDist, hearDist, feelDist, seeChance, hearChance;
|
|
bool stealth = (pXSprite->unused1 & kDudeFlagStealth); bool blind = (pXSprite->dudeGuard); bool deaf = (pXSprite->dudeDeaf);
|
|
|
|
// search for player targets
|
|
for (i = connecthead; i != -1; i = connectpoint2[i]) {
|
|
|
|
pPlayer = &gPlayer[i];
|
|
spritetype* pSpr = pPlayer->pSprite;
|
|
if (!xsprIsFine(pSpr))
|
|
continue;
|
|
|
|
XSPRITE* pXSpr = &xsprite[pSpr->extra];
|
|
if (pXSpr->health <= 0)
|
|
continue;
|
|
|
|
target = -1; seeChance = hearChance = 0x0000;
|
|
x = pSpr->x, y = pSpr->y, z = pSpr->z, dx = x - pSprite->x, dy = y - pSprite->y; nDist = approxDist(dx, dy);
|
|
seeDist = (stealth) ? pDudeInfo->seeDist / 3 : pDudeInfo->seeDist >> 1;
|
|
hearDist = pDudeInfo->hearDist; feelDist = hearDist >> 1;
|
|
|
|
// TO-DO: is there any dudes that sees this patrol dude and sees target?
|
|
|
|
|
|
if (nDist <= seeDist) {
|
|
|
|
eyeAboveZ = (pDudeInfo->eyeHeight * pSprite->yrepeat) << 2;
|
|
if (nDist < seeDist >> 3) GetSpriteExtents(pSpr, &z, &j); //use ztop of the target sprite
|
|
if (!cansee(x, y, z, pSpr->sectnum, pSprite->x, pSprite->y, pSprite->z - eyeAboveZ, pSprite->sectnum))
|
|
continue;
|
|
|
|
} else {
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
bool invisible = (powerupCheck(pPlayer, kPwUpShadowCloak) > 0);
|
|
if (spritesTouching(pSprite->extra, pSpr->extra) || spritesTouching(pSpr->extra, pSprite->extra)) {
|
|
|
|
DPrintf(DMSG_SPAMMY, "Patrol dude #%d spot the Player #%d via touch.", pSprite->index, pPlayer->nPlayer + 1);
|
|
if (invisible) pPlayer->pwUpTime[kPwUpShadowCloak] = 0;
|
|
target = pSpr->index;
|
|
break;
|
|
|
|
}
|
|
|
|
if (!deaf) {
|
|
|
|
soundEngine->EnumerateChannels([&](FSoundChan* chan)
|
|
{
|
|
int sndx = 0, sndy = 0;
|
|
int searchsect = -1;
|
|
if (chan->SourceType == SOURCE_Actor)
|
|
{
|
|
auto emitter = (spritetype*)chan->Source;
|
|
if (emitter < sprite || emitter >= sprite + MAXSPRITES || emitter->statnum == kStatFree) return false; // not a valid source.
|
|
sndx = emitter->x;
|
|
sndy = emitter->y;
|
|
|
|
// sound attached to the sprite
|
|
if (pSpr->index != emitter->index && emitter->owner != pSpr->index) {
|
|
|
|
if (!sectRangeIsFine(emitter->sectnum)) return false;
|
|
searchsect = emitter->sectnum;
|
|
}
|
|
}
|
|
else if (chan->SourceType == SOURCE_Unattached)
|
|
{
|
|
if (chan->UserData < 0 || chan->UserData >= numsectors) return false; // not a vaild sector sound.
|
|
sndx = int(chan->Point[0] * 16);
|
|
sndy = int(chan->Point[1] * -16);
|
|
searchsect = chan->UserData;
|
|
}
|
|
if (searchsect == -1) return false;
|
|
int nDist = approxDist(sndx - pSprite->x, sndy - pSprite->y);
|
|
if (nDist > hearDist) return false;
|
|
|
|
|
|
int sndnum = chan->OrgID;
|
|
|
|
// N same sounds per single enemy
|
|
for (int f = 0; f < sndCnt; f++)
|
|
{
|
|
if (patrolBonkles[f].snd != sndnum) continue;
|
|
else if (++patrolBonkles[f].cur >= patrolBonkles[f].max)
|
|
return false;
|
|
}
|
|
if (sndCnt < kMaxPatrolFoundSounds - 1)
|
|
patrolBonkles[sndCnt++].snd = sndnum;
|
|
|
|
bool found = false;
|
|
BloodSectIterator it(searchsect);
|
|
while (auto act = it.Next())
|
|
{
|
|
if (act->GetOwner() == &bloodActors[pSpr->index])
|
|
{
|
|
found = true;
|
|
break;
|
|
}
|
|
}
|
|
if (!found) return false;
|
|
|
|
f = ClipLow((hearDist - nDist) / 8, 0);
|
|
int sndvol = int(chan->Volume * (80.f / 0.8f));
|
|
hearChance += mulscale8(sndvol, f) + Random(gGameOptions.nDifficulty);
|
|
return (hearChance >= kMaxPatrolSpotValue);
|
|
});
|
|
|
|
if (invisible && hearChance >= kMaxPatrolSpotValue >> 2)
|
|
{
|
|
target = pSpr->index;
|
|
pPlayer->pwUpTime[kPwUpShadowCloak] = 0;
|
|
invisible = false;
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
if (!invisible && (!deaf || !blind)) {
|
|
|
|
if (stealth) {
|
|
|
|
switch (pPlayer->lifeMode) {
|
|
case kModeHuman:
|
|
case kModeHumanShrink:
|
|
if (pPlayer->lifeMode == kModeHumanShrink) {
|
|
seeDist -= mulscale8(164, seeDist);
|
|
feelDist -= mulscale8(164, feelDist);
|
|
}
|
|
if (pPlayer->posture == kPostureCrouch) {
|
|
seeDist -= mulscale8(64, seeDist);
|
|
feelDist -= mulscale8(128, feelDist);
|
|
}
|
|
break;
|
|
case kModeHumanGrown:
|
|
if (pPlayer->posture != kPostureCrouch) {
|
|
seeDist += mulscale8(72, seeDist);
|
|
feelDist += mulscale8(64, feelDist);
|
|
} else {
|
|
seeDist += mulscale8(48, seeDist);
|
|
}
|
|
break;
|
|
}
|
|
|
|
}
|
|
|
|
bool itCanHear = false; bool itCanSee = false;
|
|
feelDist = ClipLow(feelDist, 0); seeDist = ClipLow(seeDist, 0);
|
|
|
|
if (hearDist) {
|
|
|
|
itCanHear = (!deaf && (nDist < hearDist || hearChance > 0));
|
|
if (itCanHear && nDist < feelDist && (xvel[pSpr->index] || yvel[pSpr->index] || zvel[pSpr->index]))
|
|
hearChance += ClipLow(mulscale8(1, ClipLow(((feelDist - nDist) + (abs(xvel[pSpr->index]) + abs(yvel[pSpr->index]) + abs(zvel[pSpr->index]))) >> 6, 0)), 0);
|
|
}
|
|
|
|
if (seeDist) {
|
|
|
|
int periphery = ClipLow(pDudeInfo->periphery, kAng60);
|
|
int nDeltaAngle = abs(((getangle(dx, dy) + 1024 - pSprite->ang) & 2047) - 1024);
|
|
if ((itCanSee = (!blind && nDist < seeDist && nDeltaAngle < periphery)) == true) {
|
|
|
|
int base = 100 + ((20 * gGameOptions.nDifficulty) - (nDeltaAngle / 5));
|
|
//seeChance = base - MulScale(ClipRange(5 - gGameOptions.nDifficulty, 1, 4), nDist >> 1, 16);
|
|
//scale(0x40000, a6, dist2);
|
|
int d = nDist >> 2;
|
|
int m = DivScale(d, 0x2000, 8);
|
|
int t = MulScale(d, m, 8);
|
|
//int n = mulscale8(nDeltaAngle >> 2, 64);
|
|
seeChance = ClipRange(DivScale(base, t, 8), 0, kMaxPatrolSpotValue >> 1);
|
|
//seeChance = scale(0x1000, base, t);
|
|
//viewSetSystemMessage("SEE CHANCE: %d, BASE %d, DIST %d, T %d", seeChance, base, nDist, t);
|
|
//itCanSee = false;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (!itCanSee && !itCanHear)
|
|
continue;
|
|
|
|
if (stealth) {
|
|
|
|
// search in stealth regions to modify spot chances
|
|
for (j = headspritestat[kStatModernStealthRegion]; j != -1; j = nextspritestat[j]) {
|
|
|
|
spritetype* pSteal = &sprite[j];
|
|
if (!xspriRangeIsFine(pSteal->extra))
|
|
continue;
|
|
|
|
XSPRITE* pXSteal = &xsprite[pSteal->extra];
|
|
if (pXSteal->locked) // ignore locked regions
|
|
continue;
|
|
|
|
bool fixd = (pSteal->flags & kModernTypeFlag1); // fixed percent value
|
|
bool both = (pSteal->flags & kModernTypeFlag4); // target AND dude must be in this region
|
|
bool dude = (both || (pSteal->flags & kModernTypeFlag2)); // dude must be in this region
|
|
bool trgt = (both || !dude); // target must be in this region
|
|
bool crouch = (pSteal->flags & kModernTypeFlag8); // target must crouch
|
|
//bool floor = (pSteal->cstat & CSTAT_SPRITE_BLOCK); // target (or dude?) must touch floor of the sector
|
|
|
|
if (trgt) {
|
|
|
|
if (pXSteal->data1 > 0)
|
|
{
|
|
if (approxDist(abs(pSteal->x - pSpr->x) >> 4, abs(pSteal->y - pSpr->y) >> 4) >= pXSteal->data1)
|
|
continue;
|
|
|
|
} else if (pSpr->sectnum != pSteal->sectnum)
|
|
continue;
|
|
|
|
if (crouch && pPlayer->posture == kPostureStand)
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
if (dude) {
|
|
|
|
if (pXSteal->data1 > 0)
|
|
{
|
|
if (approxDist(abs(pSteal->x - pSprite->x) >> 4, abs(pSteal->y - pSprite->y) >> 4) >= pXSteal->data1)
|
|
continue;
|
|
|
|
} else if (pSprite->sectnum != pSteal->sectnum)
|
|
continue;
|
|
|
|
}
|
|
|
|
if (itCanHear) {
|
|
|
|
if (fixd)
|
|
hearChance = ClipLow(hearChance, pXSteal->data2);
|
|
|
|
mod = (hearChance * pXSteal->data2) / kPercFull;
|
|
if (fixd) hearChance = mod; else hearChance += mod;
|
|
|
|
hearChance = ClipRange(hearChance, -kMaxPatrolSpotValue, kMaxPatrolSpotValue);
|
|
|
|
}
|
|
|
|
if (itCanSee) {
|
|
|
|
if (fixd)
|
|
seeChance = ClipLow(seeChance, pXSteal->data3);
|
|
|
|
mod = (seeChance * pXSteal->data3) / kPercFull;
|
|
if (fixd) seeChance = mod; else seeChance += mod;
|
|
|
|
seeChance = ClipRange(seeChance, -kMaxPatrolSpotValue, kMaxPatrolSpotValue);
|
|
}
|
|
|
|
|
|
// trigger this region if target gonna be spot
|
|
if (pXSteal->txID && pXSprite->data3 + hearChance + seeChance >= kMaxPatrolSpotValue)
|
|
trTriggerSprite(pSteal->index, pXSteal, kCmdToggle);
|
|
|
|
|
|
// continue search another stealth regions to affect chances
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (itCanHear && hearChance > 0) {
|
|
DPrintf(DMSG_SPAMMY, "Patrol dude #%d hearing the Player #%d.", pSprite->index, pPlayer->nPlayer + 1);
|
|
pXSprite->data3 = ClipRange(pXSprite->data3 + hearChance, -kMaxPatrolSpotValue, kMaxPatrolSpotValue);
|
|
if (!stealth) {
|
|
target = pSpr->index;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (itCanSee && seeChance > 0) {
|
|
//DPrintf(DMSG_SPAMMY, "Patrol dude #%d seeing the Player #%d.", pSprite->index, pPlayer->nPlayer + 1);
|
|
//pXSprite->data3 += seeChance;
|
|
pXSprite->data3 = ClipRange(pXSprite->data3 + seeChance, -kMaxPatrolSpotValue, kMaxPatrolSpotValue);
|
|
if (!stealth) {
|
|
target = pSpr->index;
|
|
break;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
// add check for corpses?
|
|
|
|
if ((pXSprite->data3 = ClipRange(pXSprite->data3, 0, kMaxPatrolSpotValue)) == kMaxPatrolSpotValue) {
|
|
target = pSpr->index;
|
|
break;
|
|
}
|
|
|
|
//int perc = (100 * ClipHigh(pXSprite->data3, kMaxPatrolSpotValue)) / kMaxPatrolSpotValue;
|
|
//viewSetSystemMessage("%d / %d / %d / %d", hearChance, seeDist, seeChance, perc);
|
|
|
|
}
|
|
|
|
if (target >= 0) return target;
|
|
pXSprite->data3 -= ClipLow(((kPercFull * pXSprite->data3) / kMaxPatrolSpotValue) >> 2, 3);
|
|
return -1;
|
|
}
|
|
|
|
void aiPatrolFlagsMgr(spritetype* pSource, XSPRITE* pXSource, spritetype* pDest, XSPRITE* pXDest, bool copy, bool init) {
|
|
|
|
auto destactor = &bloodActors[pDest->index];
|
|
// copy flags
|
|
if (copy) {
|
|
|
|
pXDest->dudeFlag4 = pXSource->dudeFlag4;
|
|
pXDest->dudeAmbush = pXSource->dudeAmbush;
|
|
pXDest->dudeGuard = pXSource->dudeGuard;
|
|
pXDest->dudeDeaf = pXSource->dudeDeaf;
|
|
pXDest->unused1 = pXSource->unused1;
|
|
|
|
if (pXSource->unused1 & kDudeFlagStealth) pXDest->unused1 |= kDudeFlagStealth;
|
|
else pXDest->unused1 &= ~kDudeFlagStealth;
|
|
|
|
}
|
|
|
|
// do init
|
|
if (init) {
|
|
|
|
if (!pXDest->dudeFlag4) {
|
|
|
|
if (aiInPatrolState(pXDest->aiState))
|
|
aiPatrolStop(destactor, nullptr);
|
|
|
|
} else {
|
|
|
|
if (aiInPatrolState(pXDest->aiState))
|
|
return;
|
|
|
|
pXDest->target_i = -1; // reset the target
|
|
pXDest->stateTimer = 0;
|
|
|
|
|
|
aiPatrolSetMarker(pDest, pXDest);
|
|
if (spriteIsUnderwater(destactor)) aiPatrolState(destactor, kAiStatePatrolWaitW);
|
|
else aiPatrolState(destactor, kAiStatePatrolWaitL);
|
|
pXDest->data3 = 0; // reset the spot progress
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
bool aiPatrolGetPathDir(XSPRITE* pXSprite, XSPRITE* pXMarker) {
|
|
|
|
if (pXSprite->unused2 == kPatrolMoveForward) return (pXMarker->data2 == -2) ? (bool)kPatrolMoveBackward : (bool)kPatrolMoveForward;
|
|
else return (findNextMarker(&bloodActors[pXMarker->reference], kPatrolMoveBackward) != nullptr) ? (bool)kPatrolMoveBackward : (bool)kPatrolMoveForward;
|
|
}
|
|
|
|
|
|
void aiPatrolThink(DBloodActor* actor) {
|
|
|
|
auto pXSprite = &actor->x();
|
|
auto pSprite = &actor->s();
|
|
|
|
assert(pSprite->type >= kDudeBase && pSprite->type < kDudeMax);
|
|
|
|
|
|
int nTarget, stateTimer, nMarker = pXSprite->target_i;
|
|
if ((nTarget = aiPatrolSearchTargets(pSprite, pXSprite)) != -1) {
|
|
aiPatrolStop(actor, &bloodActors[nTarget], pXSprite->dudeAmbush);
|
|
return;
|
|
}
|
|
|
|
|
|
bool crouch = (pXSprite->unused1 & kDudeFlagCrouch), uwater = spriteIsUnderwater(actor);
|
|
if (!spriRangeIsFine(nMarker) || (pSprite->type == kDudeModernCustom && ((uwater && !canSwim(actor)) || !canWalk(actor)))) {
|
|
aiPatrolStop(actor, nullptr);
|
|
return;
|
|
}
|
|
|
|
auto markeractor = &bloodActors[nMarker];
|
|
spritetype* pMarker = &markeractor->s();
|
|
XSPRITE* pXMarker = &markeractor->x();
|
|
const DUDEINFO_EXTRA* pExtra = &gDudeInfoExtra[pSprite->type - kDudeBase];
|
|
bool isFinal = ((!pXSprite->unused2 && pXMarker->data2 == -1) || (pXSprite->unused2 && pXMarker->data1 == -1));
|
|
bool reached = false;
|
|
|
|
if (aiPatrolWaiting(pXSprite->aiState)) {
|
|
|
|
//viewSetSystemMessage("WAIT %d / %d", pXSprite->targetY, pXSprite->stateTimer);
|
|
|
|
if (pXSprite->stateTimer > 0 || pXMarker->data1 == pXMarker->data2) {
|
|
|
|
if (pExtra->flying)
|
|
zvel[pSprite->index] = Random2(0x8000);
|
|
|
|
// turn while waiting
|
|
if (pMarker->flags & kModernTypeFlag16) {
|
|
|
|
stateTimer = pXSprite->stateTimer;
|
|
|
|
if (--pXSprite->unused4 <= 0) {
|
|
|
|
if (uwater) aiPatrolState(actor, kAiStatePatrolTurnW);
|
|
else if (crouch) aiPatrolState(actor, kAiStatePatrolTurnC);
|
|
else aiPatrolState(actor, kAiStatePatrolTurnL);
|
|
pXSprite->unused4 = kMinPatrolTurnDelay + Random(kPatrolTurnDelayRange);
|
|
|
|
}
|
|
|
|
// must restore stateTimer for waiting
|
|
pXSprite->stateTimer = stateTimer;
|
|
}
|
|
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
// trigger at departure
|
|
if (pXMarker->triggerOff) {
|
|
|
|
// send command
|
|
if (pXMarker->txID) {
|
|
|
|
evSendActor(markeractor, pXMarker->txID, (COMMAND_ID)pXMarker->command);
|
|
|
|
// copy dude flags for current dude
|
|
} else if (pXMarker->command == kCmdDudeFlagsSet) {
|
|
|
|
aiPatrolFlagsMgr(pMarker, pXMarker, pSprite, pXSprite, true, true);
|
|
if (!pXSprite->dudeFlag4) // this dude is not in patrol anymore
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
// release the enemy
|
|
if (isFinal) {
|
|
aiPatrolStop(actor, nullptr);
|
|
return;
|
|
}
|
|
|
|
// move next marker
|
|
aiPatrolSetMarker(pSprite, pXSprite);
|
|
|
|
} else if (aiPatrolTurning(pXSprite->aiState)) {
|
|
|
|
//viewSetSystemMessage("TURN");
|
|
if ((int)pSprite->ang == (int)pXSprite->goalAng) {
|
|
|
|
// save imer for waiting
|
|
stateTimer = pXSprite->stateTimer;
|
|
|
|
if (uwater) aiPatrolState(actor, kAiStatePatrolWaitW);
|
|
else if (crouch) aiPatrolState(actor, kAiStatePatrolWaitC);
|
|
else aiPatrolState(actor, kAiStatePatrolWaitL);
|
|
|
|
// must restore it
|
|
pXSprite->stateTimer = stateTimer;
|
|
|
|
}
|
|
|
|
|
|
return;
|
|
|
|
} else if ((reached = aiPatrolMarkerReached(actor)) == true) {
|
|
|
|
pXMarker->isTriggered = pXMarker->triggerOnce; // can't select this marker for path anymore if true
|
|
|
|
if (pMarker->flags > 0) {
|
|
|
|
if ((pMarker->flags & kModernTypeFlag2) && (pMarker->flags & kModernTypeFlag1)) crouch = !crouch;
|
|
else if (pMarker->flags & kModernTypeFlag2) crouch = false;
|
|
else if ((pMarker->flags & kModernTypeFlag1) && aiCanCrouch(actor)) crouch = true;
|
|
|
|
}
|
|
|
|
if (pXMarker->waitTime > 0 || pXMarker->data1 == pXMarker->data2) {
|
|
|
|
// take marker's angle
|
|
if (!(pMarker->flags & kModernTypeFlag4)) {
|
|
|
|
pXSprite->goalAng = ((!(pMarker->flags & kModernTypeFlag8) && pXSprite->unused2) ? pMarker->ang + kAng180 : pMarker->ang) & 2047;
|
|
if ((int)pSprite->ang != (int)pXSprite->goalAng) // let the enemy play move animation while turning
|
|
return;
|
|
|
|
}
|
|
|
|
if (markeractor->GetOwner() == actor)
|
|
markeractor->SetOwner(aiPatrolMarkerBusy(actor, markeractor));
|
|
|
|
// trigger at arrival
|
|
if (pXMarker->triggerOn) {
|
|
|
|
// send command
|
|
if (pXMarker->txID) {
|
|
|
|
evSendActor(markeractor, pXMarker->txID, (COMMAND_ID)pXMarker->command);
|
|
|
|
// copy dude flags for current dude
|
|
} else if (pXMarker->command == kCmdDudeFlagsSet) {
|
|
|
|
aiPatrolFlagsMgr(pMarker, pXMarker, pSprite, pXSprite, true, true);
|
|
if (!pXSprite->dudeFlag4) // this dude is not in patrol anymore
|
|
return;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (uwater) aiPatrolState(actor, kAiStatePatrolWaitW);
|
|
else if (crouch) aiPatrolState(actor, kAiStatePatrolWaitC);
|
|
else aiPatrolState(actor, kAiStatePatrolWaitL);
|
|
|
|
if (pXMarker->waitTime)
|
|
pXSprite->stateTimer = (pXMarker->waitTime * 120) / 10;
|
|
|
|
|
|
if (pMarker->flags & kModernTypeFlag16)
|
|
pXSprite->unused4 = kMinPatrolTurnDelay + Random(kPatrolTurnDelayRange);
|
|
|
|
return;
|
|
|
|
|
|
} else {
|
|
|
|
if (markeractor->GetOwner() == actor)
|
|
markeractor->SetOwner(aiPatrolMarkerBusy(actor, markeractor));
|
|
|
|
if (pXMarker->triggerOn || pXMarker->triggerOff) {
|
|
|
|
if (pXMarker->txID) {
|
|
|
|
// send command at arrival
|
|
if (pXMarker->triggerOn)
|
|
evSendActor(markeractor, pXMarker->txID, (COMMAND_ID)pXMarker->command);
|
|
|
|
// send command at departure
|
|
if (pXMarker->triggerOff)
|
|
evSendActor(markeractor, pXMarker->txID, (COMMAND_ID)pXMarker->command);
|
|
|
|
// copy dude flags for current dude
|
|
} else if (pXMarker->command == kCmdDudeFlagsSet) {
|
|
|
|
aiPatrolFlagsMgr(pMarker, pXMarker, pSprite, pXSprite, true, true);
|
|
if (!pXSprite->dudeFlag4) // this dude is not in patrol anymore
|
|
return;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
// release the enemy
|
|
if (isFinal) {
|
|
aiPatrolStop(actor, nullptr);
|
|
return;
|
|
}
|
|
|
|
// move the next marker
|
|
aiPatrolSetMarker(pSprite, pXSprite);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
nnExtAiSetDirection(actor, getangle(pMarker->x - pSprite->x, pMarker->y - pSprite->y));
|
|
|
|
if (aiPatrolMoving(pXSprite->aiState) && !reached) return;
|
|
else if (uwater) aiPatrolState(actor, kAiStatePatrolMoveW);
|
|
else if (crouch) aiPatrolState(actor, kAiStatePatrolMoveC);
|
|
else aiPatrolState(actor, kAiStatePatrolMoveL);
|
|
return;
|
|
|
|
}
|
|
// ------------------------------------------------
|
|
|
|
int listTx(XSPRITE* pXRedir, int tx) {
|
|
if (txIsRanged(&bloodActors[pXRedir->reference])) {
|
|
if (tx == -1) tx = pXRedir->data1;
|
|
else if (tx < pXRedir->data4) tx++;
|
|
else tx = -1;
|
|
} else {
|
|
if (tx == -1) {
|
|
for (int i = 0; i <= 3; i++) {
|
|
if ((tx = GetDataVal(&bloodActors[pXRedir->reference], i)) <= 0) continue;
|
|
else return tx;
|
|
}
|
|
} else {
|
|
int saved = tx; bool savedFound = false;
|
|
for (int i = 0; i <= 3; i++) {
|
|
tx = GetDataVal(&bloodActors[pXRedir->reference], i);
|
|
if (savedFound && tx > 0) return tx;
|
|
else if (tx != saved) continue;
|
|
else savedFound = true;
|
|
}
|
|
}
|
|
|
|
tx = -1;
|
|
}
|
|
|
|
return tx;
|
|
}
|
|
|
|
DBloodActor* evrIsRedirector(DBloodActor* actor)
|
|
{
|
|
if (actor)
|
|
{
|
|
switch (actor->s().type)
|
|
{
|
|
case kModernRandomTX:
|
|
case kModernSequentialTX:
|
|
if (actor->hasX() && actor->x().command == kCmdLink && !actor->x().locked) return actor;
|
|
break;
|
|
}
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
XSPRITE* evrListRedirectors(int objType, int objXIndex, XSPRITE* pXRedir, int* tx) {
|
|
if (!gEventRedirectsUsed) return NULL;
|
|
else if (pXRedir && (*tx = listTx(pXRedir, *tx)) != -1)
|
|
return pXRedir;
|
|
|
|
int id = 0;
|
|
switch (objType) {
|
|
case OBJ_SECTOR:
|
|
if (!xsectRangeIsFine(objXIndex)) return NULL;
|
|
id = xsector[objXIndex].txID;
|
|
break;
|
|
case OBJ_SPRITE:
|
|
if (!xspriRangeIsFine(objXIndex)) return NULL;
|
|
id = xsprite[objXIndex].txID;
|
|
break;
|
|
case OBJ_WALL:
|
|
if (!xwallRangeIsFine(objXIndex)) return NULL;
|
|
id = xwall[objXIndex].txID;
|
|
break;
|
|
default:
|
|
return NULL;
|
|
}
|
|
|
|
int nIndex = (pXRedir) ? pXRedir->reference : -1; bool prevFound = false;
|
|
for (int i = bucketHead[id]; i < bucketHead[id + 1]; i++) {
|
|
if (rxBucket[i].type != OBJ_SPRITE) continue;
|
|
auto rxactor = evrIsRedirector(rxBucket[i].GetActor());
|
|
if (!rxactor || !rxactor->hasX()) continue;
|
|
|
|
if (prevFound || nIndex == -1) { *tx = listTx(&rxactor->x(), *tx); return &rxactor->x(); }
|
|
else if (nIndex != rxactor->s().index) continue;
|
|
else prevFound = true;
|
|
}
|
|
|
|
*tx = -1;
|
|
return NULL;
|
|
}
|
|
|
|
// this function checks if all TX objects have the same value
|
|
bool incDecGoalValueIsReached(XSPRITE* pXSprite) {
|
|
|
|
if (pXSprite->data3 != pXSprite->sysData1) return false;
|
|
char buffer[5]; sprintf(buffer, "%d", abs(pXSprite->data1)); int len = int(strlen(buffer)); int rx = -1;
|
|
for (int i = bucketHead[pXSprite->txID]; i < bucketHead[pXSprite->txID + 1]; i++) {
|
|
if (rxBucket[i].type == OBJ_SPRITE && evrIsRedirector(rxBucket[i].GetActor())) continue;
|
|
for (int a = 0; a < len; a++) {
|
|
if (getDataFieldOfObject(rxBucket[i].type, rxBucket[i].rxindex, rxBucket[i].actor, (buffer[a] - 52) + 4) != pXSprite->data3)
|
|
return false;
|
|
}
|
|
}
|
|
|
|
XSPRITE* pXRedir = NULL; // check redirected TX buckets
|
|
while ((pXRedir = evrListRedirectors(OBJ_SPRITE, sprite[pXSprite->reference].extra, pXRedir, &rx)) != NULL) {
|
|
for (int i = bucketHead[rx]; i < bucketHead[rx + 1]; i++) {
|
|
for (int a = 0; a < len; a++) {
|
|
if (getDataFieldOfObject(rxBucket[i].type, rxBucket[i].rxindex, rxBucket[i].actor, (buffer[a] - 52) + 4) != pXSprite->data3)
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
void seqSpawnerOffSameTx(XSPRITE* pXSource) {
|
|
|
|
for (int i = 0; i < kMaxXSprites; i++) {
|
|
|
|
XSPRITE* pXSprite = &xsprite[i];
|
|
if (pXSprite->reference != pXSource->reference && spriRangeIsFine(pXSprite->reference)) {
|
|
if (sprite[pXSprite->reference].type != kModernSeqSpawner) continue;
|
|
else if (pXSprite->txID == pXSource->txID && pXSprite->state == 1) {
|
|
evKillActor(&bloodActors[pXSprite->reference]);
|
|
pXSprite->state = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// this function can be called via sending numbered command to TX kChannelModernEndLevelCustom
|
|
// it allows to set custom next level instead of taking it from INI file.
|
|
void levelEndLevelCustom(int nLevel) {
|
|
|
|
gGameOptions.uGameFlags |= GF_AdvanceLevel;
|
|
gNextLevel = FindMapByIndex(currentLevel->cluster, nLevel + 1);
|
|
}
|
|
|
|
void callbackUniMissileBurst(DBloodActor* actor, int) // 22
|
|
{
|
|
if (!actor) return;
|
|
spritetype* pSprite = &actor->s();
|
|
if (pSprite->statnum != kStatProjectile) return;
|
|
int nAngle = getangle(actor->xvel(), actor->yvel());
|
|
int nRadius = 0x55555;
|
|
|
|
for (int i = 0; i < 8; i++)
|
|
{
|
|
spritetype* pBurst = &actSpawnSprite(actor, 5)->s();
|
|
|
|
pBurst->type = pSprite->type;
|
|
pBurst->shade = pSprite->shade;
|
|
pBurst->picnum = pSprite->picnum;
|
|
|
|
|
|
pBurst->cstat = pSprite->cstat;
|
|
if ((pBurst->cstat & CSTAT_SPRITE_BLOCK)) {
|
|
pBurst->cstat &= ~CSTAT_SPRITE_BLOCK; // we don't want missiles impact each other
|
|
evPostActor(&bloodActors[pBurst->index], 100, kCallbackMissileSpriteBlock); // so set blocking flag a bit later
|
|
}
|
|
|
|
pBurst->pal = pSprite->pal;
|
|
pBurst->clipdist = pSprite->clipdist / 4;
|
|
pBurst->flags = pSprite->flags;
|
|
pBurst->xrepeat = pSprite->xrepeat / 2;
|
|
pBurst->yrepeat = pSprite->yrepeat / 2;
|
|
pBurst->ang = ((pSprite->ang + missileInfo[pSprite->type - kMissileBase].angleOfs) & 2047);
|
|
pBurst->owner = pSprite->owner;
|
|
|
|
actBuildMissile(&bloodActors[pBurst->index], &bloodActors[pSprite->index]);
|
|
|
|
int nAngle2 = (i << 11) / 8;
|
|
int dx = 0;
|
|
int dy = mulscale30r(nRadius, Sin(nAngle2));
|
|
int dz = mulscale30r(nRadius, -Cos(nAngle2));
|
|
if (i & 1)
|
|
{
|
|
dy >>= 1;
|
|
dz >>= 1;
|
|
}
|
|
RotateVector(&dx, &dy, nAngle);
|
|
xvel[pBurst->index] += dx;
|
|
yvel[pBurst->index] += dy;
|
|
zvel[pBurst->index] += dz;
|
|
evPostActor(&bloodActors[pBurst->index], 960, kCallbackRemove);
|
|
}
|
|
evPostActor(actor, 0, kCallbackRemove);
|
|
}
|
|
|
|
|
|
void callbackMakeMissileBlocking(DBloodActor* actor, int) // 23
|
|
{
|
|
if (!actor || actor->s().statnum != kStatProjectile) return;
|
|
actor->s().cstat |= CSTAT_SPRITE_BLOCK;
|
|
}
|
|
|
|
void callbackGenDudeUpdate(DBloodActor* actor, int) // 24
|
|
{
|
|
if (actor)
|
|
genDudeUpdate(actor);
|
|
}
|
|
|
|
void clampSprite(spritetype* pSprite, int which) {
|
|
|
|
int zTop, zBot;
|
|
if (pSprite->sectnum >= 0 && pSprite->sectnum < kMaxSectors) {
|
|
|
|
GetSpriteExtents(pSprite, &zTop, &zBot);
|
|
if (which & 0x01)
|
|
pSprite->z += ClipHigh(getflorzofslope(pSprite->sectnum, pSprite->x, pSprite->y) - zBot, 0);
|
|
if (which & 0x02)
|
|
pSprite->z += ClipLow(getceilzofslope(pSprite->sectnum, pSprite->x, pSprite->y) - zTop, 0);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
FSerializer& Serialize(FSerializer& arc, const char* keyname, GENDUDEEXTRA& w, GENDUDEEXTRA* def)
|
|
{
|
|
if (arc.BeginObject(keyname))
|
|
{
|
|
arc.Array("initvals", w.initVals, 3)
|
|
.Array("availdeaths", w.availDeaths, kDamageMax)
|
|
("movespeed", w.moveSpeed)
|
|
("firedist", w.fireDist)
|
|
("throwdist", w.throwDist)
|
|
("curweapon", w.curWeapon)
|
|
("weapontype", w.weaponType)
|
|
("basedispersion", w.baseDispersion)
|
|
("slavecount", w.slaveCount)
|
|
("lifeleech", w.pLifeLeech)
|
|
.Array("slaves", w.slave, w.slaveCount)
|
|
.Array("dmgcontrol", w.dmgControl, kDamageMax)
|
|
.Array("updreq", w.updReq, kGenDudePropertyMax)
|
|
("flags", w.flags)
|
|
.EndObject();
|
|
}
|
|
return arc;
|
|
}
|
|
|
|
FSerializer& Serialize(FSerializer& arc, const char* keyname, SPRITEMASS& w, SPRITEMASS* def)
|
|
{
|
|
static SPRITEMASS nul;
|
|
if (arc.isReading()) w = {};
|
|
if (arc.BeginObject(keyname))
|
|
{
|
|
arc ("seq", w.seqId, &nul.seqId)
|
|
("picnum", w.picnum, &nul.picnum)
|
|
("xrepeat", w.xrepeat, &nul.xrepeat)
|
|
("yrepeat", w.yrepeat, &nul.yrepeat)
|
|
("clipdist", w.clipdist)
|
|
("mass", w.mass)
|
|
("airvel", w.airVel)
|
|
("fraction", w.fraction)
|
|
.EndObject();
|
|
}
|
|
return arc;
|
|
}
|
|
|
|
FSerializer& Serialize(FSerializer& arc, const char* keyname, OBJECTS_TO_TRACK& w, OBJECTS_TO_TRACK* def)
|
|
{
|
|
static OBJECTS_TO_TRACK nul;
|
|
if (arc.isReading()) w = {};
|
|
if (arc.BeginObject(keyname))
|
|
{
|
|
arc("type", w.type, &nul.type)
|
|
("index", w.index_, &nul.index_)
|
|
("xrepeat", w.cmd, &nul.cmd)
|
|
.EndObject();
|
|
}
|
|
return arc;
|
|
}
|
|
|
|
FSerializer& Serialize(FSerializer& arc, const char* keyname, TRCONDITION& w, TRCONDITION* def)
|
|
{
|
|
static TRCONDITION nul;
|
|
if (arc.isReading()) w = {};
|
|
if (arc.BeginObject(keyname))
|
|
{
|
|
arc("length", w.length, &nul.length)
|
|
("xindex", w.actor, &nul.actor)
|
|
.Array("obj", w.obj, w.length)
|
|
.EndObject();
|
|
}
|
|
return arc;
|
|
}
|
|
|
|
void SerializeNNExts(FSerializer& arc)
|
|
{
|
|
if (arc.BeginObject("nnexts"))
|
|
{
|
|
#ifdef OLD_SAVEGAME
|
|
// the GenDudeArray only contains valid info for kDudeModernCustom and kDudeModernCustomBurning so only save the relevant entries as these are not small.
|
|
bool foundsome = false;
|
|
for (int i = 0; i < kMaxSprites; i++)
|
|
{
|
|
if (activeSprites[i] && (sprite[i].type == kDudeModernCustom || sprite[i].type == kDudeModernCustomBurning))
|
|
{
|
|
if (!foundsome) arc.BeginArray("gendudeextra");
|
|
foundsome = true;
|
|
arc(nullptr, bloodActors[i].genDudeExtra);
|
|
}
|
|
}
|
|
if (foundsome) arc.EndArray();
|
|
|
|
// In compatibility mode write this out as a sparse array sorted by xsprite index.
|
|
SPRITEMASS gSpriteMass[kMaxSprites];
|
|
for (int i = 0; i < kMaxSprites; i++)
|
|
{
|
|
int x = sprite[i].extra;
|
|
if (x <= 0) continue;
|
|
gSpriteMass[x] = bloodActors[i].spriteMass;
|
|
}
|
|
arc.SparseArray("spritemass", gSpriteMass, kMaxSprites, activeXSprites);
|
|
for (int i = 0; i < kMaxSprites; i++)
|
|
{
|
|
int x = sprite[i].extra;
|
|
if (x <= 0) continue;
|
|
if (activeXSprites[x]) bloodActors[i].spriteMass = gSpriteMass[x];
|
|
}
|
|
#endif
|
|
arc ("proxyspritescount", gProxySpritesCount)
|
|
.Array("proxyspriteslist", gProxySpritesList, gProxySpritesCount)
|
|
("sightspritescount", gSightSpritesCount)
|
|
.Array("sightspriteslist", gSightSpritesList, gSightSpritesCount)
|
|
("physspritescount", gPhysSpritesCount)
|
|
.Array("physspriteslist", gPhysSpritesList, gPhysSpritesCount)
|
|
("impactspritescount", gImpactSpritesCount)
|
|
.Array("impactspriteslist", gImpactSpritesList, gImpactSpritesCount)
|
|
("eventredirects", gEventRedirectsUsed)
|
|
("trconditioncount", gTrackingCondsCount)
|
|
.Array("trcondition", gCondition, gTrackingCondsCount)
|
|
.EndObject();
|
|
}
|
|
}
|
|
|
|
///////////////////////////////////////////////////////////////////
|
|
// This file provides modern features for mappers.
|
|
// For full documentation please visit http://cruo.bloodgame.ru/xxsystem
|
|
///////////////////////////////////////////////////////////////////
|
|
END_BLD_NS
|
|
|
|
#endif
|