LevelUpHenchman()

//:://////////////////////
//:: Слот: OnSpawn
//:://////////////////////
#include "X0_INC_HENAI"
void main()
{
    //User ranged weapons by default if true.
    SetAssociateState(NW_ASC_USE_RANGED_WEAPON, FALSE);
    SetAssociateState(NW_ASC_DISTANCE_2_METERS);
    // Труп не исчезает и будет юзабельным
    SetIsDestroyable(FALSE, TRUE, TRUE);
    int nHenchLevel = GetHitDice(OBJECT_SELF);

    if (nHenchLevel == 1)
    {
      if (GetTag(OBJECT_SELF) == "TAG")
        {
            // Класс воин
        LevelUpHenchman(OBJECT_SELF, CLASS_TYPE_FIGHTER);
            // Класс СВЯЩЕННИК
        LevelUpHenchman(OBJECT_SELF, CLASS_TYPE_CLERIC);
        }
    }
}

void main()
{
object oPC = GetPCSpeaker();
object oSP = OBJECT_SELF;

// Снимаем бессмертие
AssignCommand(oSP, SetIsDestroyable(TRUE, TRUE, TRUE));
//Запускаем базовый скрипт замены хенчей
ExecuteScript("nw_ch_action_17", oSP); // * Henchman levels up
}

void main()
  {
    object oPC = GetPCSpeaker();
    object oSP = GetHenchman(oPC);
    int LoPC = GetHitDice(oPC);
    int LoSP = GetHitDice(oSP);

  while (LoPC > LoSP)
  {
  LevelUpHenchman(OBJECT_SELF, CLASS_TYPE_FIGHTER);
  LoSP++;
  }
}
/* Повысить уровень воина до уровня героя */

//:://////////////////////////////
//:: УРОВЕНЬ ТУЗИКА
//:: File name: tuzik_level
//:: Created By: Gennady
//:://////////////////////////////
void main()
{
    object oPC = GetPCSpeaker();
    object oSP = OBJECT_SELF;
    object oItem;
    int i;
    int LoPC = GetHitDice(oPC);
    int LoSP = GetHitDice(oSP);
    string sResRef = "dog_tuzik";
    location Loc = GetLocation(oSP);

  if (LoPC > 2) sResRef = "dog_tuzik_1";
  if (LoPC > 4) sResRef = "dog_tuzik_2";
  if (sResRef == GetResRef(oSP))
  {
  AssignCommand(oSP, SpeakString("Гав... Ррууу..."));
  SendMessageToPC(oPC, "<cюa >Тузик грустно лает… Похоже, что сейчас он не может ничему научиться…</c>");
  return;
  }
  object oTuz = CreateObject(OBJECT_TYPE_CREATURE, sResRef, Loc);
  DelayCommand(1.0, AssignCommand(oTuz, SpeakString("Гав... Ррууу...")));
  DelayCommand(1.0, SendMessageToPC(oPC, "<c у >Тузик утвердительно лает. Он может научиться всему, что вы пожелаете.</c>"));
  DelayCommand(1.5, AssignCommand(oTuz, ClearAllActions()));
  object oInv = GetFirstItemInInventory(oSP);
    while(GetIsObjectValid(oInv))
      {
      CopyItem(oInv, oTuz);
      oInv = GetNextItemInInventory(oSP);
      }
  for (i = 0; i < 14; i++)
  {
  oItem = GetItemInSlot(i, oSP);
  if (GetIsObjectValid(oItem))
    {
    object oItemN = CopyItem(oItem, oTuz);
    DelayCommand(1.51, AssignCommand(oTuz, ActionEquipItem(oItemN, i)));
    }
  }
  effect eOne = EffectVisualEffect(VFX_IMP_UNSUMMON);
  DelayCommand(1.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, eOne, oSP));
  AssignCommand(oSP, SetIsDestroyable(TRUE, TRUE, TRUE));
  DestroyObject(oSP, 2.0);
  AssignCommand(oPC, ClearAllActions());
  DelayCommand(0.2, SetCommandable(FALSE, oPC)); // заблокировать очередь
  AssignCommand(oPC, ActionWait(2.5));
  AssignCommand(oPC, ActionDoCommand(AddHenchman(oPC, oTuz))); // Дать нового спутника
  AssignCommand(oPC, ActionDoCommand(SetCommandable(TRUE, oPC))); // разблокировать очередь
}

int iLev = 1;
  for (iLev = 1; iLev < 14; iLev++)
  {if (LoPC > iLev)  sResRef = "dog_tuzik_"+IntToString(iLev);}

LevelUpXP1Henchman();

DelayCommand(HoursToSeconds(24), <...>);

