e2f4ba74d5
Merged redundant hak files. Moved hak scripts into module. Updated gitignore. Full Compile. Added release folder & archive.
124 lines
4.6 KiB
Plaintext
124 lines
4.6 KiB
Plaintext
////////////////////////////////////////////////////////////////////////////////
|
|
// npcact_ext_STTR - NPC ACTIVITIES 6.0 Set Trap external command
|
|
//------------------------------------------------------------------------------
|
|
// By Deva Bryson Winblood 06/13/2004
|
|
//------------------------------------------------------------------------------
|
|
// Last Modified By: Deva Bryson Winblood
|
|
// Last Modified Date: 06/13/2004
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
#include "npcactivitiesh"
|
|
|
|
void main()
|
|
{
|
|
float fDelay=0.5;
|
|
if (GetHasSkill(SKILL_SET_TRAP)==TRUE)
|
|
{ // has set trap skill
|
|
object oItem=GetItemPossessedBy(OBJECT_SELF,"NW_IT_TRAP035");
|
|
object oWhere=GetNearestObjectByTag("NPC_TRAP_POINT");
|
|
int nCount=35;
|
|
location lTrap=GetLocation(oWhere);
|
|
string sTrapTag;
|
|
object oArea=GetArea(OBJECT_SELF);
|
|
object oNewTrap;
|
|
int nWorkVar;
|
|
int nRadius;
|
|
int nDetectDC;
|
|
int nDisarmDC;
|
|
int nSingleFire;
|
|
string sScript;
|
|
string sWork;
|
|
// <radius>.<detect>.<disarm>.<single>.<script>
|
|
string sName; // name for NPC_TRAP_POINT
|
|
while(nCount>1&&oItem==OBJECT_INVALID)
|
|
{ // check to see if possess trap
|
|
nCount--;
|
|
sTrapTag="NW_IT_TRAP0";
|
|
if (nCount>9) sTrapTag=sTrapTag+IntToString(nCount);
|
|
else sTrapTag=sTrapTag+"0"+IntToString(nCount);
|
|
oItem=GetItemPossessedBy(OBJECT_SELF,sTrapTag);
|
|
} // check to see if possess trap
|
|
if(oItem==OBJECT_INVALID)
|
|
{ // fine then search for custom traps
|
|
if (NPCACT_CUSTOMTRAPS>0)
|
|
{ // there are custom traps
|
|
nCount=1;
|
|
sTrapTag="NPCACT_TRAP_1";
|
|
oItem=GetItemPossessedBy(OBJECT_SELF,sTrapTag);
|
|
while(oItem==OBJECT_INVALID&&nCount<NPCACT_CUSTOMTRAPS)
|
|
{ // poll inventory
|
|
nCount++;
|
|
sTrapTag="NPCACT_TRAP_"+IntToString(nCount);
|
|
oItem=GetItemPossessedBy(OBJECT_SELF,sTrapTag);
|
|
} // poll inventory
|
|
} // there are custom traps
|
|
} // fine then search for custom traps
|
|
if (oItem!=OBJECT_INVALID&&oWhere!=OBJECT_INVALID)
|
|
{ // !OI
|
|
fDelay=12.0;
|
|
ActionForceMoveToObject(oWhere,FALSE,0.5);
|
|
ActionPlayAnimation(ANIMATION_LOOPING_GET_LOW,1.0,4.0);
|
|
ActionDoCommand(PlayVoiceChat(VOICE_CHAT_LAUGH,OBJECT_SELF));
|
|
oNewTrap=CreateObject(OBJECT_TYPE_PLACEABLE,"npcact_trap_invis",lTrap,FALSE);
|
|
if (oNewTrap==OBJECT_INVALID)
|
|
{ // did not work
|
|
ActionSpeakString("Humphhhh... my trap did not work");
|
|
} // did not work
|
|
else
|
|
{ // trap set
|
|
nWorkVar=GetLocalInt(oArea,"nNPCACTTraps");
|
|
nWorkVar++;
|
|
SetLocalInt(oArea,"nNPCACTTraps",nWorkVar);
|
|
sName=GetName(oWhere);
|
|
while(GetStringLeft(sName,1)!="."&&GetStringLength(sName)>0)
|
|
{ // build radius
|
|
sWork=sWork+GetStringLeft(sName,1);
|
|
sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
} // build radius
|
|
if (GetStringLeft(sName,1)==".") sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
nRadius=StringToInt(sWork);
|
|
sWork="";
|
|
while(GetStringLeft(sName,1)!="."&&GetStringLength(sName)>0)
|
|
{ // detect DC
|
|
sWork=sWork+GetStringLeft(sName,1);
|
|
sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
} // detect DC
|
|
if (GetStringLeft(sName,1)==".") sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
nDetectDC=StringToInt(sWork);
|
|
sWork="";
|
|
while(GetStringLeft(sName,1)!="."&&GetStringLength(sName)>0)
|
|
{ // Disarm DC
|
|
sWork=sWork+GetStringLeft(sName,1);
|
|
sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
} // Disarm DC
|
|
if (GetStringLeft(sName,1)==".") sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
nDisarmDC=StringToInt(sWork);
|
|
while(GetStringLeft(sName,1)!="."&&GetStringLength(sName)>0)
|
|
{ // single usage
|
|
sWork=sWork+GetStringLeft(sName,1);
|
|
sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
} // single usage
|
|
if (GetStringLeft(sName,1)==".") sName=GetStringRight(sName,GetStringLength(sName)-1);
|
|
nSingleFire=StringToInt(sWork);
|
|
sScript=sName;
|
|
SetLocalInt(oNewTrap,"nRadius",nRadius);
|
|
SetLocalInt(oNewTrap,"nDetect",nDetectDC);
|
|
SetLocalInt(oNewTrap,"nDisarm",nDisarmDC);
|
|
SetLocalInt(oNewTrap,"nSingleFire",nSingleFire);
|
|
if(sScript!="DEFAULT")
|
|
{
|
|
SetLocalString(oNewTrap,"sScript",sScript);
|
|
}
|
|
else
|
|
{ // default script
|
|
sWork=GetTag(oItem);
|
|
if (GetStringLength(sWork)>9) sWork=GetStringRight(sWork,9);
|
|
sScript="DOTRAP_"+sWork;
|
|
SetLocalString(oNewTrap,"sScript",sScript);
|
|
} // default script
|
|
DestroyObject(oItem);
|
|
} // trap set
|
|
} // !OI
|
|
} // has set trap skill
|
|
SetLocalFloat(OBJECT_SELF,"fDelay",fDelay);
|
|
}// NPCActionSetTrap()
|