// Apply eEffect to oTarget.
void ApplyEffectToObject(int nDurationType, effect eEffect, object oTarget, float fDuration=0.0f)

// Create an Ability Increase effect
// - bAbilityToIncrease: ABILITY_*
effect EffectAbilityIncrease(int nAbilityToIncrease, int nModifyBy)

// Set the subtype of eEffect to Supernatural and return eEffect.
// (Effects default to magical if the subtype is not set)
// Permanent supernatural effects are not removed by resting
effect SupernaturalEffect(effect eEffect)

// Play the battle music for oArea.
void MusicBattlePlay(object oArea)

// Change the background day track for oArea to nTrack.
// - oArea
// - nTrack
void MusicBackgroundChangeDay(object oArea, int nTrack)

// Change the background night track for oArea to nTrack.
// - oArea
// - nTrack
void MusicBackgroundChangeNight(object oArea, int nTrack)

// Change the battle track for oArea.
// - oArea
// - nTrack
void MusicBattleChange(object oArea, int nTrack)

// Unequip oItem from whatever slot it is currently in.
void ActionUnequipItem(object oItem)

object oArea = GetArea(OBJECT_SELF);// Т.е oArea - сама лока

object oArea = GetArea(GetObjectBtTag(""));

void main()
{
  object oPC = GetItemActivator(); // Игрок;
  object oNPC = GetObjectByTag(""); // Таг вызываемого NPC;
  object oWP = GetObjectByTag(""); // Таг "домашнего" вейпа;
  object oItem = GetItemActivated(); // Активируемый предмет;

     if (GetTag(oItem) == "") // Здесь укажи таг oItem ;
      {
        if (GetLocalInt(oPC, "Local") == FALSE)
         {
            SetLocalInt(oPC,"Local", 1);
            DelayCommand(1200.0, SetLocalInt(oPC,"Local",0));
            effect eVisual = EffectVisualEffect(VFX_IMP_DIVINE_STRIKE_FIRE);
            DelayCommand(0.5, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVisual, oPC));

            DelayCommand(0.7, AssignCommand(oNPC, ClearAllActions(TRUE)));
            DelayCommand(1.0, AssignCommand(oNPC, ActionJumpToObject(oPC)));

            DelayCommand(599.7, AssignCommand(oNPC, ClearAllActions(TRUE)));
            DelayCommand(600.0, AssignCommand(oNPC, ActionJumpToObject(oWP)));

           
         }

        if (GetLocalInt(oPC, "Local") == TRUE)
         FloatingTextStringOnCreature("Нужное время еще не пришло.", oPC);
      }
}

void ActionMoveToObject(
    object oTarget,
    int bRun = FALSE,
    float fRange = 1.0f
);

void main()
{
  // OnOpen сундука
    object oPC = GetLastOpenedBy();

    if (GetLocalInt(OBJECT_SELF,"Open") == 0)
     {
      SetLocalInt(OBJECT_SELF,"Open",TRUE);

      if (GetHitDice(oPC) == 1)
         CreateItemOnObject("ResRef_itema", OBJECT_SELF);        

      if (GetHitDice(oPC) == 2)
         CreateItemOnObject("ResRef_itema", OBJECT_SELF);

      if (GetHitDice(oPC) == 2)
         CreateItemOnObject("ResRef_itema", OBJECT_SELF);
    // 3, 4, 5 левелы и т.д...
         }
}

void main()
{
object oPC = GetFirstPC();
AssignCommand(oPC, SetEncounterActive(FALSE, GetObjectByTag("VOLKI")));
}
// Удалить встречу с монстрами

//:://////////////////////////////////////////////
//:: OnEnter  am_een_local_on
//:: Copyright © 2006 WRG!
//:://////////////////////////////////////////////
/*
  Включает енкаучер, если на РС нет ни одной
  локальной переменной равной стрингу LOCAL_PC_0X
  float "TIME" - время срабатывания енкаучера
  Локалка "NUMBER" - означает сколько раз сработает.
  Если ее нет, сразу уничтожится.
*/
//:://////////////////////////////////////////////
//:: Created By: Aiwan
//:: Created On: 04.05.2006
//:://////////////////////////////////////////////
#include "am_inc_debug"

void main()
{
  object oPC = GetEnteringObject();
  object oEnc = OBJECT_SELF;
  object oArea = GetArea(OBJECT_SELF);
  float f = GetLocalFloat(oEnc, "TIME");
  int i = GetLocalInt(oEnc, "NUMBER");
  string sLl = GetLocalString(oEnc, "LOCAL_PC_01"); // Локальные переменные
  string sL2 = GetLocalString(oEnc, "LOCAL_PC_02"); // при каторых енкаучер
  string sL3 = GetLocalString(oEnc, "LOCAL_PC_03"); // не сработает.
  string sL4 = GetLocalString(oEnc, "LOCAL_PC_04");
  string sL5 = GetLocalString(oEnc, "LOCAL_PC_05");
  int iFalse;

  if(!GetIsPC(oPC)) return;
  if(GetLocalInt(oEnc, "FIGHT!")) return; // Енкаучер сработал
  if(sLl=="" && sL2 =="" && sL3=="" && sL4=="" && sL5=="") return;

  if(GetLocalInt(oPC, sLl) || GetLocalInt(oPC, sL2) || GetLocalInt(oPC, sL3)
  || GetLocalInt(oPC, sL4) || GetLocalInt(oPC, sL5))
  {
    Debug("Енкаучер '"+GetName(oEnc)+"' не сработает, т.к. переменные триггера и РС совпали.");
    return;
  }
  if(i == 0) // Если 0, то отключаем
  {
      Debug("Отключаем енкаучер. Манчи плачут на взрыд...");
      // Манчи плачут на взрыд...
      return;
    }
    else if(GetEncounterActive(oEnc) == FALSE)
      {
        if (f == 0.0) f = 600.0; // 10 минут, стандартный респавн
        SetEncounterActive(TRUE);
        DelayCommand(1.0, SetEncounterActive(FALSE, oEnc));
        SetLocalInt(oEnc, "FIGHT!", TRUE);
        // Тут самое интересное. Неактивный енкаучер DelayCommand не исполняет
        // поэтому я попросил это сделать локацию, в котором он стоит. Она вроде
        // как не против...
          SetLocalInt(oEnc, "NUMBER", i-1);
          Debug("Енкаучер сработает еще ["+IntToString(GetLocalInt(oEnc, "NUMBER"))+"] раз. ");
          AssignCommand(oArea, DelayCommand(f, SetLocalInt(oEnc, "FIGHT!", FALSE)));

      }
      else return;
}

