mirror of
https://github.com/ZDoom/qzdoom.git
synced 2025-02-11 10:11:38 +00:00
604b5ef673
should simplify scripting, since it means that meta fields can be treated (mostly) the same as normal fields. SVN r2242 (scripting)
95 lines
2.1 KiB
C++
95 lines
2.1 KiB
C++
/*
|
|
#include "info.h"
|
|
#include "a_pickups.h"
|
|
#include "a_artifacts.h"
|
|
#include "gstrings.h"
|
|
#include "p_local.h"
|
|
#include "s_sound.h"
|
|
#include "m_random.h"
|
|
#include "a_action.h"
|
|
#include "a_hexenglobal.h"
|
|
#include "gi.h"
|
|
#include "doomstat.h"
|
|
*/
|
|
|
|
#define HEAL_RADIUS_DIST 255*FRACUNIT
|
|
|
|
static FRandom pr_healradius ("HealRadius");
|
|
|
|
// Healing Radius Artifact --------------------------------------------------
|
|
|
|
class AArtiHealingRadius : public AInventory
|
|
{
|
|
DECLARE_CLASS (AArtiHealingRadius, AInventory)
|
|
public:
|
|
bool Use (bool pickup);
|
|
};
|
|
|
|
IMPLEMENT_CLASS (AArtiHealingRadius)
|
|
|
|
bool AArtiHealingRadius::Use (bool pickup)
|
|
{
|
|
bool effective = false;
|
|
FName mode;
|
|
|
|
if (Owner->IsKindOf(RUNTIME_CLASS(APlayerPawn)))
|
|
{
|
|
mode = static_cast<PClassPlayerPawn *>(Owner->GetClass())->HealingRadiusType;
|
|
}
|
|
|
|
for (int i = 0; i < MAXPLAYERS; ++i)
|
|
{
|
|
if (playeringame[i] &&
|
|
players[i].mo != NULL &&
|
|
players[i].mo->health > 0 &&
|
|
P_AproxDistance (players[i].mo->x - Owner->x, players[i].mo->y - Owner->y) <= HEAL_RADIUS_DIST)
|
|
{
|
|
// Q: Is it worth it to make this selectable as a player property?
|
|
// A: Probably not - but it sure doesn't hurt.
|
|
bool gotsome=false;
|
|
switch (mode)
|
|
{
|
|
case NAME_Armor:
|
|
for (int j = 0; j < 4; ++j)
|
|
{
|
|
AHexenArmor *armor = Spawn<AHexenArmor> (0,0,0, NO_REPLACE);
|
|
armor->health = j;
|
|
armor->Amount = 1;
|
|
if (!armor->CallTryPickup (players[i].mo))
|
|
{
|
|
armor->Destroy ();
|
|
}
|
|
else
|
|
{
|
|
gotsome = true;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case NAME_Mana:
|
|
{
|
|
int amount = 50 + (pr_healradius() % 50);
|
|
|
|
if (players[i].mo->GiveAmmo (PClass::FindClass(NAME_Mana1), amount) ||
|
|
players[i].mo->GiveAmmo (PClass::FindClass(NAME_Mana2), amount))
|
|
{
|
|
gotsome = true;
|
|
}
|
|
break;
|
|
}
|
|
|
|
default:
|
|
//case NAME_Health:
|
|
gotsome = P_GiveBody (players[i].mo, 50 + (pr_healradius()%50));
|
|
break;
|
|
}
|
|
if (gotsome)
|
|
{
|
|
S_Sound (players[i].mo, CHAN_AUTO, "MysticIncant", 1, ATTN_NORM);
|
|
effective=true;
|
|
}
|
|
}
|
|
}
|
|
return effective;
|
|
|
|
}
|