// v2.1.0 - Fixed a few bugs.
// v2.0.0 -
//::////////////////////////////////////////////////////////////////////////////
//:: FileName:  hark_d_rez_check
//::////////////////////////////////////////////////////////////////////////////
/*
   Text appears if there is a Death Corpse or Dead Creature nearby.
*/
//::////////////////////////////////////////////////////////////////////////////
#include "hark_i0_constant"
//::////////////////////////////////////////////////////////////////////////////
int StartingConditional()
{
  float fDistToDC = 1000.0;
  float fDistToDM = 1000.0;

  object oDC = GetNearestObjectByTag("DeathCorpse");
  if (GetIsObjectValid(oDC) && GetArea(oDC) == GetArea(OBJECT_SELF))
    { fDistToDC = GetDistanceToObject(oDC); }

  object oDM = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, FALSE);
  if (GetIsObjectValid(oDM) && GetArea(oDM) == GetArea(OBJECT_SELF))
    { fDistToDM = GetDistanceToObject(oDM); }

  string sName;
  object oSeen;
  object oTarget = OBJECT_INVALID;
  if (fDistToDC < fDistToDM)
    {
     string sID = GetLocalString(oDC, "Pkey");
     oTarget = oDC;
     oSeen = GetLocalObject(GetModule(), "DC2" + sID);
     sName = GetLocalString(oDC, "Name");
    }
  else if (fDistToDM < fDistToDC)
    {
     oTarget = oDM;
     oSeen = oDM;
     sName = GetName(oDM);
    }

  SetCustomToken(3850, sName);
  return (GetIsObjectValid(oTarget) && GetObjectSeen(oSeen));
}
//::////////////////////////////////////////////////////////////////////////////
