Added PnP Dire Rat.

2021-07-21 17:48:43 -04:00
parent 552f1686c8
commit b01c5cc7db
10849 changed files with 171143 additions and 1 deletions
--- a/nwn_dark_sun/detectsecret.nss
+++ b/nwn_dark_sun/detectsecret.nss
@@ -0,0 +1,113 @@
+//::///////////////////////////////////////////////
+//:: Secret Door invis object
+//:: V 1.2
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    This Invisable object will do a check and see
+    if any pc comes within a radius of this object.
+
+    If the PC has the search skill or is a elf then
+    a search check will be made.
+
+    It will create a trap door that will have its
+    Destination set to a waypoint that has
+    a tag of DST_<tag of this object>
+
+    The radius is determined by the reflex saving
+    throw of the invisible object
+
+    The DC of the search stored by the willpower
+    saving throw.
+
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Robert Babiak
+//:: Created On: June 25, 2002
+//:://////////////////////////////////////////////
+
+void main()
+{
+    // get the radius and DC of the secret door.
+    float fSearchDist = IntToFloat( GetReflexSavingThrow ( OBJECT_SELF ) );
+    int nDiffaculty   = GetWillSavingThrow   ( OBJECT_SELF );
+
+    // what is the tag of this object used in setting the destination
+    string sTag = GetTag(OBJECT_SELF);
+
+    // has it been found?
+    int nDone = GetLocalInt(OBJECT_SELF,"D_"+sTag);
+    int nReset = GetLocalInt(OBJECT_SELF,"Reset");
+
+    // ok reset the door is destroyed, and the done and reset flas are made 0 again
+    if (nReset == 1)
+    {
+        nDone = 0;
+        nReset = 0;
+
+        SetLocalInt(OBJECT_SELF,"D_"+sTag,nDone);
+        SetLocalInt(OBJECT_SELF,"Reset",nReset);
+
+        object oidDoor= GetLocalObject(OBJECT_SELF,"Door");
+        if (oidDoor != OBJECT_INVALID)
+        {
+            SetPlotFlag(oidDoor,0);
+            DestroyObject(oidDoor,GetLocalFloat(OBJECT_SELF,"ResetDelay"));
+        }
+
+    }
+
+
+    int nBestSkill = -50;
+    object oidBestSearcher = OBJECT_INVALID;
+    int nCount = 1;
+
+    // Find the best searcher within the search radius.
+    object oidNearestCreature = GetNearestCreature(CREATURE_TYPE_PLAYER_CHAR, PLAYER_CHAR_IS_PC);
+
+    while ( ( nDone == 0                                   ) &&
+            ( oidNearestCreature != OBJECT_INVALID         )
+          )
+    {
+        // what is the distance of the PC to the door location
+        float fDist = GetDistanceBetween(OBJECT_SELF,oidNearestCreature);
+
+        if ( fDist <= fSearchDist )
+        {
+            int nSkill = GetSkillRank(SKILL_SEARCH,oidNearestCreature);
+
+            if (nSkill > nBestSkill)
+            {
+                nBestSkill = nSkill;
+                oidBestSearcher = oidNearestCreature;
+            }
+        }
+        nCount = nCount +1;
+        oidNearestCreature = GetNearestCreature(CREATURE_TYPE_PLAYER_CHAR, PLAYER_CHAR_IS_PC, OBJECT_SELF ,nCount);
+    }
+
+    if ( ( nDone == 0                                   ) &&
+         ( GetIsObjectValid( oidBestSearcher )          )
+       )
+    {
+       int nMod = d20();
+
+            // did we find it.
+       if ((nBestSkill +nMod > nDiffaculty) && (GetLevelByClass(CLASS_TYPE_ROGUE,oidBestSearcher) > 2))
+           {
+            location locLoc = GetLocation (OBJECT_SELF);
+            object oidDoor;
+            // yes we found it, now create a trap door for us to use. it.
+            oidDoor = CreateObject(OBJECT_TYPE_PLACEABLE,"trapdoor",locLoc,TRUE);
+
+            SetLocalString( oidDoor, "Destination" , "DST_"+sTag );
+            // make this door as found.
+            SetLocalInt(OBJECT_SELF,"D_"+sTag,1);
+            SetPlotFlag(oidDoor,1);
+            SetLocalObject(OBJECT_SELF,"Door",oidDoor);
+            DelayCommand(20.0,SetLocalInt(OBJECT_SELF,"Reset",1));
+
+       } // if skill search found
+    } // if Object is valid
+}
+