Initial commit

Adding all of the current content for Anphillia Unlimited.
2024-01-04 07:49:38 -05:00
parent df18cd54c8
commit 28cdb617b3
12943 changed files with 9727121 additions and 0 deletions
--- a/_module/nss/hc_act_search.nss
+++ b/_module/nss/hc_act_search.nss
@@ -0,0 +1,74 @@
+#include "hc_text_activate"
+#include "prc_inc_spells"
+
+void main()
+{
+    object oUser=OBJECT_SELF;
+    object oOther=GetLocalObject(oUser,"OTHER");
+    object oItem=GetLocalObject(oUser,"ITEM");
+    DeleteLocalObject(oUser,"ITEM");
+    DeleteLocalObject(oUser,"OTHER");
+    
+	int nRogueLevel = GetLevelByClass(CLASS_TYPE_ROGUE, oUser)	
+					+ GetLevelByClass(CLASS_TYPE_SCOUT, oUser)
+					+ GetLevelByClass(CLASS_TYPE_NINJA, oUser)
+					+ GetLevelByClass(CLASS_TYPE_FACTOTUM, oUser)
+					+ GetLevelByClass(CLASS_TYPE_BEGUILER, oUser)
+					+ GetLevelByClass(CLASS_TYPE_PSYCHIC_ROGUE, oUser);
+
+    location locPlayer= GetLocation(oUser);
+    int nFT=GetLocalInt(oUser,"FINDTRAP");
+    float fDis=10.0;
+    if(nFT) fDis=100.0;
+    object oSearchedItem = GetFirstObjectInShape(SHAPE_SPHERE, FeetToMeters(fDis),
+        locPlayer, TRUE, OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE | OBJECT_TYPE_TRIGGER);
+    while (oSearchedItem != OBJECT_INVALID)
+    {
+        // Check to see if the object has a trap.
+        if (GetIsTrapped(oSearchedItem))
+        {
+            // Yes, so begin detection routine.
+            int oTrapDC = GetTrapDetectDC(oSearchedItem) - 100;
+            int bCanSpotTrap = FALSE; // Assume that the person cannot spot a trap.
+            // Determine spotting capability
+            if ((oTrapDC <= 20) || ((oTrapDC > 20) && (nRogueLevel >= 1 || nFT)))
+                bCanSpotTrap = TRUE;
+                // Only check to see if detected if not previously detected
+                // and the PC has the ability to do detect it.
+            if (!GetTrapDetectedBy(oSearchedItem, oUser) && bCanSpotTrap)
+            {
+                int nSearch = GetSkillRank(SKILL_SEARCH, oUser);
+                int nDCCheck = d20() + nSearch;
+                if (nDCCheck >= oTrapDC) // Trap found
+                     SetTrapDetectedBy(oSearchedItem, oUser);
+            }
+        }
+        else
+        {
+        // Hidden door detection
+            if (GetName(oSearchedItem) == "Secret Door Placeholder" && GetLocalInt(oSearchedItem, "bFound") != TRUE)
+            {
+                string strTag = GetTag(oSearchedItem);
+                location locDoor = GetLocation(oSearchedItem);
+                int nDC = GetWillSavingThrow(oSearchedItem);
+                int nSearch = GetSkillRank(SKILL_SEARCH, oUser);
+                int nRoll = d20();
+                // Search is not a trained skill, so a search of 0 is valid
+                if ((nRoll + nSearch) >= nDC)
+                {
+                    SendMessageToPC(oUser, FINDSECRET);
+                    // yes we found it, now create a trap door for us to use. it.
+                    object oidDoor = CreateObject(OBJECT_TYPE_PLACEABLE, "secret_door", locDoor);
+                    SetLocalString( oidDoor, "strDestination" , "dst_" + strTag );
+                    SetPlotFlag(oidDoor,1);
+                    SetLocalInt(oSearchedItem, "bFound", TRUE);
+                    SetLocalObject(oSearchedItem, "oDoor", oidDoor);
+                    DelayCommand(60.0f, SetLocalInt(oSearchedItem, "bFound", FALSE));
+                    DelayCommand(60.0f, SetLocalInt(oSearchedItem, "bReset", TRUE));
+                }
+            }
+        }
+        oSearchedItem = GetNextObjectInShape(SHAPE_SPHERE, FeetToMeters(fDis),
+            locPlayer, TRUE, OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE | OBJECT_TYPE_TRIGGER);
+    }
+}