5914ed2ab5
Updated Release Archive. Fixed Mage-killer prereqs. Removed old LETO & ConvoCC related files. Added organized spell scroll store. Fixed Gloura spellbook. Various TLK fixes. Reorganized Repo. Removed invalid user folders. Added DocGen back in.
150 lines
4.8 KiB
Plaintext
150 lines
4.8 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Name Necrotic Awareness
|
|
//:: FileName sp_nec_aware.nss
|
|
//:://////////////////////////////////////////////
|
|
/** @file
|
|
Necrotic Awareness
|
|
Necromancy
|
|
Level: Clr 1, sor/wiz 1
|
|
Components: V S, F
|
|
Casting Time: 1 standard action
|
|
Range: 60 ft.
|
|
Area: Cone-shaped emanation
|
|
Duration: Concentration, up to 1 min./level (D)
|
|
Saving Throw: None
|
|
Spell Resistance: No
|
|
|
|
You can sense the presence of creatures who bear
|
|
a necrotic cyst (see spell of the same name). The
|
|
amount of information revealed depends on how long
|
|
you remain within range of a creature that triggers
|
|
your cyst awareness:
|
|
|
|
1st Round: Presence or absence of creatures with
|
|
necrotic cysts.
|
|
|
|
2nd Round: Number of creatures bearing
|
|
necrotic cysts in the area.
|
|
|
|
3rd Round: The location ofeach creature bearing a
|
|
necrotic cyst. If a cyst-bearer is outside your
|
|
line of sight, then you discern its direction but
|
|
not its exact location.
|
|
*/
|
|
// Author: Tenjac
|
|
// Created: 12/16/05
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "prc_alterations"
|
|
#include "prc_inc_spells"
|
|
|
|
void RoundThree(object oPC, location lTarget);
|
|
void RoundTwo(object oPC, location lTarget);
|
|
void RoundOne(object oPC, location lTarget);
|
|
|
|
void RoundThree(object oPC, location lTarget)
|
|
{
|
|
//get first
|
|
object oTest = MyFirstObjectInShape(SHAPE_SPELLCONE, 20.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
|
|
//loop
|
|
while(GetIsObjectValid(oTest))
|
|
{
|
|
//Check for presence
|
|
if(GetHasNecroticCyst(oTest))
|
|
{
|
|
// Name has a necrotic cyst
|
|
FloatingTextStringOnCreature(GetName(oTest) + " " + GetStringByStrRef(16829323) + ".", oPC, FALSE);
|
|
}
|
|
//get next
|
|
oTest = MyNextObjectInShape(SHAPE_SPELLCONE, 20.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
}
|
|
|
|
//Repeat from round one
|
|
//DelayCommand(6.0f,RoundThree(oPC, lTarget));
|
|
}
|
|
|
|
void RoundTwo(object oPC, location lTarget)
|
|
{
|
|
int nCount=0;
|
|
|
|
//get first
|
|
object oTest = MyFirstObjectInShape(SHAPE_SPELLCONE, 20.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
|
|
//loop to check all
|
|
while(GetIsObjectValid(oTest))
|
|
{
|
|
//Check for presence
|
|
if(GetHasNecroticCyst(oTest))
|
|
{
|
|
nCount++;
|
|
}
|
|
//next object
|
|
oTest = MyNextObjectInShape(SHAPE_SPELLCONE, 20.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
}
|
|
//You detect the presence of count necrotic cysts
|
|
FloatingTextStringOnCreature(GetStringByStrRef(16832001) + " " + IntToString(nCount) + " " + GetStringByStrRef(16829322) + ".", oPC, FALSE);
|
|
|
|
//Schedule next round
|
|
DelayCommand(6.0f, RoundThree(oPC, lTarget));
|
|
}
|
|
|
|
void RoundOne(object oPC, location lTarget)
|
|
{
|
|
//get first
|
|
object oTest = MyFirstObjectInShape(SHAPE_SPELLCONE, 20.0, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
|
|
//loop to check all
|
|
while(GetIsObjectValid(oTest))
|
|
{
|
|
//Check for presence
|
|
if(GetHasNecroticCyst(oTest))
|
|
{
|
|
FloatingTextStringOnCreature(GetStringByStrRef(16832001) + " " + GetStringByStrRef(16829322) + ".", oPC, FALSE);
|
|
|
|
//Schedule next round
|
|
DelayCommand(6.0f, RoundTwo(oPC, lTarget));
|
|
|
|
//abort; finding one is enough.
|
|
return;
|
|
}
|
|
|
|
}
|
|
|
|
//if concentration is broken, abort
|
|
|
|
//Re-run round 1 if nothing found
|
|
DelayCommand(6.0f, RoundOne(oPC, lTarget));
|
|
}
|
|
|
|
void main()
|
|
{
|
|
PRCSetSchool(SPELL_SCHOOL_NECROMANCY);
|
|
|
|
//spellhook
|
|
if (!X2PreSpellCastCode())
|
|
{
|
|
// If code within the PreSpellCastHook (i.e. UMD) reports FALSE, do not run this spell
|
|
return;
|
|
}
|
|
//vars
|
|
object oPC = OBJECT_SELF;
|
|
|
|
//Check for castability
|
|
if(!GetCanCastNecroticSpells(oPC))
|
|
{
|
|
return;
|
|
}
|
|
|
|
//location
|
|
location lTarget = PRCGetSpellTargetLocation();
|
|
if(GetIsObjectValid(PRCGetSpellTargetObject()))
|
|
lTarget = GetLocation(PRCGetSpellTargetObject());
|
|
|
|
//Detect
|
|
RoundOne(oPC, lTarget);
|
|
|
|
PRCSetSchool();
|
|
}
|