Added "removed" folder

2024-06-14 00:06:09 -04:00
parent 8a83a1b51a
commit b7139401ed
249 changed files with 14605 additions and 0 deletions
--- a/_removed/x0_s0_banishment.nss
+++ b/_removed/x0_s0_banishment.nss
@@ -0,0 +1,119 @@
+//::///////////////////////////////////////////////
+//:: Banishment
+//:: x0_s0_banishment.nss
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    All summoned creatures within 30ft of caster
+    make a save and SR check or be banished
+    + As well any Outsiders being must make a
+    save and SR check or be banished (up to
+    2 HD creatures / level can be banished)
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Preston Watamaniuk
+//:: Created On: Oct 22, 2001
+//:://////////////////////////////////////////////
+//:: VFX Pass By: Preston W, On: June 20, 2001
+
+#include "X0_I0_SPELLS"
+#include "x2_inc_spellhook"
+#include "hench_i0_generic"
+
+void main()
+{
+
+/*
+  Spellcast Hook Code
+  Added 2003-06-20 by Georg
+  If you want to make changes to all spells,
+  check x2_inc_spellhook.nss to find out more
+
+*/
+
+    if (!X2PreSpellCastCode())
+    {
+    // If code within the PreSpellCastHook (i.e. UMD) reports FALSE, do not run this spell
+        return;
+    }
+
+// End of Spell Cast Hook
+
+
+    //Declare major variables
+    object oMaster;
+    effect eVis = EffectVisualEffect(VFX_IMP_UNSUMMON);
+    effect eImpact = EffectVisualEffect(VFX_FNF_LOS_EVIL_30);
+    ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImpact, GetSpellTargetLocation());
+    int nSpellDC;
+    //Get the first object in the are of effect
+    object oTarget = GetFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_COLOSSAL, GetLocation(OBJECT_SELF));
+
+    // * the pool is the number of hit dice of creatures that can be banished
+    int nPool = 2* GetCasterLevel(OBJECT_SELF);
+
+    while(GetIsObjectValid(oTarget))
+    {
+        //does the creature have a master.
+        oMaster = GetMaster(oTarget);
+        if (oMaster == OBJECT_INVALID)
+        {
+            oMaster = OBJECT_SELF;  // TO prevent problems with invalid objects
+                                    // passed into GetAssociate
+        }
+
+        // * BK: Removed the master check, only applys to Dismissal not banishment
+        //Is that master valid and is he an enemy
+       // if(GetIsObjectValid(oMaster) && GetIsEnemy(oMaster))
+        {
+            // * Is the creature a summoned associate
+            // * or is the creature an outsider
+            // * and is there enough points in the pool
+            if(
+               (GetAssociate(ASSOCIATE_TYPE_SUMMONED, oMaster) == oTarget ||
+               GetAssociate(ASSOCIATE_TYPE_FAMILIAR, oMaster) == oTarget ||
+               GetAssociate(ASSOCIATE_TYPE_ANIMALCOMPANION, oMaster) == oTarget ) ||
+               ((GetRacialType((oTarget)) == RACIAL_TYPE_OUTSIDER)  &&
+               (nPool > 0)) ||
+               GetLocalInt(oTarget, sHenchPseudoSummon))
+            {
+                // * March 2003. Added a check so that 'friendlies' will not be
+                // * unsummoned.
+                if (spellsIsTarget(oTarget, SPELL_TARGET_STANDARDHOSTILE, OBJECT_SELF))
+                {
+                    SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, 430));
+                    //Determine correct save
+                    nSpellDC = GetSpellSaveDC();// + 6;
+                    // * Must be enough points in the pool to destroy target
+                    if (nPool >= GetHitDice(oTarget))
+                    // * Make SR and will save checks
+                    if (!MyResistSpell(OBJECT_SELF, oTarget) && !MySavingThrow(SAVING_THROW_WILL, oTarget, nSpellDC))
+                    {
+                         //Apply the VFX and delay the destruction of the summoned monster so
+                         //that the script and VFX can play.
+
+                         nPool = nPool - GetHitDice(oTarget);
+                         ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eVis, GetLocation(oTarget));
+                         if (CanCreatureBeDestroyed(oTarget) == TRUE)
+                         {
+                            //bugfix: Simply destroying the object won't fire it's OnDeath script.
+                            //Which is bad when you have plot-specific things being done in that
+                            //OnDeath script... so lets kill it.
+                            effect eKill = EffectDamage(GetCurrentHitPoints(oTarget));
+                            //just to be extra-sure... :)
+                            effect eDeath = EffectDeath(FALSE, FALSE);
+                            DelayCommand(0.25, ApplyEffectToObject(DURATION_TYPE_INSTANT, eKill, oTarget));
+                            DelayCommand(0.25, ApplyEffectToObject(DURATION_TYPE_INSTANT, eDeath, oTarget));
+
+                            DestroyObject(oTarget, 0.3);
+                         }
+                    }
+                } // rep check
+            }
+        }
+        //Get next creature in the shape.
+        oTarget = GetNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_COLOSSAL, GetLocation(OBJECT_SELF));
+    }
+}
+
+