Added NWN Dark Sun module contents

Added NWN Dark Sun module contents.

nwnds_module/ps_megakinesis.nss

@@ -0,0 +1,108 @@
+/************************************
+*   Megakinesis                     *
+*                                   *
+*   Cost: 30                        *
+*   Power Score: Wis -4             *
+*                                   *
+************************************/
+
+#include "lib_psionic"
+
+void main()
+{
+    object oPC=OBJECT_SELF;
+    int nCost=30;
+    int nPowerScore=GetAbilityScore(oPC, ABILITY_WISDOM)-4;
+    effect eVis1=EffectVisualEffect(VFX_FNF_BLINDDEAF);
+    effect eVis2=EffectVisualEffect(VFX_IMP_MAGBLUE);
+    effect eLink=EffectCutsceneImmobilize();
+    eLink=EffectLinkEffects(EffectVisualEffect(VFX_DUR_PARALYZE_HOLD), eLink);
+    eLink=ExtraordinaryEffect(eLink);
+    int nLevel=GetEffectivePsionicLevel(oPC, FEAT_PSIONIC_MEGAKINESIS);
+    int nDC=12+(nLevel>30?15:nLevel/2)+GetAbilityModifier(ABILITY_WISDOM);
+    object oTarget=GetSpellTargetObject();
+    location lLoc=(GetIsObjectValid(oTarget))?
+                GetLocation(oTarget) : GetSpellTargetLocation();
+
+    if (!PowerCheck(oPC, nCost, nPowerScore, FEAT_PSIONIC_MEGAKINESIS)) return;
+
+    int nDuration=GetEnhancedDuration(4+nLevel/2);
+
+    ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eVis1, lLoc);
+
+    oTarget = GetFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_HUGE, lLoc, TRUE,
+        OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE
+        | OBJECT_TYPE_ITEM);
+
+    while (GetIsObjectValid(oTarget))
+    {
+        if (GetObjectType(oTarget)==OBJECT_TYPE_CREATURE)
+        {
+            if(GetIsEnemy(oPC, oTarget))
+            {
+                SignalEvent(oTarget, EventSpellCastAt(oPC, SPELL_PSIONIC_MEGAKINESIS));
+
+                if (!ReflexSave(oTarget, nDC, SAVING_THROW_TYPE_NONE, oPC) && !GetIsDM(oTarget))
+                    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, RoundsToSeconds(nDuration));
+            }
+        }
+
+        else if (GetObjectType(oTarget)==OBJECT_TYPE_DOOR)
+        {
+            DelayCommand(1.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis2, oTarget));
+
+            if(GetIsOpen(oTarget))
+                AssignCommand(oTarget, ActionCloseDoor(oTarget));
+
+            else if (!GetLocked(oTarget))
+                AssignCommand(oTarget, ActionOpenDoor(oTarget));
+
+            else if (!GetPlotFlag(oTarget) && GetLockUnlockDC(oTarget)<=nDC+15)
+            {
+                AssignCommand(oTarget, ActionOpenDoor(oTarget));
+                AssignCommand(oTarget, ActionUnlockObject(oTarget));
+                TriggerTrap(oTarget);
+            }
+        }
+
+        else if (GetObjectType(oTarget)==OBJECT_TYPE_PLACEABLE)
+        {
+
+            DelayCommand(1.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis2, oTarget));
+
+            if(GetIsOpen(oTarget))
+                AssignCommand(oTarget, PlayAnimation(ANIMATION_PLACEABLE_CLOSE));
+
+            else if (GetLocked(oTarget) && !GetPlotFlag(oTarget)
+                    && GetLockUnlockDC(oTarget)<=nDC+15)
+            {
+                AssignCommand(oTarget, PlayAnimation(ANIMATION_PLACEABLE_OPEN));
+                AssignCommand(oTarget, ActionUnlockObject(oTarget));
+                TriggerTrap(oTarget);
+            }
+
+            else if (!GetLocked(oTarget) && GetHasInventory(oTarget))
+                AssignCommand(oTarget, PlayAnimation(ANIMATION_PLACEABLE_OPEN));
+
+            else
+                AssignCommand(oTarget, PlayAnimation(ANIMATION_PLACEABLE_ACTIVATE));
+        }
+
+        else if (GetObjectType(oTarget)==OBJECT_TYPE_ITEM)
+        {
+            DelayCommand(1.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis2, oTarget));
+
+            if(!GetIsObjectValid(GetItemPossessor(oTarget)))
+            {
+                CopyItem(oTarget, oPC, TRUE);
+                DestroyObject(oTarget, 0.2);
+            }
+        }
+
+        oTarget=GetNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_HUGE, lLoc, TRUE,
+            OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE
+            | OBJECT_TYPE_ITEM);
+
+    }
+
+}