// The PC who entered the trigger is set to dislike all the PC's in the module
void main()
{
    // Get entering PC
    object oEnterer = GetEnteringObject();

    // make sure they are not a DM
    if(GetIsPC(oEnterer) && !GetIsDM(oEnterer))
    {
        // Loop all PC's in the module and set this PC to dislike them - uh oh
        object oPC = GetFirstPC();
        while(GetIsObjectValid(oPC))
        {
            // Set to dislike
            SetPCDislike(oEnterer, oPC);

            // Get next PC
            oPC = GetNextPC();
        }
    }
}

void main()
{
    object oPlayer = GetEnteringObject();
    string VarName = "имя переменной на игроке"; //Переменную под этим именем надо проставить на каждого игрока в зависимости от выбранной фракции

    if (GetIsPC(oPlayer) && !GetIsDM(oPlayer))
    {
        object oPC = GetFirstPC();
        int nFaction = GetLocalInt(oPlayer, VarName);

        while (GetIsObjectValid(oPC))
        {
            int nSame = GetLocalInt(oPC, VarName) == nFaction;
            int nDone = 0;

            if (nSame)
            {
                if (!(nDone || oPC == oPlayer))
                {
                    RemoveFromParty(oPlayer);
                    AddToParty(oPlayer, oPC);
                    nDone++;
                }
            }
                else SetPCDislike(oPlayer, oPC);
        }
    }
}

void main()
{
object oPC = GetPCSpeaker();
object oKiller = GetObjectByTag("assassin");
object oValsh = GetObjectByTag("valsh");
object oKaj = GetObjectByTag("Kaj");
object oMarsia = GetObjectByTag("MarsiaLab");
location lKillEx = GetLocation(GetObjectByTag("AssassinEnter"));
effect E1 = EffectVisualEffect(VFX_IMP_DEATH_L);
effect E2 = EffectDeath();
effect E3 = EffectVisualEffect(VFX_IMP_UNSUMMON);
   SetCutsceneMode(oPC);
   AssignCommand(oKiller, ClearAllActions());
   AssignCommand(oPC, ClearAllActions());
   AssignCommand(oMarsia, ClearAllActions());
   AssignCommand(oValsh, ClearAllActions());
   DelayCommand(0.1, AssignCommand(oPC,SetCameraFacing(120.0,12.0,49.0,CAMERA_TRANSITION_TYPE_FAST)));
   DelayCommand(0.2, AssignCommand(oKiller, SetFacingPoint(GetPosition(oValsh))));
   DelayCommand(0.9, AssignCommand(oKiller, ActionCastFakeSpellAtObject(SPELL_FINGER_OF_DEATH,
oValsh)));
   DelayCommand(3.5, ApplyEffectToObject(DURATION_TYPE_INSTANT, E1, oValsh));
   DelayCommand(3.5, ApplyEffectToObject(DURATION_TYPE_PERMANENT, E2, oValsh));
   DelayCommand(3.8, AssignCommand(oKiller,DestroyObject(oKiller)));
   DelayCommand(3.8, ApplyEffectAtLocation(DURATION_TYPE_INSTANT, E3, lKillEx));
   DelayCommand(4.0,AssignCommand(oMarsia,ActionStartConversation(oPC
)));
   DelayCommand(4.1,SetCutsceneMode(oPC, FALSE));
}

CreateObject(OBJECT_TYPE_WAYPOINT, "<ресреф вейпа>", GetLocation(OBJECT_SELF));

int StartingConditional()
{
    string sGrave = GetLocalString(OBJECT_SELF,"GRAVE");
    if(sGrave == "NEFZEN")
    {
        return TRUE;
        break;
    }
    if(sGrave == "VESSEL")
    {
        return TRUE;
        break;
    }
    return FALSE;
}

int StartingConditional()
{
    string sGrave = GetLocalString(OBJECT_SELF,"GRAVE");
    int IsFirst = GetLocalInt(OBJECT_SELF, "GRAVE");

    if (sGrave == "NEFZEN" && IsFirst) return TRUE;
    if (sGrave == "VESSEL" && !IsFirst) return TRUE;

    return FALSE;
}

void main()
{
     string sGrave = GetLocalString(OBJECT_SELF,"GRAVE");
     if(sGrave == "NEFZEN")
     {
            ActionSpeakString("Натали Нефзен, 1351 - 1390, покойся с миром.");
     }
     if(sGrave == "VESSEL")
     {
            ActionSpeakString("Курт Вессел, 1351 - 1390, покойся с миром.");
     }
}

int StartingConditional()
{
     string sName = GetLocalString(OBJECT_SELF, "GRAVE");
     int nCheck = GetLocalInt(OBJECT_SELF, "GRAVE");

     if (!nCheck) if (sName == "NEFZEN") return TRUE;

     SetLocalInt(OBJECT_SELF, "GRAVE", !nCheck);

     return nCheck;
}

