6ec137a24e
Updated AMS marker feats. Removed arcane & divine marker feats. Updated Dread Necromancer for epic progression. Updated weapon baseitem models. Updated new weapons for crafting & npc equip. Updated prefix. Updated release archive.
94 lines
3.8 KiB
Plaintext
94 lines
3.8 KiB
Plaintext
/**
|
||
Necrocarnum Circlet
|
||
|
||
Chakra Bind (Crown)
|
||
|
||
A matching coil of necrocarnum forms around the head of a corpse. Filled with the dark power of necrocarnum, the corpse shambles to its feet, its flesh and mind overtaken by the curse of undeath.
|
||
|
||
When you shape this soulmeld and bind it to your crown chakra, you can animate an undead creature. This requires a full-round action and provokes attacks of opportunity; in addition, you take
|
||
damage equal to the necrocarnum zombie<69>s Hit Dice, which may not be healed as long as the zombie remains animated. You may only have one zombie.
|
||
*/
|
||
|
||
#include "moi_inc_moifunc"
|
||
|
||
void NecroCircletHB(object oMeldshaper, object oCreature)
|
||
{
|
||
int nCurHP = GetCurrentHitPoints(oMeldshaper);
|
||
int nMaxHP = GetMaxHitPoints(oMeldshaper);
|
||
int nPen = GetLocalInt(oMeldshaper, "NecrocarnumCircletPen");
|
||
|
||
// Does the PC have too many hit points?
|
||
if (nCurHP > (nMaxHP - nPen))
|
||
{
|
||
int nHP = nMaxHP - nPen;
|
||
if (!GetIsResting(oMeldshaper)) SetCurrentHitPoints(oMeldshaper, nHP);
|
||
}
|
||
// Keep it going or...
|
||
if (GetHasSpellEffect(MELD_NECROCARNUM_CIRCLET, oMeldshaper) && GetIsMeldBound(oMeldshaper, MELD_NECROCARNUM_CIRCLET) == CHAKRA_CROWN) DelayCommand(0.25, NecroCircletHB(oMeldshaper, oCreature));
|
||
else DestroyObject(oCreature);
|
||
}
|
||
|
||
void main()
|
||
{
|
||
object oMeldshaper = OBJECT_SELF;
|
||
int nClass = GetMeldShapedClass(oMeldshaper, MELD_NECROCARNUM_CIRCLET);
|
||
int nLevel = GetMeldshaperLevel(oMeldshaper, nClass, MELD_NECROCARNUM_CIRCLET);
|
||
int nNecro = GetLevelByClass(CLASS_TYPE_NECROCARNATE, oMeldshaper);
|
||
|
||
int i, nCount;
|
||
for(i=1;i<=10;i++)
|
||
{
|
||
object oHench = GetAssociate(ASSOCIATE_TYPE_HENCHMAN, OBJECT_SELF, i);
|
||
if (GetResRef(oHench) == "prc_sum_dbl" ||
|
||
GetResRef(oHench) == "prc_sum_dk" ||
|
||
GetResRef(oHench) == "prc_sum_vamp2" ||
|
||
GetResRef(oHench) == "prc_sum_bonet" ||
|
||
GetResRef(oHench) == "prc_sum_wight" ||
|
||
GetResRef(oHench) == "prc_sum_vamp1" ||
|
||
GetResRef(oHench) == "prc_sum_grav" ||
|
||
GetResRef(oHench) == "prc_sum_sklch" ||
|
||
GetResRef(oHench) == "prc_sum_zlord" ||
|
||
GetResRef(oHench) == "prc_sum_mohrg" ||
|
||
GetResRef(oHench) == "prc_tn_fthug")
|
||
{
|
||
nCount += 1;
|
||
if (nCount == 1 && nNecro >= 13) // Do nothing
|
||
{
|
||
}
|
||
else
|
||
{
|
||
FloatingTextStringOnCreature("You already the maximum number of necrocarnum zombies", oMeldshaper, FALSE);
|
||
return;
|
||
}
|
||
}
|
||
}
|
||
|
||
string sSummon;
|
||
effect eSummonB = EffectVisualEffect( VFX_FNF_LOS_EVIL_30);
|
||
object oCreature;
|
||
effect eVis = EffectVisualEffect(VFX_FNF_SUMMON_UNDEAD);
|
||
|
||
if (nLevel > 37) sSummon = "prc_sum_dbl";
|
||
else if (nLevel > 34) sSummon = "prc_sum_dk";
|
||
else if (nLevel > 31) sSummon = "prc_sum_vamp2";
|
||
else if (nLevel > 28) sSummon = "prc_sum_bonet";
|
||
else if (nLevel > 25) sSummon = "prc_sum_wight";
|
||
else if (nLevel > 22) sSummon = "prc_sum_vamp1";
|
||
else if (nLevel > 19) sSummon = "prc_sum_grav";
|
||
else if (nLevel > 16) sSummon = "prc_tn_fthug";
|
||
else if (nLevel > 13) sSummon = "prc_sum_sklch";
|
||
else if (nLevel > 10) sSummon = "prc_sum_zlord";
|
||
else sSummon = "prc_sum_mohrg";
|
||
|
||
oCreature = CreateObject(OBJECT_TYPE_CREATURE, sSummon, GetSpellTargetLocation());
|
||
int nMaxHenchmen = GetMaxHenchmen();
|
||
SetMaxHenchmen(99);
|
||
AddHenchman(oMeldshaper, oCreature);
|
||
int nHP = GetHitDice(oCreature);
|
||
if (nNecro >= 6) nHP /= 2;
|
||
SetLocalInt(oMeldshaper, "NecrocarnumCircletPen", nHP + GetLocalInt(oMeldshaper, "NecrocarnumCircletPen"));
|
||
NecroCircletHB(oMeldshaper, oCreature);
|
||
SetMaxHenchmen(nMaxHenchmen);
|
||
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eVis, GetSpellTargetLocation());
|
||
}
|