#include "ww_inc_on_enter"
//This script may be cut-and-pasted directly into your
//OnClientEnter script (module-level event)
//You may also cut-and-paste lines 10-14 into any script
//which uses 'oPC' to identify the player character
void main()
{
  int iAmount = 200; // Change to the amount you want to give
  object oPC = GetEnteringObject();  //Get the PC entering the module
  object oPlayer=GetEnteringObject();
    if (GetLocalInt(oPlayer,"Dead")==1)
 {
 effect Deathstroke=EffectDeath(TRUE);
 ApplyEffectToObject(DURATION_TYPE_INSTANT,Deathstroke,oPlayer);
    // werewolf system initialization
   //SetLocalInts(oPC);
    // vampire system initialization
    //ExecuteScript("vamp_client_enter", OBJECT_SELF);
    if(!GetIsPC(oPC))return;
    if(GetXP(oPC) < 1)
        {
        //AssignCommand(oPC,TakeGoldFromCreature(GetGold(oPC),oPC,TRUE));
        GiveGoldToCreature(oPC,iAmount);
        SetXP(oPC,1);
        }
    //GiveXPToCreature(oPC, 1);
    //GiveGoldToCreature(oPC, 200); //Gives PC 200 gold
    //CreateItemOnObject("afkflag001", oPC, 1);
    object oOldBook = GetItemPossessedBy(oPC, "EverClearHandbook");
    DestroyObject(oOldBook, 2.0);
    CreateItemOnObject("everclearhandboo", oPC, 1);
  //Test to see if PC has a skill book.. if not, then create one.
  if (GetItemPossessedBy(oPC,"NoDrop_SkillLogBook")==OBJECT_INVALID)
   {
    CreateItemOnObject("skilllogbook",oPC,1);
   }
  //Delete persistent hooks which need to be 'gone' to begin with
  //**this added due to HoTU effects on servervault characters
  DeleteLocalInt(oPC,"iSkillGain");
  DeleteLocalInt(oPC,"iPCUsedMap");
  DeleteLocalInt(oPC,"iAmFollowingMap");
  DeleteLocalInt(oPC,"iAmDiggingMap");
  DeleteLocalInt(oPC,"iAmFishing");
  DeleteLocalInt(oPC,"iCancelFishing");
  DeleteLocalInt(oPC,"iAmInField");
  DeleteLocalInt(oPC,"iAmInWaterField");
  DeleteLocalInt(oPC,"iAmInCommodityArea");
  DeleteLocalString(oPC,"sKillMe");
  DeleteLocalInt(oPC,"iAmDigging");
  DeleteLocalLocation(oPC,"lIWasHere");

}
}