//:://////////////////////////////////////////////
//:: Created By: Gennady
//:: Created On:27.04.2006
//:://////////////////////////////////////////////
void main()
{
object oPC = GetEnteringObject();
object oSelf = OBJECT_SELF;
object oPlc = GetNearestObjectByTag("LOC_"+GetTag(oSelf));
location lLoc = GetLocation(oPlc);
string sResRef = GetName(oSelf); // Объект создаваемый
string sNewTag = GetTag(oSelf);  // Тег созданиЯ
int iN = StringToInt(GetLockKeyTag(oSelf)); // Количество созданий
int iNN = StringToInt(sNewTag); // Количество встреч
int iNM = 0;
effect eEffect1 = EffectVisualEffect(VFX_IMP_LIGHTNING_M);
effect eEffect2 = EffectVisualEffect(VFX_IMP_DISPEL);

if(!GetIsPC(oPC)||GetLocalInt(oSelf, "DEACTIVATED")) return;
{
  while (iN != iNM)
  {
   if (GetIsObjectValid(oPlc))
   CreateObject(OBJECT_TYPE_CREATURE, sResRef, lLoc,TRUE,sNewTag);
   else
   CreateObject(OBJECT_TYPE_CREATURE, sResRef, GetLocation(oSelf),TRUE,sNewTag);
   iNM++;
  }
if (GetIsObjectValid(oPlc))
{
  ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eEffect1, GetLocation(oPlc));
  DelayCommand(1.5, ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eEffect2, GetLocation(oPlc)));
}
else
{
  ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eEffect1, GetLocation(oSelf));
  DelayCommand(1.5, ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eEffect2, GetLocation(oSelf)));
}
   if (sNewTag == "1")
  {
    DelayCommand(0.2, SetLocalInt(oSelf, "DEACTIVATED", TRUE));
   DestroyObject(oSelf, 2.0);
  }
   else
   {
    DelayCommand(0.2, SetLocalInt(oSelf, "DEACTIVATED", TRUE));
    DelayCommand(1000.0, SetLocalInt(oSelf, "DEACTIVATED", FALSE));
    if (iNN < 1) return;
    SetLocalInt(oSelf, "NUM", GetLocalInt(oSelf, "NUM") + 1);
    if (GetLocalInt(oSelf, "NUM") >= iNN)
    DestroyObject(oSelf, 2.0);
   }
}
}
/*            Встреча
  Триггер содержит в названии ResRef объкта, который появится.
  Точка, где появится объект LOC_+Тег триггера, если точки нет - то к триггеру.
  Поле триггера KeyTag - Количество созданий
  Если тег триггера 1, то встреча только один раз, если другой,
  то повтор через 1000 секунд, если цифра, то это количество встреч.
*/

оbject oPC = GetFirstPC();

SetCutsceneMode(oPC, TRUE);

ActionStartConversation(oPC, "", FALSE, TRUE);

void main()
{

object oPC = GetPCSpeaker();
object oTarget;

SetCutsceneMode(oPC, FALSE);


oTarget = GetObjectByTag("1");

DelayCommand(0.2, SetIsTemporaryEnemy(oPC, oTarget));

DelayCommand(0.2, ActionAttack(oPC));

oTarget = GetObjectByTag("2");

DelayCommand(0.2, SetIsTemporaryEnemy(oPC, oTarget));

DelayCommand(0.2, AssignCommand(oTarget, ActionAttack(oPC)));

oTarget = GetObjectByTag("3");

DelayCommand(0.2, SetIsTemporaryEnemy(oPC, oTarget));

DelayCommand(0.2, AssignCommand(oTarget, ActionAttack(oPC)));

}

void main()
{

object oPC = GetPCSpeaker();

AssignCommand(GetObjectByTag("1"), SetFacingPoint(GetPosition(oPC)));

DelayCommand(0.5, AssignCommand(GetObjectByTag("2"), SetFacingPoint(GetPosition(oPC))));
DelayCommand(0.5, AssignCommand(GetObjectByTag("2"), ActionPlayAnimation(ANIMATION_FIREFORGET_SPASM)));

DelayCommand(1.2, AssignCommand(GetObjectByTag("3"), SetFacingPoint(GetPosition(oPC))));
DelayCommand(1.6, AssignCommand(GetObjectByTag("3"), ActionPlayAnimation(ANIMATION_FIREFORGET_PAUSE_SCRATCH_HEAD)));

}