Initial upload

Initial upload.  PRC8 has been added.  Module compiles, PRC's default AI & treasure scripts have been integrated.  Started work on top hak for SLA / Ability / Scripting modifications.

_removed/nw_s0_grshconj.nss

@@ -0,0 +1,111 @@
+///::///////////////////////////////////////////////
+//:: Greater Shadow Conjuration
+//:: NW_S0_GrShConj.nss
+//:: Copyright (c) 2001 Bioware Corp.
+//::///////////////////////////////////////////////
+/*
+    If the opponent is clicked on Shadow Bolt is cast.
+    If the caster clicks on himself he will cast
+    Clarity and Mirror Image.  If they click on
+    the ground they will summon a Shadow Assassin.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Preston Watamaniuk
+//:: Created On: April 12, 2001
+//:://////////////////////////////////////////////
+
+void ShadowBolt (object oTarget, int nMetaMagic);
+
+void main()
+{
+    int nMetaMagic = GetMetaMagicFeat();
+    object oTarget = GetSpellTargetObject();
+    int nCast;
+    int nDuration = GetCasterLevel(OBJECT_SELF);
+
+    if (nMetaMagic == METAMAGIC_EXTEND)
+    {
+        nDuration = nDuration *2;   //Duration is +100%
+    }
+
+    if (GetIsObjectValid(oTarget))
+    {
+        if (oTarget == OBJECT_SELF)
+        {
+            nCast = 1;
+        }
+        else
+        {
+            nCast = 2;
+        }
+    }
+    else
+    {
+        nCast = 3;
+    }
+effect eMirror;
+effect eClarity;
+effect eMind;
+effect eLink;
+int nCasterLevel;
+effect eSummon;
+effect eGate;
+
+    switch (nCast)
+    {
+        case 1:
+            /*
+              Cast Clarity and Mirror Image on the caster
+            */
+           eMirror = EffectVisualEffect(VFX_DUR_GHOST_TRANSPARENT);
+          eClarity = EffectVisualEffect(VFX_IMP_REMOVE_CONDITION);
+            eMind = EffectVisualEffect(VFX_DUR_MIND_AFFECTING_POSITIVE);
+             eLink = EffectLinkEffects(eMirror, eMind);
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink,oTarget, RoundsToSeconds(2));
+            break;
+        case 2:
+           if (!ResistSpell(OBJECT_SELF, oTarget))
+           {
+              ShadowBolt(oTarget, nMetaMagic);
+           }
+           break;
+        case 3:
+           nCasterLevel = GetCasterLevel(OBJECT_SELF);
+           eSummon = EffectSummonCreature("sbio_shadassa");
+           eGate = EffectVisualEffect(VFX_FNF_SUMMON_UNDEAD);
+           ApplyEffectAtLocation(DURATION_TYPE_TEMPORARY, eSummon, GetSpellTargetLocation(), HoursToSeconds(nDuration));
+           ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eGate, GetSpellTargetLocation());
+           break;
+   }
+}
+
+void ShadowBolt (object oTarget, int nMetaMagic)
+{
+    int nDamage;
+    int nBolts = GetCasterLevel(OBJECT_SELF)/5;
+    int nCnt;
+    for (nCnt = 0; nCnt < nBolts; nCnt++)
+    {
+        int nDam = d6(3);
+        //Enter Metamagic conditions
+        if (nMetaMagic == METAMAGIC_MAXIMIZE)
+        {
+            nDamage = 18;//Damage is at max
+        }
+        else if (nMetaMagic == METAMAGIC_EMPOWER)
+        {
+            nDamage = nDamage + nDamage/2; //Damage/Healing is +50%
+        }
+        if (ReflexSave(oTarget, GetSpellSaveDC()))
+        {
+            nDamage = nDamage/2;
+        }
+        effect eDam = EffectDamage(nDamage, DAMAGE_TYPE_NEGATIVE);
+        effect eVis = EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY);
+        ApplyEffectToObject(DURATION_TYPE_INSTANT, eDam, oTarget);
+        ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+    }
+}
+
+
+