#include "lib"

void main()
{
object oPC = GetEnteringObject();
object oRoba = GetObjectByTag("itm_roba");
  {
  clearPCInventory();
  clearPCSlot(INVENTORY_SLOT_ARMS);
  clearPCSlot(INVENTORY_SLOT_ARROWS);
  clearPCSlot(INVENTORY_SLOT_BELT);
  clearPCSlot(INVENTORY_SLOT_BOLTS);
  clearPCSlot(INVENTORY_SLOT_BOOTS);
  clearPCSlot(INVENTORY_SLOT_BULLETS);
  clearPCSlot(INVENTORY_SLOT_CHEST);
  clearPCSlot(INVENTORY_SLOT_CLOAK);
  clearPCSlot(INVENTORY_SLOT_HEAD);
  clearPCSlot(INVENTORY_SLOT_LEFTHAND);
  clearPCSlot(INVENTORY_SLOT_LEFTRING);
  clearPCSlot(INVENTORY_SLOT_NECK);
  clearPCSlot(INVENTORY_SLOT_RIGHTHAND);
  clearPCSlot(INVENTORY_SLOT_RIGHTRING);
  ActionGiveItem(oRoba, oPC);
  AssignCommand(oPC, ActionWait(1.0));
  AssignCommand(oPC, ActionStartConversation(oPC, "start_dialog"));
  }
}

/*

*/

//int W_DEBUG = TRUE;
int W_DEBUG = FALSE;

object getPC();
void print(string str);

int W_EV_BEAT = 1001;
int W_EV_CONV = 1004;

int W_EV_CEND = 201;
int W_EV_SPWN = 202;

// -----------------------------------------------

void clearPCInventory() {
  object obj= getPC();
  object item= GetFirstItemInInventory(obj);
  while(item!=OBJECT_INVALID) {
    DestroyObject(item);
    item= GetNextItemInInventory(obj);
  }
}

void clearPCSlot(int slot) {
  object obj= getPC();
  object item= GetItemInSlot(slot, obj);
  if(item!=OBJECT_INVALID)
    DestroyObject(item);
}
int hasItemEquipped(string tag, object obj) {
  object item= GetItemPossessedBy(obj, tag);
  return item!=OBJECT_INVALID && (
    GetItemInSlot(INVENTORY_SLOT_ARMS    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_ARROWS  , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_BELT    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_BOLTS    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_BOOTS    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_BULLETS  , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_CHEST    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_CLOAK    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_HEAD    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_LEFTHAND , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_LEFTRING , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_NECK    , obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, obj) == item ||
    GetItemInSlot(INVENTORY_SLOT_RIGHTRING, obj) == item
  );
}

void RemoveXPFromParty(int nXP, object oPC, int bAllParty=TRUE)
{

if (!bAllParty)
  {
  nXP=(GetXP(oPC)-nXP)>=0 ? GetXP(oPC)-nXP : 0;
  SetXP(oPC, nXP);
  }
else
  {
  object oMember=GetFirstFactionMember(oPC, TRUE);

  while (GetIsObjectValid(oMember))
      {
      nXP=(GetXP(oMember)-nXP)>=0 ? GetXP(oMember)-nXP : 0;
      SetXP(oMember, nXP);
      oMember=GetNextFactionMember(oPC, TRUE);
      }
  }
}
void ApplyPenalty(object oDead)
{
    int nXP = GetXP(oDead);
    int nPenalty = 250 * 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);
    int nGoldToTake = FloatToInt(0.20 * GetGold(oDead));
    // * a cap of 10 000gp taken from you
    if (nGoldToTake > 50000)
    {
        nGoldToTake = 50000;
    }
    AssignCommand(oDead, TakeGoldFromCreature(nGoldToTake, oDead, TRUE));
    DelayCommand(4.0, FloatingTextStrRefOnCreature(58299, oDead, FALSE));
    DelayCommand(4.8, FloatingTextStrRefOnCreature(58300, oDead, FALSE));

}
#include "nw_i0_plot"
/*  Script generated by
Lilac Soul's NWN Script Generator, v. 2.0

For download info, please visit:
http://nwvault.ign.com/View.php?view=Other...4683&id=625    */