void TryDialog(object oWith, string sDialog)
{
    if (мы в бою &#092; мертвы, игрок слишком далеко &#092; парализован &#092; окаменел &#092; рестится &#092; ведёт дилог ещё с кем-то и т.д и т.п)
    {
        DelayCommand(15.0, TryDialog(oWith, sDialog)); // попробовать позже
    }
    else // всё ок
    {
        ActionStartConversation(oWith, sDialog); // начать диалог
    }
}

void main()
{
    DelayCommand(HoursToSeconds(24), TryDialog(GetPCSpeaker(), "название следующего диалога"));
}

||

ApplyEffectToObject(DURATION_TYPE_INSTANT, SupernaturalEffect(EffectDeath()), oPC);

//:://////////////////////////////////////////////
//:: OnExit  am_pus_used_door
//:: Copyright © 2005 WRG!
//:://////////////////////////////////////////////
/*
  Скрипт использования PLC_ дверей и люков.
  LocalString "TRANSITION_TARGET" - Таг вейпоинта
  или триггера, куда мы перемещаемся. Если на
  объекте не будет этого стринга, значит он
  просто откроется - закроется при повторном
  использовании.
*/
//:://////////////////////////////////////////////
//:: Created By: Aiwan
//:: Created On: 08.10.2005
//:://///////////////////////////////////////////
#include "am_inc_common"

void main()
{
    object oPC = GetLastUsedBy();
    string sTarget = GetLocalString(OBJECT_SELF, "TRANSITION_TARGET");
    // sTarget - Это ТАГ объекта, куда мы переместимся
    object oTarget = GetObjectByTag(sTarget); // Сам объект

    if (GetLocked(OBJECT_SELF)) // Если закрыт, то ищем ключ и открываем
    {
        string sKey = GetTrapKeyTag(OBJECT_SELF);
        object oKey = GetItemPossessedBy(oPC, sKey);
        if (sKey != "" && GetIsObjectValid(oKey))
        {
            SetLocked(OBJECT_SELF, FALSE);
        }
        else
            {
              DelayCommand(0.1, PlaySound("as_dr_locked2"));
              return;
            }
    }
    if (GetIsOpen(OBJECT_SELF) && sTarget !="") // Если открыт и есть цель
    {
      AssignCommand(oPC, ClearAllActions());
      if(!GetIsObjectValid(oTarget)) // Если ошиблись с тагом цели
      {
        Debug("<cу  >ВНИМАНИЕ! </c>Не могу найти точку перемещения!");
        AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_GET_MID));
        DelayCommand(1.0, ActionPlayAnimation(ANIMATION_PLACEABLE_CLOSE));
        SetLocalInt(OBJECT_SELF, "OPEN", FALSE);
        return;
      }
      DelayCommand(0.7, AssignCommand(oPC, JumpToObject(oTarget)));
      // Следом за игроком отправляем всех помощников
      DelayCommand(1.0, JumpAssociateToObject(oPC, oTarget));
      SetLocalInt(OBJECT_SELF, "OPEN", FALSE);
      DelayCommand(1.5, ActionPlayAnimation(ANIMATION_PLACEABLE_CLOSE));
      return;
    }
    if (!GetIsOpen(OBJECT_SELF))
    {
        AssignCommand(oPC, ActionPlayAnimation(ANIMATION_LOOPING_GET_MID));
        DelayCommand(1.0, ActionPlayAnimation(ANIMATION_PLACEABLE_OPEN));
        SetLocalInt(OBJECT_SELF, "OPEN", TRUE);

    }
    else
        {
            ActionPlayAnimation(ANIMATION_PLACEABLE_CLOSE);
            SetLocalInt(OBJECT_SELF, "OPEN", FALSE);
        }
}

EndGame("");

//:://////////////////////////////////////////////
//:: OnSpawn  am_exe_door_001
//:: Copyright © 2005 WRG!
//:://////////////////////////////////////////////
/*
  Дверь в склеп. Секретная. Присваиваем место
  перемещения при создании двери скриптом.

*/
//:://////////////////////////////////////////////
//:: Created By: Aiwan
//:: Created On: 26.09.2005
//:://////////////////////////////////////////////

void main()
{
  object oSelf = OBJECT_SELF;
  SetLocalString(oSelf, "TRANSITION_TARGET", "AM_EXIT_DOOR_002");
}

if(GetTag(GetItemInSlot(oPC, <...>)) == "<...>")

if
(GetTag(GetItemInSlot(oPC, INVENTORY_SLOT_NECK)) == "Branzuletko")
return TRUE;
return FALSE;

