Files
PRC8/nwn/nwnprc/trunk/scripts/prc_heal_comp.nss
Jaysyn904 4026b6af2c 2026/02/08 Update
Archived Spellman's Project content.
Added missing Diamond Dragon stat feats.
Hospitaler's should be able to take Extra Turning.
Dodge proxies should allow entry into Champion of Corellon.
Mounted Combat is a prereq for Champion of Corellon.
Only Clerics have Domain reqs to enter Morninglord.
Verdant Lord was missing BAB 4 entry requirement.
Diamond Dragons don't get spellcraft.
Re-added Korobokuru race.
Added .ltr tables for Korobokuru.
Capped Blood in the Water at +20.
Capped Pearl of Black Doubt at +20.
Added json_GetFirstKnownSpell() and json_GetNextKnownSpell().
Updated all old NWNx functions to work with NWNxEE.
Added new switch to enable optional PRCX / NWNxEE shims.
Commented out ConvoCC switches on inc_switch_setup.nss
Diamond Dragon's stat increases are intrinsic when using NWNxEE.
Forsaker's stat increases are intrinsic when using NWNxEE.
Vow of Poverty's stat increases are intrinsic when using NWNxEE.
Cloud Dragon summon should be Neutral Good.
Fixed Verdant Lord's regen.
Fixed Forest Master's regen.
Morninglord's Creative Fire should affect Alchemy.
Added yes/no dialog when choosing Vow of Poverty bonus Exalted Feats.
Racial natural AC should be intrinsic when NWNxEE is enabled.
Transcendent Vitality's CON bonus is intrinsic when NWNxEE is enabled.
2026-02-08 00:44:28 -05:00

536 lines
18 KiB
Plaintext
Raw Blame History

