e2f4ba74d5
Merged redundant hak files. Moved hak scripts into module. Updated gitignore. Full Compile. Added release folder & archive.
87 lines
3.4 KiB
Plaintext
87 lines
3.4 KiB
Plaintext
////////////////////////////////////////////////////////////////////////////////
|
|
// NPCACT_AREA_ENT - This function should be called from an areas OnEnter event
|
|
// if there are going to be LAG4 NPCs in the area that need to be respawned when
|
|
// PCs enter the area. NOTE: A waypoint tagged LAG4_RESPAWN_TEMP must be placed
|
|
// in the module somewhere for the creature to be initially spawned for TAG to
|
|
// be discovered.
|
|
//------------------------------------------------------------------------------
|
|
// By Deva Bryson Winblood. 06/22/2004
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
#include "npcactivitiesh"
|
|
#include "npcactstackh"
|
|
/////////////////////
|
|
// PROTOTYPES
|
|
/////////////////////
|
|
|
|
////////////////////////////////////////////////////////////////////////// MAIN
|
|
void main()
|
|
{
|
|
object oPC=GetEnteringObject();
|
|
struct StackHeader stH=fnGetLocalStack("stLAG4");
|
|
object oNPC;
|
|
object oTemp=GetWaypointByTag("LAG4_RESPAWN_TEMP");
|
|
string sStore;
|
|
string sRes;
|
|
int nCHP;
|
|
int nHP;
|
|
int nDmg;
|
|
effect eEff;
|
|
object oPost;
|
|
if (GetIsPC(oPC)&&GetIsObjectValid(oTemp))
|
|
{ // PC and TEMP ok
|
|
if (DEBUG_NPCACT_ON) SendMessageToPC(oPC,"LAG4 Area entered... respawning NPCs #:"+IntToString(stH.nNum));
|
|
while(stH.nNum>0)
|
|
{ // items on the stack
|
|
stH=fnPopStack(stH);
|
|
sStore=stH.sRet;
|
|
if (DEBUG_NPCACT_ON) SendMessageToPC(oPC," "+sStore);
|
|
if (GetStringLength(sStore)>2)
|
|
{ // valid string returned
|
|
sRes=fnParse(sStore,"/");
|
|
sStore=fnRemoveParsed(sStore,sRes,"/");
|
|
nCHP=StringToInt(sStore);
|
|
oNPC=CreateObject(OBJECT_TYPE_CREATURE,sRes,GetLocation(oTemp));
|
|
if (DEBUG_NPCACT_ON) SendMessageToPC(oPC," Created:"+sRes);
|
|
if (GetIsObjectValid(oNPC))
|
|
{ // creature created
|
|
oPost=GetNearestObjectByTag("POST_"+GetTag(oNPC),oPC,1);
|
|
if (!GetIsObjectValid(oPost))
|
|
{ // try night
|
|
oPost=GetNearestObjectByTag("NIGHT_"+GetTag(oNPC),oPC,1);
|
|
} // try night
|
|
if (!GetIsObjectValid(oPost))
|
|
{ // try day module wide
|
|
oPost=GetWaypointByTag("POST_"+GetTag(oNPC));
|
|
} // try day module wide
|
|
if (!GetIsObjectValid(oPost))
|
|
{ // try night module wide
|
|
oPost=GetWaypointByTag("NIGHT_"+GetTag(oNPC));
|
|
} // try night module wide
|
|
if (GetIsObjectValid(oPost))
|
|
{ // valid post
|
|
nHP=GetCurrentHitPoints(oNPC);
|
|
if (nHP>nCHP)
|
|
{ // need to adjust hit points
|
|
nDmg=nHP-nCHP;
|
|
eEff=EffectDamage(nDmg);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT,eEff,oNPC,1.0);
|
|
} // need to adjust hit points
|
|
if (DEBUG_NPCACT_ON) SendMessageToPC(oPC," Moved:"+GetTag(oNPC));
|
|
AssignCommand(oNPC,JumpToObject(oPost));
|
|
} // valid post
|
|
else
|
|
{ // could not find post
|
|
SendMessageToPC(oPC,"NPC ACTIVITIES 6.0 ERROR: Could not find a POST_"+GetTag(oNPC)+" to respawn a LAG4 NPC at.");
|
|
DestroyObject(oNPC);
|
|
} // could not find post
|
|
} // creature created
|
|
} // valid string returned
|
|
} // items on the stack
|
|
} // PC and TEMP ok
|
|
else if (GetIsObjectValid(oTemp)==FALSE)
|
|
{
|
|
SendMessageToPC(oPC,"NPC ACTIVITIES 6.0 ERROR: Cannot find waypoint with tag 'LAG4_RESPAWN_TEMP'");
|
|
}
|
|
}
|
|
////////////////////////////////////////////////////////////////////////// MAIN
|