Initial upload.

Adding base PRC 4.19a files to repository.

trunk/epicspellscripts/ss_ep_piousparly.nss

@@ -0,0 +1,80 @@
+//:://////////////////////////////////////////////
+//:: FileName: "ss_ep_piousparly"
+/*   Purpose: Pious Parley - this spell will look at the Deity field on the
+        caster, and will then use that to open the corresponding conversation
+        for that god with the caster. If no deity name exists on the caster,
+        a default conversation will open, telling them they're faithless.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Boneshank
+//:: Last Updated On: March 12, 2004
+//:://////////////////////////////////////////////
+
+#include "prc_alterations"
+//#include "x2_inc_spellhook"
+#include "inc_epicspells"
+#include "x0_i0_position"
+
+void main()
+{
+    DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
+    SetLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR", SPELL_SCHOOL_DIVINATION);
+
+    if (!X2PreSpellCastCode())
+    {
+        DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
+        return;
+    }
+    if (GetCanCastSpell(OBJECT_SELF, SPELL_EPIC_PIOUS_P))
+    {
+        string sDeity = GetDeity(OBJECT_SELF);
+        string sDeityConv = "pparl_" + GetStringLeft(sDeity, 10);
+        //Debug.
+        //SendMessageToPC(OBJECT_SELF, "Deity = " + sDeity);
+        //SendMessageToPC(OBJECT_SELF, "DeityConv = " + sDeityConv);
+
+        location lLoc = GetLocation(OBJECT_SELF);
+        location lNew;
+        float fAngle, fDist, fOrient, fDelay;
+
+        effect eDur = EffectVisualEffect(VFX_DUR_PARALYZE_HOLD);
+        effect eVisG = EffectVisualEffect(VFX_FNF_LOS_HOLY_30);
+        effect eVisN = EffectVisualEffect(VFX_FNF_LOS_NORMAL_30);
+        effect eVisE = EffectVisualEffect(VFX_FNF_LOS_EVIL_30);
+        effect eE;
+        effect eImp = EffectVisualEffect(VFX_IMP_HEALING_S);
+        int nPray = ANIMATION_LOOPING_MEDITATE;
+        int nX, nY;
+
+        if (GetAlignmentGoodEvil(OBJECT_SELF) == ALIGNMENT_GOOD) eE = eVisG;
+        else if (GetAlignmentGoodEvil(OBJECT_SELF) == ALIGNMENT_EVIL) eE = eVisE;
+        else eE = eVisN;
+
+        AssignCommand(OBJECT_SELF, ActionPlayAnimation(nPray, 1.0, 6.0));
+        fDelay = 0.2;
+        for (nX = 10; nX > 0; nX--)
+        {
+            for (nY = 20; nY > 0; nY--)
+            {
+                fAngle = IntToFloat(nY * 18);
+                fDist = IntToFloat(nX);
+                fOrient = fAngle;
+                lNew = GenerateNewLocationFromLocation
+                    (lLoc, fDist, fAngle, fOrient);
+                DelayCommand(fDelay,
+                    ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImp, lNew));
+            }
+            fDelay += 0.4;
+        }
+        SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eDur, OBJECT_SELF, 15.0, FALSE, -1, GetTotalCastingLevel(OBJECT_SELF));
+        DelayCommand(4.0,
+            ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eE, lNew));
+
+        //DelayCommand(4.9, AssignCommand(OBJECT_SELF, ClearAllActions()));
+        DelayCommand(5.0, AssignCommand(OBJECT_SELF,
+            ActionStartConversation(OBJECT_SELF,
+            sDeityConv, TRUE, FALSE)));
+    }
+    DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
+}
+