Initial Commit

Initial Commit.

_module/nss/enc_custspawn.nss

@@ -0,0 +1,51 @@
+// Spawn custom encounter
+
+// Retain DMFI functionality - copy effects
+void SpawnCreature(object oCreature, location lEncounter, int iRandomWalk = FALSE)
+{
+    object oNewCreature = CopyObject(oCreature, lEncounter);
+    effect eEffect = GetFirstEffect(oCreature);
+    while (GetIsEffectValid(eEffect))
+    {
+        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eEffect, oNewCreature);
+        eEffect = GetNextEffect(oCreature);
+    }
+    if (iRandomWalk)
+    { AssignCommand(oNewCreature, ActionRandomWalk()); }
+}
+
+
+void main()
+{
+    location lEncounter = GetLocalLocation(OBJECT_SELF, "lMCS_Spawn");
+    DeleteLocalLocation(OBJECT_SELF, "lMCS_Spawn");
+
+    object oWP;
+    object oNewCreature;
+
+    if (GetLocalInt(OBJECT_SELF, "iENC_ditto") == TRUE)
+    { oWP = GetLocalObject(OBJECT_SELF, "oENC_LastSpawn");
+      DeleteLocalInt(OBJECT_SELF, "iENC_ditto");
+    }
+    else
+    { string sEncounterArea = GetLocalString(OBJECT_SELF, "sEncounterArea");
+      int iConvChoice = GetLocalInt(OBJECT_SELF, "iConvChoice");
+      string sEncounterCell = "WP_ENC_" + IntToString(iConvChoice) + sEncounterArea;
+      oWP = GetObjectByTag(sEncounterCell);
+      SetLocalObject(OBJECT_SELF, "oENC_LastSpawn", oWP);
+      DeleteLocalString(OBJECT_SELF, "sEncounterArea");
+      DeleteLocalInt(OBJECT_SELF, "iConvChoice");
+    }
+
+    int iLoop = 1;
+    object oCreature = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, oWP, iLoop);
+
+    while (GetIsObjectValid(oCreature) && (GetDistanceBetween(oWP, oCreature) < 8.0) && (iLoop < 13))
+    {   if (GetTag(GetArea(OBJECT_SELF)) == "_EncounterArea")
+        { DelayCommand(1.0f, SpawnCreature(oCreature, lEncounter)); }
+        else
+        { SpawnCreature(oCreature, lEncounter, TRUE); }
+        iLoop++;
+        oCreature = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, oWP, iLoop);
+    }
+}