// The value returned by this function depends on the object type of the caller:
// 1) If the caller is a door it returns the object that last
//    triggered it.
// 2) If the caller is a trigger, area of effect, module, area or encounter it
//    returns the object that last entered it.
// * Return value on error: OBJECT_INVALID
//  When used for doors, this should only be called from the OnAreaTransitionClick
//  event.  Otherwise, it should only be called in OnEnter scripts.
object GetEnteringObject()

oItem = CopyItemAndModify(oItem, ITEM_APPR_TYPE_ARMOR_MODEL, ITEM_APPR_ARMOR_MODEL_BELT, 1);

object oItem = CopyItemAndModify(oCloak, ITEM_APPR_TYPE_ARMOR_COLOR, ITEM_APPR_ARMOR_COLOR_CLOTH2, 175);

void scaner();
void scaner()
{
    object oNPC    = GetObjectByTag("NPC_MERCHANT_001");
    object oAnimal1 = GetObjectByTag("NPC_ANIMAL_001");
    object oAnimal2 = GetObjectByTag("NPC_ANIMAL_002");
    object oAnimal3 = GetObjectByTag("NPC_ANIMAL_003");

    location lLoc = GetLocation(oNPC);
    if (GetDistanceBetween(oNPC    , oAnimal1) >= 20.0f)
        AssignCommand(oAnimal1, ActionMoveToObject(oNPC));
    if (GetDistanceBetween(oAnimal1, oAnimal2) >= 20.0f)
        AssignCommand(oAnimal2, ActionMoveToObject(oAnimal1));
    if (GetDistanceBetween(oAnimal2, oAnimal3) >= 20.0f)
        AssignCommand(oAnimal3, ActionMoveToObject(oAnimal2));
}

void main()
{
    ...
    scaner();
    ...
}

object oPoint = GetObjectByTag("POINT_A");

object oPoint = GetObjectByTag("POINT_B");

object oPC = GetEnteringObject();
    object oNPC = GetObjectByTag("TAGNPC");

    if (!GetIsPC(oPC)) return;

    SetCutsceneMode(oPC);
    if (GetPlotFlag(oPC)) SetPlotFlag(oPC, FALSE); // на всякий случай, чтобы ПС не становился в режим бога
    AssignCommand(oPC, ActionStartConversation(oNPC, "dialog"));

object oPoint = GetObjectByTag("POINT_A"); // тоже и с поинтом Б
    object oNPC = OBJECT_SELF;
    object oPC  = GetLastSpeaker();

    AssignCommand(oNPC, ActionMoveToObject(oPoint));
    ApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectSlow(), oPC);   // просто, чтобы не бегал
    DelayCommand(2.0f, AssignCommand(oPC , ActionMoveToObject(oPoint)));

SetIsDestroyable(FALSE, TRUE, FALSE);
    effect eDeath = EffectDeath();
    ApplyEffectToObject(DURATION_TYPE_INSTANT, eDeath, OBJECT_SELF);

object oDead = GetObjectByTag("ZOMBI");
    effect eRes  = EffectResurrection();
    effect eHeal = EffectHeal(GetMaxHitPoints(oDead));
    ApplyEffectToObject(DURATION_TYPE_INSTANT, eRes, oDead);
    ApplyEffectToObject(DURATION_TYPE_INSTANT, eHeal, oDead);