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.

_module/nss/x2_sp_is_pgreen.nss

@@ -0,0 +1,40 @@
+//::///////////////////////////////////////////////
+//:: Name x2_sp_is_pgreen
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    Ioun Stone Power: Pink Green
+    Gives the user6 minutes worth worth of +1 Charisma bonus.
+    Cancels any other Ioun stone powers in effect
+    on the PC.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Keith Warner
+//:: Created On: Dec 13/02
+//:://////////////////////////////////////////////
+
+void main()
+{
+    //variables
+    effect eVFX, eBonus, eLink, eEffect;
+
+    //from any other ioun stones
+    eEffect = GetFirstEffect(OBJECT_SELF);
+    while (GetIsEffectValid(eEffect) == TRUE)
+    {
+        if(GetEffectSpellId(eEffect) > 553 && GetEffectSpellId(eEffect) < 561)
+        {
+            RemoveEffect(OBJECT_SELF, eEffect);
+        }
+        eEffect = GetNextEffect(OBJECT_SELF);
+    }
+
+    //Apply new ioun stone effect
+    eVFX = EffectVisualEffect(502);
+     ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eVFX, OBJECT_SELF, 5.0);
+    eVFX = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
+    eBonus = EffectImmunity(IMMUNITY_TYPE_KNOCKDOWN);
+    eLink = EffectLinkEffects(eVFX, eBonus);
+    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, OBJECT_SELF, 60.0);
+
+}