EpicValor d79d5b5ed3 Added NPC to re-level or delete character
Modified npc pickup script to ignore quest item spawns.
2023-12-14 23:02:17 -06:00

15 lines
569 B
Plaintext

void main()
{
object oTarget = GetPCSpeaker();
int nLevels = 5;
int nOrigXP = GetXP(oTarget);
int nOrigHD = GetHitDice(oTarget);
int nTargetHD = nOrigHD - nLevels;
SetXP(oTarget, ((nTargetHD * (nTargetHD - 1)) / 2) * 1000);
// Schedule the OnLevelDown virtual event to be run right away
SetLocalInt(oTarget, "PRC_OnLevelDown_OldLevel", nOrigHD);
DelayCommand(0.0f, ExecuteScript("prc_onleveldown", oTarget));
SetXP(oTarget, nOrigXP);
TakeGoldFromCreature (25000, oTarget);
}