const int nCountMax = 99;
const string sVariableName = "<Variable_Name>";

int StartingConditional()
{
    string sName = GetLocalString(OBJECT_SELF, sVariableName);
    int nPosition = GetLocalInt(OBJECT_SELF, sVariableName);
    int bTRUE = FALSE;

    switch (nPosition)
    {
        case 0: if (sName == "<Name_00>") bTRUE = TRUE; break;
        case 1: if (sName == "<Name_01>") bTRUE = TRUE; break;
        case 2: if (sName == "<Name_02>") bTRUE = TRUE; break;
        //...
        case nCountMax: if (sName == "<Name_nCountMax>") bTRUE = TRUE; break;
    }

    if (bTRUE || nPosition == nCountMax) nPosition = 0;
        else nPosition++;
    SetLocalInt(OBJECT_SELF, sVariableName, nPosition);

    return bTRUE;
}

void main()
{
object oMaster = GetPCSpeaker()
object oItem = GetFirstItemInInventory(oMaster)
object oNewMaster=GetNearestObjectByTag("HEN_GRORK",oMaster)

CopyItem(oItem,oNewMaster,FALSE)
{
      while(GetIsObjectValid(oItem))
      {
        if(GetBaseItemType(oItem) == BASE_ITEM_LARGEBOX)
        {
          CreateItemOnObject(GetResRef(oItem), oNewMaster, 1);
          if(iDel==TRUE) DestroyObject(oItem, 0.5);
        }
        else
            {
              CopyItem(oItem, oNewMaster, TRUE);
              if(iDel==TRUE) DestroyObject(oItem);
            }
          oItem = GetNextItemInInventory(oMaster);
      }
}
}

void main()
{
object oMaster = GetPCSpeaker()
object oItem = GetFirstItemInInventory(oMaster)
object oNewMaster=GetNearestObjectByTag("HEN_GRORK",oMaster)

CopyItem(oItem,oNewMaster,FALSE)
{
      while(GetIsObjectValid(oItem))
      {
        if(GetBaseItemType(oItem) == BASE_ITEM_LARGEBOX)
        {
          CreateItemOnObject(GetResRef(oItem), oNewMaster, 1);
          if(iDel==TRUE) DestroyObject(oItem, 0.5);
        }
        else
            {
              CopyItem(oItem, oNewMaster, TRUE);
              if(iDel==TRUE) DestroyObject(oItem);
            }
          oItem = GetNextItemInInventory(oMaster);
      }
}
}

float fDelay = GetDistanceToObject(GetNearestObjectByTag("npc_tag"))/15; //точно не помню эту формулу
AssignCommand(OBJECT_SELF, ActionForceMoveToObject(GetObjectByTag("npc_tag"), TRUE));
DelayCommand(fDelay, ExecuteScript("detonate", OBJECT_SELF));
SetLocalInt(OBJECT_SELF,"ACTIVATED_OBJECT",TRUE);

if(GetDamageDealtByType(DAMAGE_TYPE_FIRE) > 0 && GetCurrentHitPoints() < 0)
        ExecuteScript("detonate",OBJECT_SELF);

void main()
{
    object oTarget = GetFirstObjectInShape(SHAPE_SPHERE, 10.0, GetLocation(OBJECT_SELF), FALSE, OBJECT_TYPE_DOOR | OBJECT_TYPE_CREATURE | OBJECT_TYPE_PLACEABLE);
    while(GetIsObjectValid(oTarget))
        {
            int nDamage = 450+d100();
            nDamage = GetReflexAdjustedDamage(nDamage, oTarget, 45, SAVING_THROW_TYPE_FIRE);
            effect eDam = EffectDamage(nDamage, DAMAGE_TYPE_FIRE);
            ApplyEffectToObject(DURATION_TYPE_INSTANT, eDam, oTarget);
            ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_FIREBALL), oTarget);
            ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_FLAME_M), oTarget);
            DestroyObject(OBJECT_SELF);

            oTarget = GetNextObjectInShape(SHAPE_SPHERE, 10.0, GetLocation(OBJECT_SELF), FALSE, OBJECT_TYPE_DOOR | OBJECT_TYPE_CREATURE | OBJECT_TYPE_PLACEABLE);
        }
int nCount=0;

while(nCount<4)
{
float fRandom = GetRandomDelay(0.3,1.0);
DelayCommand(fRandom, ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectVi
sualEffect(VFX_COM_BLOOD_LRG_RED),oPC));
DelayCommand(fRandom, ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectVi
sualEffect(VFX_COM_BLOOD_REG_RED),oPC));
DelayCommand(fRandom, ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectVi
sualEffect(VFX_COM_CHUNK_RED_LARGE),oPC));
nCount++;
}
   
}