TheHordeOrcs_PRC8/_module/nss/warlorddeath.nss
Jaysyn904 defc8f9f6d Re-uploaded instead of migrated
Re-uploaded instead of migrated.
2024-08-03 15:05:13 -04:00

73 lines
2.5 KiB
Plaintext

//::///////////////////////////////////////////////
//:: Default:On Death
//:: NW_C2_DEFAULT7
//:: Copyright (c) 2001 Bioware Corp.
//:://////////////////////////////////////////////
/*
Shouts to allies that they have been killed
*/
//:://////////////////////////////////////////////
//:: Created By: Preston Watamaniuk
//:: Created On: Oct 25, 2001
//:: Modified By: Dalantriel Jul 22, 2002
//:://////////////////////////////////////////////
#include "NW_I0_GENERIC"
void main()
{
int nClass = GetLevelByClass(CLASS_TYPE_COMMONER);
int nAlign = GetAlignmentGoodEvil(OBJECT_SELF);
if(nClass > 0 && (nAlign == ALIGNMENT_GOOD || nAlign == ALIGNMENT_NEUTRAL))
{
object oKiller = GetLastKiller();
AdjustAlignment(oKiller, ALIGNMENT_EVIL, 5);
}
SpeakString("NW_I_AM_DEAD", TALKVOLUME_SILENT_TALK);
//Shout Attack my target, only works with the On Spawn In setup
SpeakString("NW_ATTACK_MY_TARGET", TALKVOLUME_SILENT_TALK);
if(GetSpawnInCondition(NW_FLAG_DEATH_EVENT))
{
SignalEvent(OBJECT_SELF, EventUserDefined(1007));
}
// Check if Primary Good NPC is still alive
object oTrashCan = GetObjectByTag("TrashCan");
if(!(GetLocalInt(oTrashCan, "nGoodNPCDead") > 0))
{
// If so, make unholy symbol Holy
location loc = GetLocation(GetObjectByTag("POST_spawnmaster"));
SoundObjectStop(GetObjectByTag("EntranceEvil"));
DestroyObject(GetObjectByTag("spawnmaster"));
CreateObject(OBJECT_TYPE_PLACEABLE, "holylight", loc, TRUE);
CreateObject(OBJECT_TYPE_PLACEABLE, "holyfloor", loc, TRUE);
SoundObjectPlay(GetObjectByTag("WindGustSoft"));
// And flag the Warlord as being dead
object oPrimaryNPC = GetObjectByTag("Henrick");
SetLocalInt(oPrimaryNPC, "nWarlordDead", 1);
}
// Destroy Guardian Encounters and their renewable treasure
object oToDestroy;
oToDestroy =GetObjectByTag("PLC_PileStone_fires");
DestroyObject(oToDestroy);
oToDestroy =GetObjectByTag("LootBag6_noble");
DestroyObject(oToDestroy);
oToDestroy =GetObjectByTag("Corpse3_noble");
DestroyObject(oToDestroy);
oToDestroy =GetObjectByTag("Chest4_spiders");
DestroyObject(oToDestroy);
oToDestroy =GetObjectByTag("Chest3_spiders");
DestroyObject(oToDestroy);
oToDestroy =GetObjectByTag("fires");
SetEncounterActive(FALSE, oToDestroy);
oToDestroy =GetObjectByTag("Spiders");
SetEncounterActive(FALSE, oToDestroy);
oToDestroy =GetObjectByTag("Spidersmain");
SetEncounterActive(FALSE, oToDestroy);
}