//Goes OnPlayerRespawn of the module properties
void main()
{

object oPC = GetLastRespawnButtonPresser();
object oDead = oPC;
string sArea = GetTag(GetArea(oPC));
if (!GetIsPC(oPC)) return;

ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectResurrection(),oPC);

ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectHeal(GetMaxHitPoints(oPC)), oPC);

RemoveEffects(oPC);

object oTarget;
oTarget = oPC;

//Visual effects can't be applied to waypoints, so if it is a WP
//apply to the WP's location instead

int nInt;
nInt = GetObjectType(oTarget);

if((sArea == "AREA1") ||
  ( sArea == "AREA2") == FALSE )
{

  //Для Всех
  location lHALFELFTarget;
  oTarget = GetWaypointByTag("TN_SPAWN");
  lHALFELFTarget = GetLocation(oTarget);
  if (nInt != OBJECT_TYPE_WAYPOINT) ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_TIME_STOP), oTarget);
  else ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_TIME_STOP), GetLocation(oTarget));

  if (GetAreaFromLocation(lHALFELFTarget)==OBJECT_INVALID) return;

  AssignCommand(oPC, ClearAllActions());

  AssignCommand(oPC, ActionJumpToLocation(lHALFELFTarget));



ApplyPenalty(oDead);


}

}

if(sArea != "AREA1" || sArea != "AREA2")

if(sArea == "AREA1" || sArea == "AREA2")
{
  return;
}
else
       {
         // ТУТ ТВОЙ СКРИПТ
        }

if(sArea != "AREA1" && sArea != "AREA2")

#include "X0_I0_SPELLS"
#include "x2_inc_spellhook"


void DoArmageddon()
{
vector vSelf = GetPosition(OBJECT_SELF);
vector v1 = Vector(vSelf.x+10.0f, vSelf.y+10.0f, 0.0f);
vector v2 = Vector(vSelf.x-10.0f, vSelf.y+10.0f, 0.0f);
vector v3 = Vector(vSelf.x+10.0f, vSelf.y-10.0f, 0.0f);
vector v4 = Vector(vSelf.x-10.0f, vSelf.y-10.0f, 0.0f);
//вокруг чара 4 точки создаются, куда эффекты налагаются
object oArea = GetArea(OBJECT_SELF);

location Loc1 = Location(oArea, v1, GetFacing(OBJECT_SELF));
location Loc2 = Location(oArea, v2, GetFacing(OBJECT_SELF));
location Loc3 = Location(oArea, v3, GetFacing(OBJECT_SELF));
location Loc4 = Location(oArea, v4, GetFacing(OBJECT_SELF));


ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_METEOR_SWARM), Loc1);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_METEOR_SWARM), Loc2);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_METEOR_SWARM), Loc3);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_METEOR_SWARM), Loc4);

}

void main()
{
int nDam1, nDam2;
effect eDam, eDam2;
DoArmageddon();
object oTarget = GetFirstObjectInShape(SHAPE_SPHERE, 20.0f, GetLocation(OBJECT_SELF), OBJECT_TYPE_CREATURE || OBJECT_TYPE_PLACEABLE);
while (GetIsObjectValid(oTarget))
    {
    if (spellsIsTarget(oTarget, SPELL_TARGET_STANDARDHOSTILE, OBJECT_SELF) && oTarget != OBJECT_SELF)
        {
            nDam1 = d10(20);
            nDam2 = d10(5);
            eDam = EffectDamage(nDam1, DAMAGE_TYPE_FIRE);
            eDam2 = EffectDamage(nDam2, DAMAGE_TYPE_MAGICAL);
                ApplyEffectToObject(DURATION_TYPE_INSTANT, eDam, oTarget);
                ApplyEffectToObject(DURATION_TYPE_INSTANT, eDam2, oTarget);
        }
        oTarget = GetNextObjectInShape(SHAPE_SPHERE, 20.0f, GetLocation(OBJECT_SELF), OBJECT_TYPE_CREATURE || OBJECT_TYPE_PLACEABLE);
    }


}