generated from Jaysyn/ModuleTemplate
150 lines
5.1 KiB
Plaintext
150 lines
5.1 KiB
Plaintext
////////////////////////////////////////////////////////////////////////////////
|
|
// // //
|
|
// Lootable Corpses: OnDeath script // VERSION 3.3 //
|
|
// // //
|
|
// Modified by Scrotok on 9 Feb 03 ////////////////////////////
|
|
// Thanks to Keron Blackfeld for 99% of the work! //
|
|
// email Questions and Comments to: jnbplatte@intellisys.net //
|
|
// //
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
// //
|
|
// CAUTION: You MUST re-save/compile (F7 key) "nw_c2_default7" whenever //
|
|
// "_kb_loot_corpse" is modified! //
|
|
// //
|
|
// NEWBIES: You don't need to place this script anywhere -- it's already //
|
|
// taken care of for you (this script IS the default OnDeath script for all //
|
|
// creatures). //
|
|
// //
|
|
// This script works in conjunction with the "_kb_loot_corpse" script. //
|
|
// Place this script in the OnDeath event for any creature you want to be //
|
|
// lootable after death. //
|
|
// //
|
|
// This script is only slightly modified from the Bioware default. Two //
|
|
// lines of code have been added - they are noted below. //
|
|
// //
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
//::///////////////////////////////////////////////
|
|
//:: 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
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "NW_I0_GENERIC"
|
|
|
|
// The following line has been added to support Scrotok's Lootable Corpses script
|
|
#include "_kb_loot_corpse"
|
|
|
|
void main()
|
|
{
|
|
ExecuteScript("prc_npc_death", OBJECT_SELF);
|
|
ExecuteScript("prc_pwondeath", OBJECT_SELF);
|
|
|
|
{
|
|
|
|
object oPC = GetLastKiller();
|
|
|
|
while (GetIsObjectValid(GetMaster(oPC)))
|
|
{
|
|
oPC=GetMaster(oPC);
|
|
}
|
|
|
|
if (!GetIsPC(oPC)) return;
|
|
|
|
int nInt;
|
|
nInt=GetLocalInt(oPC, "NW_JOURNAL_ENTRYallein");
|
|
|
|
|
|
|
|
AddJournalQuestEntry("allein", 1, oPC, TRUE, FALSE, TRUE);
|
|
|
|
|
|
|
|
|
|
|
|
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));
|
|
}
|
|
|
|
//This line has been added to support Scrotok's Lootable Corpses script
|
|
LeaveCorpse();
|
|
|
|
//FOF: Sparks a RETREAT_CHECK among allies upon death via
|
|
//a shout.
|
|
if (GetLocalInt(OBJECT_SELF,"FIGHT_OR_FLIGHT") == 1 && GetLocalInt(OBJECT_SELF,"RETREATED") == 0)
|
|
{
|
|
//The int is to help make sure dead creatures lying on
|
|
//the ground are not counted toward f_OurCR.
|
|
SetLocalInt(OBJECT_SELF,"FOF_DEAD",1);
|
|
SpeakString("RETREAT_CHECK",TALKVOLUME_SILENT_TALK);
|
|
}
|
|
|
|
if(GetSpawnInCondition(NW_FLAG_DEATH_EVENT))
|
|
{
|
|
SignalEvent(OBJECT_SELF, EventUserDefined(1007));
|
|
//FOF: Sparks a RETREAT_CHECK among allies upon death via
|
|
//a shout.
|
|
if (GetLocalInt(OBJECT_SELF,"FIGHT_OR_FLIGHT") == 1 && GetLocalInt(OBJECT_SELF,"RETREATED") == 0)
|
|
{
|
|
//The int is to help make sure dead creatures lying on
|
|
//the ground are not counted toward f_OurCR.
|
|
SetLocalInt(OBJECT_SELF,"FOF_DEAD",1);
|
|
SpeakString("RETREAT_CHECK",TALKVOLUME_SILENT_TALK);
|
|
}
|
|
|
|
if(GetSpawnInCondition(NW_FLAG_DEATH_EVENT))
|
|
{
|
|
SignalEvent(OBJECT_SELF, EventUserDefined(1007));
|
|
|
|
/* Script generated by
|
|
Lilac Soul's NWN Script Generator, v. 2.3
|
|
|
|
For download info, please visit:
|
|
http://nwvault.ign.com/View.php?view=Other.Detail&id=4683&id=625 */
|
|
|
|
//Put this script OnDeath
|
|
|
|
{
|
|
|
|
object oPC = GetLastKiller();
|
|
|
|
while (GetIsObjectValid(GetMaster(oPC)))
|
|
{
|
|
oPC=GetMaster(oPC);
|
|
}
|
|
|
|
if (!GetIsPC(oPC)) return;
|
|
|
|
int nInt;
|
|
nInt=GetLocalInt(oPC, "NW_JOURNAL_ENTRYalain");
|
|
|
|
if (nInt < 1)
|
|
return;
|
|
|
|
AddJournalQuestEntry("alain", 2, oPC, TRUE, FALSE);
|
|
|
|
}
|
|
|
|
|
|
}
|
|
} }}
|