/*
Type of Feat: Class
Prerequisite: Healer 8
Specifics: Gain a companion
Use: Selected.
*/
void SummonCelestialCompanion(object oPC, string sResRef, int nHD, int nHealerLvl, location lTarget, float fDuration);
const int HEALER_COMP_UNICORN = 1845;
const int HEALER_COMP_LAMMASU = 1846;
const int HEALER_COMP_ANDRO = 1847;
#include "prc_inc_assoc"
#include "prc_inc_json"
void main()
{
object oCaster = OBJECT_SELF;
object oComp = GetAssociateNPC(ASSOCIATE_TYPE_CELESTIALCOMPANION, oCaster);
int nSpellId = GetSpellId();
int nHealerLvl = GetLevelByClass(CLASS_TYPE_HEALER, oCaster);
float fDuration = HoursToSeconds(nHealerLvl*2);
if((HEALER_COMP_LAMMASU == nSpellId && nHealerLvl < 12) || (HEALER_COMP_ANDRO == nSpellId && nHealerLvl < 16))
{
FloatingTextStringOnCreature("You are too low level to summon this companion", oCaster, FALSE);
IncrementRemainingFeatUses(oCaster, FEAT_CELESTIAL_COMPANION);
return;
}
vector vloc = GetPositionFromLocation(GetLocation(oCaster));
vector vLoc = Vector( vloc.x + (Random(6) - 2.5f), vloc.y + (Random(6) - 2.5f), vloc.z );
location lTarget = Location(GetArea(oCaster), vLoc, IntToFloat(Random(361) - 180));
string sSummon;
string sNewName;
int nHD;
if(HEALER_COMP_UNICORN == nSpellId)
{
sSummon = "prc_sum_unicrn01";
nHD = 4;
}
else if(HEALER_COMP_LAMMASU == nSpellId)
{
sSummon = "prc_sum_lamasu01";
nHD = 7;
}
else if(HEALER_COMP_ANDRO == nSpellId)
{
sSummon = "prc_sum_andro01";
nHD = 12;
}
//remove previously summoned companion
if(GetIsObjectValid(oComp))
DestroyAssociate(oComp);
effect eVis = EffectVisualEffect(VFX_FNF_SUMMON_CELESTIAL);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eVis, lTarget);
DelayCommand(2.0f, SummonCelestialCompanion(oCaster, sSummon, nHD, nHealerLvl, lTarget, fDuration));
}
void SummonCelestialCompanion(object oPC, string sResRef, int nHD, int nHealerLvl, location lTarget, float fDuration)
{
// Calculate effective level based on companion type
int nEffectiveLevel = nHealerLvl;
if(sResRef == "prc_sum_lamasu01")
nEffectiveLevel -= 4;
else if(sResRef == "prc_sum_andro01")
nEffectiveLevel -= 8;
string sNewName;
object oCelestial;
int iTargetLvl = 0;
int iBaseCL = 0;
int bMove, bSR, bSave;
if (nEffectiveLevel >= 18)
{
bSave = TRUE;
bSR = TRUE;
bMove = TRUE;
}
else if(nEffectiveLevel >= 15)
{
bSave = TRUE;
}
if(sResRef == "prc_sum_unicrn01")
{
sNewName = "Celestial Unicorn Companion";
oCelestial = MakeCelestialCompanionFromTemplate(sResRef, lTarget, nEffectiveLevel);
int nOriginalHD = GetLocalInt(oCelestial, "nOriginalHD");
int nBonus = GetHealerCompanionBonus(nEffectiveLevel);
if (nBonus < 1) nBonus = 0;
iTargetLvl = nBonus + nOriginalHD;
int iMinHD = GetLocalInt(oCelestial, "iMinHD");
int iMaxHD = GetLocalInt(oCelestial, "iMaxHD");
int iClass2 = GetLocalInt(oCelestial, "Class2");
int iClass2Package = GetLocalInt(oCelestial, "Class2Package");
int iClass2Start = GetLocalInt(oCelestial, "Class2Start");
int iBaseCL = GetLocalInt(oCelestial, "iBaseCL");
int iMagicUse = GetLocalInt(oCelestial, "X2_L_BEH_MAGIC");
string sAI = GetLocalString(oCelestial, "X2_SPECIAL_COMBAT_AI_SCRIPT");
if (DEBUG) DoDebug("prc_heal_comp >> SummonCelestialCompanion: iMinHD = " +IntToString(iMinHD)+".");
if (DEBUG) DoDebug("prc_heal_comp >> SummonCelestialCompanion: iMaxHD = " +IntToString(iMaxHD)+".");
//check the ranges so we dont go above max, or below min.
if(iTargetLvl < iMinHD) iTargetLvl = iMinHD;
if(iTargetLvl > iMaxHD) iTargetLvl = iMaxHD;
if (DEBUG) DoDebug("prc_heal_comp >> SummonCelestialCompanion: iTargetLvl = " +IntToString(iTargetLvl)+".");
effect eSummon = ExtraordinaryEffect(EffectSummonCreature("", VFX_FNF_SUMMON_CELESTIAL, 0.0, 0, VFX_IMP_UNSUMMON, oCelestial));
ApplyEffectAtLocation(DURATION_TYPE_TEMPORARY, eSummon, lTarget, fDuration);
//:: Fires LevelUpSummon for scaling summons using LevelUpHenchman
LevelUpSummon(oCelestial, iTargetLvl);
SetObjectVisualTransform(oCelestial, OBJECT_VISUAL_TRANSFORM_SCALE, 1.4);
/* effect eUniboost = EffectACIncrease(nBonus, AC_NATURAL_BONUS);
eUniboost = EffectLinkEffects(eUniboost, EffectAbilityIncrease(ABILITY_STRENGTH, nBonus));
eUniboost = EffectLinkEffects(eUniboost, EffectAbilityIncrease(ABILITY_DEXTERITY, nBonus));
eUniboost = EffectLinkEffects(eUniboost, EffectAbilityIncrease(ABILITY_INTELLIGENCE, nBonus));
eUniboost = UnyieldingEffect(eUniboost);
ApplyEffectToObject(DURATION_TYPE_PERMANENT, eUniboost, oCelestial); */
SetCurrentHitPoints(oCelestial, GetMaxPossibleHP(oCelestial));
}
else
{
if(sResRef == "prc_sum_lamasu01")
{
sNewName = "Celestial Lammasu Companion";
}
else if(sResRef == "prc_sum_andro01")
{
sNewName = "Celestial Androsphinx Companion";
}
json jCelestial = TemplateToJson(sResRef, RESTYPE_UTC);
if (jCelestial == JSON_NULL)
{
DoDebug("prc_heal_comp >> TemplateToJson failed <20> bad resref or resource missing.");
return;
}
//:: Get local vars to transfer over.
int iMinHD = json_GetLocalIntFromVarTable(jCelestial, "iMinHD");
int iMaxHD = json_GetLocalIntFromVarTable(jCelestial, "iMaxHD");
int nOriginalHD = json_GetLocalIntFromVarTable(jCelestial, "nOriginalHD");
int iClass2 = json_GetLocalIntFromVarTable(jCelestial, "Class2");
int iClass2Package = json_GetLocalIntFromVarTable(jCelestial, "Class2Package");
int iClass2Start = json_GetLocalIntFromVarTable(jCelestial, "Class2Start");
int iBaseCL = json_GetLocalIntFromVarTable(jCelestial, "iBaseCL");
int iMagicUse = json_GetLocalIntFromVarTable(jCelestial, "X2_L_BEH_MAGIC");
string sAI = json_GetLocalStringFromVarTable(jCelestial, "X2_SPECIAL_COMBAT_AI_SCRIPT");
if (DEBUG) DoDebug("prc_heal_comp >> SummonCelestialCompanion: iMinHD = " +IntToString(iMinHD)+".");
if (DEBUG) DoDebug("prc_heal_comp >> SummonCelestialCompanion: iMaxHD = " +IntToString(iMaxHD)+".");
int nBonus = GetHealerCompanionBonus(nEffectiveLevel);
if (nBonus < 1) nBonus = 0;
// json_AddHitDice ADDS to existing HD, so only pass the bonus
iTargetLvl = nBonus;
// Range check should be on total HD (base + bonus), not just bonus
int nTotalHD = nBonus + nOriginalHD;
if(nTotalHD < iMinHD)
{
iTargetLvl = iMinHD - nOriginalHD;
if(iTargetLvl < 0) iTargetLvl = 0;
}
if(nTotalHD > iMaxHD)
{
iTargetLvl = iMaxHD - nOriginalHD;
}
//:: Stat boost calc
int nStatBoost = GetStatBoostsFromHD(nOriginalHD, nBonus);
//:: Get current HD
int nCurrentHD = json_GetCreatureHD(jCelestial);
if (nCurrentHD <= 0)
{
DoDebug("prc_heal_comp >> json_GetCreatureHD failed <20> template missing HD data.");
return;
}
//:: Get current CR
int nBaseCR = 1;
nBaseCR = FloatToInt(json_GetChallengeRating(jCelestial));
if (nBaseCR <= 0)
{
DoDebug("prc_heal_comp >> json_GetChallengeRating failed <20> template missing CR data.");
return;
}
//:: Add Hit Dice
jCelestial = json_AddHitDice(jCelestial, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AddHitDice failed - json became invalid.");
return;
}
//:: Recalculate & maximize HP
nCurrentHD = json_GetCreatureHD(jCelestial);
if (nCurrentHD <= 0)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_GetCreatureHD failed <20> template missing HD data.");
return;
}
if(DEBUG) DoDebug("prc_heal_comp >> nCurrentHD is: "+IntToString(nCurrentHD)+ " entering json_RecalcMaxHP.");
jCelestial = json_RecalcMaxHP(jCelestial, 8);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_RecalcMaxHP failed - JSON became invalid.");
return;
}
//:: Update CR
jCelestial = json_UpdateCelestialCR(jCelestial, nBaseCR, nCurrentHD);
if (jCelestial == JSON_NULL)
{
DoDebug("prc_heal_comp >> json_UpdateCelestialCR failed <20> json became invalid.");
return;
}
//:: Apply celestial template modifications
jCelestial = json_MakeCelestial(jCelestial, nCurrentHD, nBaseCR);
if (jCelestial == JSON_NULL)
{
DoDebug("prc_heal_comp >> MakeCelestialCreatureFromTemplate failed <20> MakeCelestial returned invalid JSON.");
return;
}
//:: Update feats from bonus HD
jCelestial = json_AddFeatsFromCreatureVars(jCelestial, nOriginalHD);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AddFeatsFromCreatureVars failed <20> JSON became invalid.");
return;
}
//:: Update stats for Bonus HD
jCelestial = json_ApplyAbilityBoostFromHD(jCelestial, nOriginalHD);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_ApplyAbilityBoostFromHD failed <20> JSON became invalid.");
return;
}
//:: Bonus stats for Healer Level
jCelestial = json_UpdateTemplateStats(jCelestial, nBonus, nBonus, 0, nBonus, 0, 0);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_UpdateTemplateStats failed <20> JSON became invalid.");
return;
}
//:: Apply +2 Natural AC bonus per 3 Healer levels
jCelestial = json_IncreaseBaseAC(jCelestial, nBonus);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_IncreaseBaseAC failed <20> JSON became invalid.");
return;
}
if(sResRef == "prc_sum_lamasu01")
{
//:: Lammasu w/ 16 INT gets 5 (2+3) skill points per HD
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_CONCENTRATION, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on CONCENTRATION <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_LISTEN, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on LISTEN <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_LORE, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on LORE <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_SPOT, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on SPOT <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_SENSE_MOTIVE, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on SENSE MOTIVE <20> JSON became invalid.");
return;
}
//:: Lammasu size increases to huge @ 11 HD / 20 Healer levels
if (nHealerLvl >= 20)
{
jCelestial = json_AdjustCreatureSize(jCelestial, 1);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSize failed - JSON became invalid.");
return;
}
}
}
if (sResRef == "prc_sum_andro01")
{
//:: Androsphinx w/ 16 INT gets 5 (2+3) skill points per HD
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_INTIMIDATE, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on INTIMIDATE <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_LISTEN, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on LISTEN <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_LORE, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on LORE <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_SPOT, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on SPOT <20> JSON became invalid.");
return;
}
jCelestial = json_AdjustCreatureSkillByID(jCelestial, SKILL_SENSE_MOTIVE, iTargetLvl);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSkillByID failed on SENSE MOTIVE <20> JSON became invalid.");
return;
}
//:: Androsphinx size increases to huge @ 19 HD / 29 Healer levels
if (nHealerLvl >= 29)
{
jCelestial = json_AdjustCreatureSize(jCelestial, 1);
if (jCelestial == JSON_NULL)
{
SendMessageToPC(oPC, "prc_heal_comp >> json_AdjustCreatureSize failed - JSON became invalid.");
return;
}
}
}
//:: Spawn the creature
oCelestial = JsonToObject(jCelestial, lTarget);
//:: Set variables
SetLocalInt(oCelestial, "TEMPLATE_CELESTIAL", 1);
SetLocalInt(oCelestial, "iMinHD", iMinHD);
SetLocalInt(oCelestial, "iMaxHD", iMaxHD);
SetLocalInt(oCelestial, "nOriginalHD", nOriginalHD);
SetLocalInt(oCelestial, "Class2", iClass2);
SetLocalInt(oCelestial, "Class2Package", iClass2Package);
SetLocalInt(oCelestial, "Class2Start", iClass2Start);
SetLocalInt(oCelestial, "iBaseCL", iBaseCL);
SetLocalInt(oCelestial, "X2_L_BEH_MAGIC", iMagicUse);
SetLocalString(oCelestial, "X2_SPECIAL_COMBAT_AI_SCRIPT", sAI);
effect eSummon = ExtraordinaryEffect(EffectSummonCreature("", VFX_FNF_SUMMON_CELESTIAL, 0.0, 0, VFX_IMP_UNSUMMON, oCelestial));
ApplyEffectAtLocation(DURATION_TYPE_TEMPORARY, eSummon, lTarget, fDuration);
if (sResRef == "prc_sum_lamasu01")
{
if (nHealerLvl >= 20)
{
//:: Update creature weapons for Size increase
if(DEBUG) DoDebug("prc_heal_comp: Updating Lammasu creature weapons for size increase.");
object oWeapCR = GetItemInSlot(INVENTORY_SLOT_CWEAPON_R, oCelestial);
MyDestroyObject(oWeapCR);
object oWeapCL = GetItemInSlot(INVENTORY_SLOT_CWEAPON_L, oCelestial);
MyDestroyObject(oWeapCL);
oWeapCR = CreateItemOnObject("nw_it_crewpsp010", oCelestial);
ForceEquip(oCelestial, oWeapCR, INVENTORY_SLOT_CWEAPON_R);
oWeapCL = CreateItemOnObject("nw_it_crewpsp010", oCelestial);
ForceEquip(oCelestial, oWeapCL, INVENTORY_SLOT_CWEAPON_L);
SetObjectVisualTransform(oCelestial, OBJECT_VISUAL_TRANSFORM_SCALE, 1.4);
}
else
{
SetObjectVisualTransform(oCelestial, OBJECT_VISUAL_TRANSFORM_SCALE, 1.2);
}
}
if (sResRef == "prc_sum_andro01")
{
if (nHealerLvl >= 29)
{
//:: Update creature weapons for Size increase
if(DEBUG) DoDebug("prc_heal_comp: Updating Androsphinx creature weapons for size increase.");
object oWeapCR = GetItemInSlot(INVENTORY_SLOT_CWEAPON_R, oCelestial);
MyDestroyObject(oWeapCR);
object oWeapCL = GetItemInSlot(INVENTORY_SLOT_CWEAPON_L, oCelestial);
MyDestroyObject(oWeapCL);
oWeapCR = CreateItemOnObject("nw_it_crewpsp015", oCelestial);
ForceEquip(oCelestial, oWeapCR, INVENTORY_SLOT_CWEAPON_R);
oWeapCL = CreateItemOnObject("nw_it_crewpsp015", oCelestial);
ForceEquip(oCelestial, oWeapCL, INVENTORY_SLOT_CWEAPON_L);
SetObjectVisualTransform(oCelestial, OBJECT_VISUAL_TRANSFORM_SCALE, 1.3);
}
else
{
SetObjectVisualTransform(oCelestial, OBJECT_VISUAL_TRANSFORM_SCALE, 1.1);
}
}
}
SetCurrentHitPoints(oCelestial, GetMaxPossibleHP(oCelestial));
SetLocalNPC(oPC, oCelestial, ASSOCIATE_TYPE_CELESTIALCOMPANION, 1);
SetTag(oCelestial, "prc_heal_comp");
SetLocalObject(oCelestial, "MASTER", oPC);
AddAssociate(oPC, oCelestial);
SetLocalObject(oPC, "HealerCompanion", oCelestial);
SetLocalInt(oCelestial, "X2_JUST_A_DISABLEEQUIP", TRUE);
effect eBonus = CelestialTemplateEffects(iTargetLvl);
//:: Spell Resistance equal to Healer's class + 5, or retain existing SR if higher
int iExSR = GetSpellResistance(oCelestial);
int nSpellResistance;
if (iExSR < nHealerLvl + 5) nSpellResistance = nHealerLvl + 5;
else nSpellResistance = 0;
SetName(oCelestial, sNewName);
if (nHealerLvl >= 18)
{
bSave = TRUE;
bSR = TRUE;
bMove = TRUE;
}
else if(nHealerLvl >= 15)
{
bSave = TRUE;
}
SetLocalInt(oCelestial, PRC_CASTERLEVEL_OVERRIDE, iTargetLvl + iBaseCL);
if(bSave) eBonus = EffectLinkEffects(eBonus, EffectSavingThrowIncrease(SAVING_THROW_WILL, 4, SAVING_THROW_TYPE_MIND_SPELLS));
if(bSR) eBonus = EffectLinkEffects(eBonus, EffectSpellResistanceIncrease(nSpellResistance));
if(bMove) eBonus = EffectLinkEffects(eBonus, EffectMovementSpeedIncrease(33));
eBonus = UnyieldingEffect(eBonus);
ApplyEffectToObject(DURATION_TYPE_PERMANENT, eBonus, oCelestial);
DelayCommand(0.5F, AugmentSummonedCreature(sResRef));
SetName(oCelestial, sNewName);
}
/*
int nArmour, nStat, bSR, bMove, bSave;
effect eBonus;
if (nClass >= 18)
{
nArmour = 6;
nStat = 6;
nHD += 6;
bSave = TRUE;
bSR = TRUE;
bMove = TRUE;
}
else if(nClass >= 15)
{
nArmour = 4;
nStat = 4;
nHD += 4;
bSave = TRUE;
}
else if(nClass >= 12)
{
nArmour = 2;
nStat = 2;
nHD += 2;
}
// Epic bonuses
int nEpicBonus = (nClass - 20) / 2;
nArmour += nEpicBonus;
nHD += nEpicBonus;
nStat += nEpicBonus / 2;
eBonus = EffectACIncrease(nArmour);
if(GetPRCSwitch(PRC_NWNXEE_ENABLED))
{
PRC_Funcs_ModAbilityScore(oComp, ABILITY_STRENGTH, nStat);
PRC_Funcs_ModAbilityScore(oComp, ABILITY_DEXTERITY, nStat);
PRC_Funcs_ModAbilityScore(oComp, ABILITY_INTELLIGENCE, nStat);
}
else
{
eBonus = EffectLinkEffects(eBonus, EffectAbilityIncrease(ABILITY_STRENGTH, nStat));
eBonus = EffectLinkEffects(eBonus, EffectAbilityIncrease(ABILITY_DEXTERITY, nStat));
eBonus = EffectLinkEffects(eBonus, EffectAbilityIncrease(ABILITY_INTELLIGENCE, nStat));
}
if(bSave) eBonus = EffectLinkEffects(eBonus, EffectSavingThrowIncrease(SAVING_THROW_WILL, 4, SAVING_THROW_TYPE_MIND_SPELLS));
if(bSR) eBonus = EffectLinkEffects(eBonus, EffectSpellResistanceIncrease(nClass));
if(bMove) eBonus = EffectLinkEffects(eBonus, EffectMovementSpeedIncrease(33));
eBonus = SupernaturalEffect(eBonus);
ApplyEffectToObject(DURATION_TYPE_PERMANENT, eBonus, oComp);
} */