Further file organization

Further file organization

nwn/nwnprc/trunk/smp/phs_s_findthpthc.nss

@@ -0,0 +1,85 @@
+/*:://////////////////////////////////////////////
+//:: Spell Name Find the Path
+//:: Spell FileName phs_s_findthpthc
+//:://////////////////////////////////////////////
+    This is the find the paths heartbeat, "c" script.
+
+    - Moves only if the master is in 10M.
+    - Moves to the target object
+    - Removes itself if the master is not valid (or is dead) or if the spell finnishes.
+//:://////////////////////////////////////////////
+    Creates a henchmen (should work fine with Hordes anyway) which will move
+    with ActionMoveToObject and using an object a PC will set for location to
+    move to.
+
+    The object is set via. the spell conversation (however that is done) if they
+    have the spell memorised.
+
+    Note: 3 rounds to cast
+
+    Need to add "henchmen" scripts and new creature. Make the creature eathreal,
+    maybe, or just ignore.
+//:://////////////////////////////////////////////
+//:: Created By: Jasperre
+//::////////////////////////////////////////////*/
+
+// Destroys ourself.
+void Go(string sMessage);
+
+void main()
+{
+    // Heartbeat counter.
+    int iHeartbeatsLeft = GetLocalInt(OBJECT_SELF, "PHS_SPELL_FIND_THE_PATH_DURATION_COUNTER");
+    // Master
+    object oMaster = GetMaster();
+
+    // Stop before anything else.
+    ClearAllActions();
+
+
+    // Remove it by 1
+    iHeartbeatsLeft--;
+
+    // If the new amount is 1 or over, carry on moving, else stop.
+    if(iHeartbeatsLeft >= 1 && GetIsObjectValid(oMaster))
+    {
+        // Set the amount
+        SetLocalInt(OBJECT_SELF, "PHS_SPELL_FIND_THE_PATH_DURATION_COUNTER", iHeartbeatsLeft);
+
+        // Make sure the master is within 10M
+        if(GetDistanceToObject(oMaster) <= 10.0)
+        {
+            // Get the location to move to
+            object oTarget = GetLocalObject(OBJECT_SELF, "PHS_SPELL_FIND_THE_PATH_OBJECT");
+
+            if(GetIsObjectValid(oTarget))
+            {
+                ActionMoveToObject(oTarget, TRUE);
+            }
+            else
+            {
+                // Go - no location left.
+                Go("Find the path Ended, No location to go to");
+            }
+        }
+        return;
+    }
+    else
+    {
+        // Else, there are no heartbeats left - we go!
+        // - Can be if we have no master
+        Go("Find the Path finished");
+        return;
+    }
+}
+
+void Go(string sMessage)
+{
+    SendMessageToPC(GetMaster(), sMessage);
+    // Else, there are no heartbeats left - we go!
+    effect eGo = EffectVisualEffect(VFX_IMP_UNSUMMON);
+    ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eGo, GetLocation(OBJECT_SELF));
+    SetPlotFlag(OBJECT_SELF, FALSE);
+    SetImmortal(OBJECT_SELF, FALSE);
+    DestroyObject(OBJECT_SELF);
+}