Amon_PRC8/_module/nss/nw_g0_fear.nss
Jaysyn904 c5cffc37af Initial Commit
Initial Commit [v1.01]
2025-04-03 19:00:46 -04:00

49 lines
1.4 KiB
Plaintext

//::///////////////////////////////////////////////
//:: Fear Heartbeat
//:: NW_G0_FEAR
//:: Copyright (c) 2001 Bioware Corp.
//:://////////////////////////////////////////////
/*
This is the heartbeat that runs on a creature
when the creature is under the fear effect.
*/
//:://////////////////////////////////////////////
//:: Created By: Preston Watamaniuk
//:: Created On: , 2001
//:://////////////////////////////////////////////
#include "x0_inc_henai"
void main()
{
// TK removed SendForHelp
// SendForHelp();
//Allow the target to recieve commands for the round
SetCommandable(TRUE);
ClearAllActions();
int nCnt = 1;
//Get the nearest creature to the affected creature
object oTarget = GetNearestObject(OBJECT_TYPE_CREATURE, OBJECT_SELF, nCnt);
float fDistance = GetDistanceBetween(OBJECT_SELF, oTarget);
while (GetIsObjectValid(oTarget) && fDistance < 5.0)
{
fDistance = GetDistanceBetween(OBJECT_SELF, oTarget);
if(GetIsEnemy(oTarget) && fDistance <= 5.0)
{
//Run away if they are an enemy of the target's faction
ActionMoveAwayFromObject(oTarget, TRUE);
break;
}
//If not an enemy interate and find the next target
nCnt++;
oTarget = GetNearestObject(OBJECT_TYPE_CREATURE, OBJECT_SELF, nCnt);
}
//Disable the ability to recieve commands.
SetCommandable(FALSE);
}