#include "nw_i0_plot"


//PrC Consortium stuff
#include "prc_inc_function"


// -----------------------------------------------
// This code goes in the Module OnClientEnter script.
// When a PC joins the game this code looks for the item "death".
//
// If the item is not found no penalty is applied.
// If the item is found, a Gold and XP penalty is applied.



//Penalty applied for having a Death Amulet

void ApplyPenalty(object oDead)
{

    int nXP = GetXP(oDead);

// The XP penalty is currently set to the PC's level x 100 - it is
// a harsh penalty, but they were trying to cheat so...  :)
//
// If you wish to reduce the amount taken, reduce the 100 in the line below.
// Note that this script will never cause a PC to lose a level.

    int nPenalty = 100 * GetHitDice(oDead);
    int nHD = GetHitDice(oDead);
    // * You can not lose a level with this respawning
    int nMin = ((nHD * (nHD - 1)) / 2) * 1000;

    int nNewXP = nXP - nPenalty;
    if (nNewXP < nMin)
       nNewXP = nMin;
    SetXP(oDead, nNewXP);

// The gold penalty is currently set to 20% of their gold - it is
// a very harsh penalty, but they were trying to cheat so...  :)
//
// If you wish to reduce the amount taken, reduce the .20 in the line below.
// Note that this script will never take more then 10,000 gold.

    int nGoldToTake =    FloatToInt(0.20 * GetGold(oDead));
    // * a cap of 10 000gp taken from you
    if (nGoldToTake > 20000)
    {
        nGoldToTake = 20000;
    }
    AssignCommand(oDead, TakeGoldFromCreature(nGoldToTake, oDead, TRUE));
    DelayCommand(4.0, FloatingTextStrRefOnCreature(58299, oDead, FALSE));
    DelayCommand(4.8, FloatingTextStrRefOnCreature(58300, oDead, FALSE));

}



// Main Module OnClientEnter Script

void main()
{



  // Death Amulet Activities

  object oPC = GetEnteringObject();
  if(HasItem(oPC, "Death"))
  {

    object oItemToTake;
    oItemToTake = GetItemPossessedBy(oPC, "Death");
    if(GetIsObjectValid(oItemToTake) != 0)
        DestroyObject(oItemToTake);

    ApplyPenalty(oPC);


  }



    //Illegal items removal - no perma-haste, immunity, or regeneration items

    // Boots of Speed
    object oBoots;
    oBoots = GetItemPossessedBy(oPC, "NW_IT_MBOOTS005");
    if(GetIsObjectValid(oBoots) != 0)
        DestroyObject(oBoots);


    // Lesser Ring of Power
    object oRing;
    oRing = GetItemPossessedBy(oPC, "NW_IT_MRING029");
    if(GetIsObjectValid(oRing) != 0)
        DestroyObject(oRing);


    // Ring of Regeneration
    object oRing2;
    oRing2 = GetItemPossessedBy(oPC, "NW_IT_MRING004");
    if(GetIsObjectValid(oRing2) != 0)
        DestroyObject(oRing2);


    // Belt of Guiding Light
    object oGuidingLight;
    oGuidingLight = GetItemPossessedBy(oPC, "nw_it_mbelt016");
    if(GetIsObjectValid(oGuidingLight) != 0)
        DestroyObject(oGuidingLight);


    // Graceblood Bow
    object oGraceblood;
    oGraceblood = GetItemPossessedBy(oPC, "NW_WBWMXH006");
    if(GetIsObjectValid(oGraceblood) != 0)
        DestroyObject(oGraceblood);

    /*
    // Holy Grail
    object oGrail;
    oGrail = GetItemPossessedBy(oPC, "it_HolyGrail");
    if(GetIsObjectValid(oGrail) != 0)
        DestroyObject(oGrail);


    // Original Spellhelper
    object oSpellhelper;
    oSpellhelper = GetItemPossessedBy(oPC, "it_spellhelper");
    if(GetIsObjectValid(oSpellhelper) != 0)
        DestroyObject(oSpellhelper);
    */



    //set the PrC Pack running
    ExecuteScript("prc_onenter", OBJECT_SELF);



    //Disallow various buggy or unbalanced PrCs

/*     if (GetLevelByClass(CLASS_TYPE_SHADOWDANCER, oPC) == 0)
    {
    SetLocalInt(oPC,"X1_AllowShadow",1);
    } */

    /*

    if (GetLevelByClass(CLASS_TYPE_PNP_SHIFTER, oPC) == 0)
    {
    SetLocalInt(oPC,"X2_AllowPNPSfr",1);
    }

    if (GetLevelByClass(CLASS_TYPE_DIVINECHAMPION, oPC) == 0)
    {
    SetLocalInt(oPC,"X2_AllowDivcha",1);
    }

    if (GetLevelByClass(CLASS_TYPE_LICH, oPC) == 0)
    {
    SetLocalInt(oPC,"PNP_AllowLich",1);
    }

    if (GetLevelByClass(CLASS_TYPE_VASSAL, oPC) == 0)
    {
    SetLocalInt(oPC,"X1_AllowVassal",1);
    }

    */


}