Initial upload.

Adding base PRC 4.19a files to repository.

trunk/users/Tenjac/spells/sp_visionglory.nss

@@ -0,0 +1,50 @@
+
+//:://////////////////////////////////////////////
+//:: Name     Vision of Glory
+//:: FileName   sp_visionglory.nss
+//:://////////////////////////////////////////////
+/** @file Divination
+Level: Cleric 1, Paladin 1,
+Components: V, S, DF,
+Casting Time: 1 standard action
+Range: Touch
+Target: Creature touched
+Duration: 1 minute or until discharged
+Saving Throw: None
+Spell Resistance: Yes
+
+You give the subject creature a brief vision of a divine
+entity that is giving it support and inspiring it to 
+continue. The creature gets a morale bonus equal to your 
+Charisma modifier on a single saving throw. It must choose
+to use the bonus before making the roll to which it applies.
+Using the bonus discharges the spell.
+
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Tenjac
+//:: Created On: 7/25/2022
+//:://////////////////////////////////////////////
+
+#include "prc_sp_func"
+#include "prc_add_spell_dc"
+
+
+void main()
+{
+	if(!X2PreSpellCastCode()) return;
+	PRCSetSchool(SPELL_SCHOOL_ABJURATION);
+	object oPC = OBJECT_SELF;
+        int nCasterLvl = PRCGetCasterLevel(oPC);
+        float fDur =  RoundsToSeconds(nCasterLvl);
+        int nMetaMagic = PRCGetMetaMagicFeat();
+        if(nMetaMagic & METAMAGIC_EXTEND) fDur += fDur;
+        object oTarget = PRCGetSpellTargetObject();
+        
+        int nBonus = GetAbilityModifier(ABILITY_CHARISMA, oPC);
+        SetLocalInt(oTarget, "PRCVisGlory", nBonus);
+        DelayCommand(60.0f, DeleteLocalInt(oTarget, "PRCVisGlory"));
+        
+        PRCSetSchool();
+}
+