Added PnP Dire Rat.

2021-07-21 17:48:43 -04:00
parent 552f1686c8
commit b01c5cc7db
10849 changed files with 171143 additions and 1 deletions
--- a/nwn_dark_sun/ps_plnrg_salt.nss
+++ b/nwn_dark_sun/ps_plnrg_salt.nss
@@ -0,0 +1,58 @@
+/************************************
+*   Summon Planar Energy (Salt)     *
+*                                   *
+*   Cost: 16                        *
+*   Power Score: Int                *
+*                                   *
+************************************/
+
+#include "lib_psionic"
+#include "nw_i0_spells"
+
+void main()
+{
+    object oPC=OBJECT_SELF;
+    int nCost=16;
+    int nPowerScore=GetAbilityScore(oPC, ABILITY_INTELLIGENCE);
+    int nLevel=GetEffectivePsionicLevel(oPC, FEAT_PSIONIC_SUMMON_PLANAR_ENERGY);
+    effect eVis1=EffectVisualEffect(VFX_FNF_HORRID_WILTING);
+    effect eVis2=EffectVisualEffect(VFX_COM_HIT_SONIC);
+    object oTarget=GetSpellTargetObject();
+    location lTargLoc=GetLocation(oTarget);
+    if (!GetIsObjectValid(oTarget))
+        lTargLoc=GetSpellTargetLocation();
+    oTarget=GetFirstObjectInShape(SHAPE_SPHERE, 3.0, lTargLoc, TRUE);
+    int nDC=12+(nLevel>30?15:nLevel/2)+GetAbilityModifier(ABILITY_INTELLIGENCE);
+    float fDelay;
+    int nDuration=5+nLevel;
+
+    if (!PowerCheck(oPC, nCost, nPowerScore, FEAT_PSIONIC_SUMMON_PLANAR_ENERGY)) return;
+
+
+
+    ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eVis1, lTargLoc);
+
+    while (GetIsObjectValid(oTarget))
+    {
+        if (!ReflexSave(oTarget, nDC))
+        {
+            fDelay=GetRandomDelay(0.2, 0.8);
+            DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis2, oTarget));
+            DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(GetEnhancedEffect(d4(4), FEAT_PSIONIC_SUMMON_PLANAR_ENERGY)), oTarget));
+            DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectAbilityDecrease(ABILITY_STRENGTH, GetEnhancedEffect(4, FEAT_PSIONIC_SUMMON_PLANAR_ENERGY)), oTarget, RoundsToSeconds(nDuration)));
+            DelayCommand(fDelay, SignalEvent(oTarget, EventSpellCastAt(oPC, SPELL_PSIONIC_SUMMON_PLANAR_ENERGY)));
+        }
+
+        else
+        {
+            fDelay=GetRandomDelay(0.2, 0.8);
+            DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis2, oTarget));
+            DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(GetEnhancedEffect(d4(4), FEAT_PSIONIC_SUMMON_PLANAR_ENERGY)/2), oTarget));
+            DelayCommand(fDelay, SignalEvent(oTarget, EventSpellCastAt(oPC, SPELL_PSIONIC_SUMMON_PLANAR_ENERGY)));
+        }
+
+        oTarget=GetNextObjectInShape(SHAPE_SPHERE, 3.0, lTargLoc, FALSE, OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE);
+    }
+
+
+}