//::///////////////////////////////////////////////
//:: Name: Heartbeat Secret Door Script (Invisible Object)
//:: FileName: il_scdoor_hb
//:: Copyright © 2007 Gem of the North Team
//:://////////////////////////////////////////////
/*
    Creates, if object have found, 2 binded doors
*/
//:://////////////////////////////////////////////
//:: Created By: Ilerien Phoenix
//:: Created On: 20.10.2007
//:://////////////////////////////////////////////


void main()
{
    object oSelf = OBJECT_SELF;
    string sTag = GetTag(oSelf);
    string sLetter = GetStringRight(sTag, 1);
    if(sLetter == "a")
        sLetter = "b";
    else
        sLetter = "a";
    int bShown = GetLocalInt(oSelf, "Shown");
    if(bShown)
        return;
    bShown = GetLocalInt(GetObjectByTag(GetStringLeft(sTag, GetStringLength(sTag) - 1) + sLetter), "Shown");
    if(bShown)
        return;
    //declare major variables
    string sCreatedDoorTag = "";
    float fSearchDist = IntToFloat(GetReflexSavingThrow(oSelf));
    int nDifficulty = GetWillSavingThrow(oSelf);
    int nLockDC = GetFortitudeSavingThrow(oSelf);
    int nSkillSearch = -50;
    int nCounter = 1;
    int nSkill;
    object oNearestCreature = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE);
    int bDoneSearch = 0;
    int bDone = 0;
    int bNeedDetectMode = GetLocalInt(oSelf, "IL_SCDOOR_DETECTION_NEED_ACTION_MODE");
    int bNeedLock = GetLocalInt(oSelf, "IL_SCDOOR_LOCK_DOOR");
    float fDist;
    object oDoor;
    object oSearcher;
    object oComp;
    location lLoc;
    string sFirstTag = "il_scdoor_c";

    while (!bDone && !bDoneSearch && GetIsObjectValid(oNearestCreature))
    {
        if(GetIsObjectValid(GetMaster(oNearestCreature)) || GetIsPC(oNearestCreature) || GetIsDMPossessed(oNearestCreature))
        {
            // what is the distance of the PC to the door location
            fDist = GetDistanceBetween(oSelf, oNearestCreature);

            if (fDist <= fSearchDist)
            {
                if (LineOfSightObject(oSelf, oNearestCreature) && (!bNeedDetectMode || GetActionMode(oNearestCreature, ACTION_MODE_DETECT)) && GetTag(GetItemInSlot(oPC, INVENTORY_SLOT_NECK)) == "Branzuletko")
                {
                    nSkill = GetSkillRank(SKILL_SEARCH, oNearestCreature);
                    if((nSkill + 20 >= nDifficulty) && (nSkill + d20() >= nDifficulty))
                    {
                        bDone = 1;
                        oSearcher = oNearestCreature;
                    }
                }
            }
            else
                // If there is no one in the search radius, don't continue to search
                // for the best skill.
                bDoneSearch = 1;
        }
        nCounter = nCounter + 1;
        oNearestCreature = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, oSelf ,nCounter);
    }//the secret door is founded

    if(bDone)
    {
        sCreatedDoorTag = sFirstTag + GetStringRight(sTag, 4);//tag is, for example, "il_scdoor_c_1_a"
        lLoc = GetLocation(oSelf);
        oDoor = CreateObject(OBJECT_TYPE_PLACEABLE, sFirstTag, lLoc, TRUE, sCreatedDoorTag);
        SetLockUnlockDC(oDoor, nLockDC);
        if(bNeedLock)
            SetLocked(oDoor, TRUE);
        if(GetIsObjectValid(oDoor))
        {
            PlayVoiceChat(VOICE_CHAT_LOOKHERE, oSearcher);
            sLetter = GetStringRight(sTag, 1);
            if(sLetter == "a")
                sLetter = "b";
            else
                sLetter = "a";
            sCreatedDoorTag = GetStringLeft(sFirstTag + GetStringRight(sTag, 4), GetStringLength(sFirstTag) + 3) + sLetter;
            oComp = GetObjectByTag(GetStringLeft(sTag, GetStringLength(sTag) - 1) + sLetter);
            lLoc = GetLocation(oComp);
            nLockDC = GetFortitudeSavingThrow(oComp);
            SetLockUnlockDC(oComp, nLockDC);
            bNeedLock = GetLocalInt(oSelf, "IL_SCDOOR_LOCK_DOOR");
            if(bNeedLock)
                SetLocked(oComp, TRUE);
            oDoor = CreateObject(OBJECT_TYPE_PLACEABLE, sFirstTag, lLoc, TRUE, sCreatedDoorTag);
            SetLocalInt(oSelf, "Shown", 1);
        }
    }
}