#include "nw_i0_generic"

void CheckTag(string sTag)
{
int i = 0;
object oObject = GetObjectByTag(sTag,i);
object oPC = GetFirstPC();
SendMessageToPC(oPC,"CHECK TAG: '"+sTag+"'. List of Objects:");
while (GetIsObjectValid(oObject))
    {
    SendMessageToPC(oPC,GetName(oObject)+" in area "+GetName(GetArea(oObject)));
    i++;
    oObject = GetObjectByTag(sTag,i);
    }
}

void main()
{
CheckTag("1");
CheckTag("2");
CheckTag("3");
}

// Так даем обычному кричу ХР и РС тоже
GiveXPToCreature(GetPCSpeaker(), 150)

// Так дает партии ХР
#include "nw_i0_tool"
void main()
{
    RewardPartyXP(150, GetPCSpeaker());
}

//На ActionTakens в диалоге
void main()
{
object oPC = GetPCSpeaker();
object oNPC = OBJECT_SELF;

  AssignCommand(oPC, ClearAllActions());
  AssignCommand(oNPC, ClearAllActions());

  AssignCommand(oPC, ActionPauseConversation());
  DelayCommand(1.0, AssignCommand(oNPC,    ActionPlayAnimation(ANIMATION_LOOPING_CONJURE2,1.0f, 5.0f)));
  DelayCommand(6.8, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_HEALING_X ),oPC));
  DelayCommand(6.8, ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectACIncrease(5), oPC, 1000.0f));
  DelayCommand(6.9, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectHeal(GetMaxHitPoints(oPC)), oPC));
  DelayCommand(7.1, AssignCommand(oPC, ActionResumeConversation());
}

/*  Script generated by
Lilac Soul's NWN Script Generator, v. 2.2

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

//Put this script OnEnter
void main()
{

object oPC = GetEnteringObject();

if (!GetIsPC(oPC)) return;

object oTarget;
location lTarget;
oTarget = GetWaypointByTag("WP_FromStart");

lTarget = GetLocation(oTarget);

//only do the jump if the location is valid.
//though not flawless, we just check if it is in a valid area.
//the script will stop if the location isn't valid - meaning that
//nothing put after the teleport will fire either.
//the current location won't be stored, either

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

SetLocalLocation(oPC, "ls_stored_loc", GetLocation(oPC));

AssignCommand(oPC, ClearAllActions());

AssignCommand(oPC, ActionJumpToLocation(lTarget));

FloatingTextStringOnCreature("Ловушка!Начни сначала.", oPC);

}

//onEnter, триггера.
void main
{
object oPC = GetEnteringObject();
string sTag = GetLockKeyTag(OBJECT_SELF);

if (GetIsPC(oPC))
  {
    AssignCommand(oPC, ClearAllActions());
    DelayCommand(0.2, AssignCommand(oPC,                                        ActionJumpToLocation(GetLocation(GetObjectByTag(sTag)))));
    DestroyObject(OBJECT_SELF, 0.6);
// Скрипт сработает всего 1 раз, т.к триггер мы удалим. Если это не нужно, строчку можно потереть.
  }
}

//Ночью у NPC будут регенерировать хит-поинты, а днем все характеристики уменьшаются на -3
void main()
{
    object oNPC = OBJECT_SELF;
    effect eRegener = EffectRegenerate(1,1.0f);
    effect eCurse = EffectCurse(3,3,3,3,3);
    int nUser = GetUserDefinedEventNumber();

    if(nUser == EVENT_HEARTBEAT)
    {
      if (GetIsDay())
        {
        if (GetLocalInt(oNPC,"Day") == 0)
          {
            SetLocalInt(oNPC,"Day",1);
            RemoveEffect(oNPC, eRegener);
            ApplyEffectToObject(DURATION_TYPE_PERMANENT,
              eCurse,oNPC);
          }
        }
      if (GetIsNight())
        {
        if (GetLocalInt(oNPC,"Day") == 1)
          {
            SetLocalInt(oNPC,"Day",0);
            RemoveEffect(oNPC, eCurse);
            ApplyEffectToObject(DURATION_TYPE_PERMANENT,
              eRegener,oNPC);
          }
        }

    }
}

//------------------
#include "nw_i0_tool"
int StartingConditional()
{
    object oPC = GetPCSpeaker();
    if(!HasItem(oPC, "ТАГ_ПРЕДМЕТА"))
        return FALSE;
    return TRUE;
}

void main()
{
   // На ActionTakens в диалоге;
     CreateObject(OBJECT_TYPE_CREATURE,"ResRef_создаваемого_NPC",GetLocation(OBJECT_SELF));
     DelayCommand(0.7, ApplyEffectToObject(DURATION_TYPE_INSTANT,
      EffectVisualEffect(VFX_FNF_SUMMON_MONSTER_1), GetNearestObjectByTag("Tag_создаваемого_NPC")));
}

void main()
{
  object oPC=GetFirstPC();
  object oTrg=OBJECT_SELF;
  object oNPC=GetNearestObjectByTag("НЕПИСЬ"):

if (!GetIsPC(oPC) || GetLocalInt(OBJECT_SELF, "CutScene1_1") == 1)
  return;
  {
    SetLocalInt(OBJECT_SELF, "CutScene1_1", 1);
    SetCutsceneMode(oPC);
    AssignCommand(oNPC, ClearAllActions());
    AssignCommand(oPC, ClearAllActions());
  }
  ActionDoCommand(AssignCommand(oNPC, ActionStartConversation(oPC)));
}

void main()
{
  object oPC=GetFirstPC(); // GetEnteringObject(); надо IMHO
  object oTrg=OBJECT_SELF;
  object oNPC=GetNearestObjectByTag("НЕПИСЬ"):

if (!GetIsPC(oPC) || GetLocalInt(OBJECT_SELF, "CutScene1_1") == 1)
  return;
  { // что за скобки?!
    SetLocalInt(OBJECT_SELF, "CutScene1_1", 1);
    SetCutsceneMode(oPC);
    AssignCommand(oNPC, ClearAllActions());
    AssignCommand(oPC, ClearAllActions());
  } // что за скобки?!
  ActionDoCommand(AssignCommand(oNPC, ActionStartConversation(oPC))); // конверсэйшн в свойствах нпц прописан?

}

void main()
{
  object oPC=GetFirstPC();
  object oTrg=OBJECT_SELF;
  object oNPC=GetNearestObjectByTag("НЕПИСЬ"): //вот это!!!!

void ActionTemp()
{
  if(
// Нужная проверка и т.д...
   {
//    <...>
   }
}

void main()
{
//    <...>
      ActionDoCommand(ActionTemp());
//    <...>
}