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.
165 lines
5.2 KiB
Plaintext
165 lines
5.2 KiB
Plaintext
/**
|
|
* Thrallherd: Thrallherd
|
|
* 16/04/2005
|
|
* Stratovarius
|
|
|
|
Type of Feat: Class Specific
|
|
Prerequisite: Thrallherd level 1.
|
|
Specifics: A thrallherd who has just entered the class sends out a subtle psychic call for servants, and that call is answered.
|
|
The thrall who answers the call has a level equal to the following chart. Leadership score is calculated by adding Thrallherd's
|
|
total level to its Cha modifier and its Thrallherd level. A level 5 Psion/5 thrallherd, with a +5 Cha modifier, has a leadership
|
|
score of 20. A thrallherd can use this power 1/day and may only have 1 Thrall from this power.
|
|
|
|
Leadership Thrall Level
|
|
1 0
|
|
2 1
|
|
3 2
|
|
4 3
|
|
5 3
|
|
6 4
|
|
7 5
|
|
8 5
|
|
9 6
|
|
10 7
|
|
11 7
|
|
12 8
|
|
13 9
|
|
14 10
|
|
15 10
|
|
16 11
|
|
17 12
|
|
18 12
|
|
19 13
|
|
20 14
|
|
21 15
|
|
22 15
|
|
23 16
|
|
24 17
|
|
25+ 17
|
|
Use: Selected.
|
|
|
|
*/
|
|
|
|
#include "inc_rand_equip"
|
|
#include "prc_alterations"
|
|
#include "nw_o2_coninclude"
|
|
|
|
void CleanCopy(object oImage)
|
|
{
|
|
SetLootable(oImage, FALSE);
|
|
object oItem = GetFirstItemInInventory(oImage);
|
|
while(GetIsObjectValid(oItem))
|
|
{
|
|
SetDroppableFlag(oItem, FALSE);
|
|
SetItemCursedFlag(oItem, TRUE);
|
|
AddItemProperty(DURATION_TYPE_PERMANENT, ItemPropertyWeightReduction(IP_CONST_REDUCEDWEIGHT_10_PERCENT), oItem);
|
|
SetIdentified(oItem, TRUE);
|
|
oItem = GetNextItemInInventory(oImage);
|
|
}
|
|
int i;
|
|
for(i=0;i<NUM_INVENTORY_SLOTS;i++)//equipment
|
|
{
|
|
oItem = GetItemInSlot(i, oImage);
|
|
SetDroppableFlag(oItem, FALSE);
|
|
AddItemProperty(DURATION_TYPE_PERMANENT, ItemPropertyWeightReduction(IP_CONST_REDUCEDWEIGHT_10_PERCENT), oItem);
|
|
SetIdentified(oItem, TRUE);
|
|
SetItemCursedFlag(oItem, TRUE);
|
|
}
|
|
TakeGoldFromCreature(GetGold(oImage), oImage, TRUE);
|
|
}
|
|
|
|
void main()
|
|
{
|
|
if(GetPRCSwitch(PRC_THRALLHERD_LEADERSHIP))
|
|
{
|
|
FloatingTextStringOnCreature("Please select your thrall via the cohort system.", OBJECT_SELF, FALSE);
|
|
return;
|
|
}
|
|
int nMax = GetMaxHenchmen();
|
|
|
|
int i = 1;
|
|
object oHench = GetAssociate(ASSOCIATE_TYPE_HENCHMAN, OBJECT_SELF, i);
|
|
|
|
if (GetTag(oHench) == "psi_thrall_thrall")
|
|
{
|
|
FloatingTextStringOnCreature("You already have a thrall", OBJECT_SELF, FALSE);
|
|
return;
|
|
}
|
|
|
|
while (GetIsObjectValid(oHench))
|
|
{
|
|
i += 1;
|
|
oHench = GetAssociate(ASSOCIATE_TYPE_HENCHMAN, OBJECT_SELF, i);
|
|
if (GetTag(oHench) == "psi_thrall_thrall")
|
|
{
|
|
FloatingTextStringOnCreature("You already have a thrall", OBJECT_SELF, FALSE);
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (i >= nMax) SetMaxHenchmen(i+1);
|
|
|
|
effect eVis = EffectVisualEffect(VFX_FNF_SUMMON_UNDEAD);
|
|
|
|
int nHD = GetHitDice(OBJECT_SELF);
|
|
if (DEBUG) FloatingTextStringOnCreature("HD: " + IntToString(nHD), OBJECT_SELF, FALSE);
|
|
int nClass = GetLevelByClass(CLASS_TYPE_THRALLHERD, OBJECT_SELF);
|
|
if (DEBUG) FloatingTextStringOnCreature("Thrallherd Level: " + IntToString(nClass), OBJECT_SELF, FALSE);
|
|
int nCha = GetAbilityModifier(ABILITY_CHARISMA, OBJECT_SELF);
|
|
if (DEBUG) FloatingTextStringOnCreature("Cha Modifier: " + IntToString(nCha), OBJECT_SELF, FALSE);
|
|
|
|
int nLead = nHD + nClass + nCha;
|
|
int nLevel;
|
|
|
|
if (nLead == 1) nLevel = 0;
|
|
if (nLead == 2) nLevel = 1;
|
|
if (nLead == 3) nLevel = 2;
|
|
if (nLead == 4) nLevel = 3;
|
|
if (nLead == 5) nLevel = 3;
|
|
if (nLead == 6) nLevel = 4;
|
|
if (nLead == 7) nLevel = 5;
|
|
if (nLead == 8) nLevel = 5;
|
|
if (nLead == 9) nLevel = 6;
|
|
if (nLead == 10) nLevel = 7;
|
|
if (nLead == 11) nLevel = 7;
|
|
if (nLead == 12) nLevel = 8;
|
|
if (nLead == 13) nLevel = 9;
|
|
if (nLead == 14) nLevel = 10;
|
|
if (nLead == 15) nLevel = 10;
|
|
if (nLead == 16) nLevel = 11;
|
|
if (nLead == 17) nLevel = 12;
|
|
if (nLead == 18) nLevel = 12;
|
|
if (nLead == 19) nLevel = 13;
|
|
if (nLead == 20) nLevel = 14;
|
|
if (nLead == 21) nLevel = 15;
|
|
if (nLead == 22) nLevel = 15;
|
|
if (nLead == 23) nLevel = 16;
|
|
if (nLead == 24) nLevel = 17;
|
|
if (nLead >= 25) nLevel = 17;
|
|
|
|
if (DEBUG) FloatingTextStringOnCreature("Leadship Score: " + IntToString(nLead), OBJECT_SELF, FALSE);
|
|
if (DEBUG) FloatingTextStringOnCreature("Spell ID: " + IntToString(GetSpellId()), OBJECT_SELF, FALSE);
|
|
|
|
object oCreature = CreateObject(OBJECT_TYPE_CREATURE, "psi_thrall_fgt", GetSpellTargetLocation(), FALSE, "psi_thrall_thrall");
|
|
AddHenchman(OBJECT_SELF, oCreature);
|
|
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eVis, GetLocation(oCreature));
|
|
|
|
int n;
|
|
for(n=1;n<nLevel;n++)
|
|
{
|
|
LevelUpHenchman(oCreature, CLASS_TYPE_INVALID, TRUE);
|
|
}
|
|
for(n=1;n<nLevel;n++)
|
|
{
|
|
GenerateBossTreasure(oCreature);
|
|
}
|
|
|
|
AssignCommand(oCreature, ClearAllActions());
|
|
AssignCommand(oCreature, ActionEquipMostDamagingMelee());
|
|
AssignCommand(oCreature, ActionEquipMostEffectiveArmor());
|
|
EquipMisc(oCreature);
|
|
CleanCopy(oCreature);
|
|
|
|
SetMaxHenchmen(nMax);
|
|
}
|