// ga_influence( int nCompanion, int nChange )
/* This adjusts the influence rating of the companion to the PC ( the players as a whole technically ).
  The influence rating is based on a scale between -100( worst ) and 100( best ). ( 0 being neutral )

  Parameters:
    int nCompanion  = This is the integer value of the companion to adjust. ( See ginc_companions )
    int nChange    = This is the amount to adjust influence by.

    1    Khelgar
    2    Neeshka
    3    Elanee
    4    Qara
    5    Sand
    6    Grobnar
    7    Casavir
    8    Bishop
    9    ShandraJerro
    10    Construct
    11    Zhjaeve
    12    AmmonJerro
    13  Bevil
*/
// FAB 10/4
// ChazM 5/4/05
// BMA 5/5/05 ginc_companions id look up
// BMA-OEI 8/22/05 added companion id table
// ChazM 12/16/05 added bevil
// ChazM 4/18/06 prepped for adding influence indicator
// ChazM 4/25/06 added string ref constants
// ChazM 5/1/06 fixed "temp text" bug.
// EPF 7/10/06 - added debug strings for balance testing
// BMA-OEI 7/10/06 -- Updated to use GetInfluenceByNumber( )
       
#include "kinc_companion"

const int    STRING_REF_LOST_INFLUENCE     = 178842;
const int    STRING_REF_GAINED_INFLUENCE = 178841;

int GetCompanionNameStringRef( int nCompanion )
{
    // companions str refs are 178843 - 178855
    return ( 178842 + nCompanion );
}

void main( int nCompanion, int nChange )
{
    if ( nChange == 0 )
    {
        PrettyError( "ga_influence: companion " + IntToString( nCompanion ) + " no influence change" );
        return;
    }
   
    int nOldInfluence = GetInfluenceByNumber( nCompanion );
    IncInfluenceByNumber( nCompanion, nChange );
    int nNewInfluence = GetInfluenceByNumber( nCompanion );
   
    string sOut;
    int nDelta = nNewInfluence - nOldInfluence; //nChange; // Actual nDelta may not == nChange
    if ( nDelta > 0 )
        sOut = GetStringByStrRef( STRING_REF_GAINED_INFLUENCE );
    else
        sOut = GetStringByStrRef( STRING_REF_LOST_INFLUENCE );

    sOut += " " + GetStringByStrRef( GetCompanionNameStringRef( nCompanion )) + ": " + IntToString( nDelta );
   
    object oPC = ( GetPCSpeaker( )==OBJECT_INVALID?OBJECT_SELF:GetPCSpeaker( ) );
    SendMessageToPC( oPC, sOut );
    PrettyDebug( sOut );
    PrettyDebug( "Total influence with " + GetStringByStrRef( GetCompanionNameStringRef( nCompanion )) + " = " + IntToString( nNewInfluence ));
}

SetLocalInt( OBJECT_SELF, "deathWolf", 2 );

SetLocalInt( GetObjectByTag( "Тэг НПС, который выдает квест" ), "deathWolf", 2 );

object oPC = GetItemActivator();
  object oItem = GetItemActivated();
  object oTarget = GetItemActivatedTarget();
  location lTargetLocation = GetItemActivatedTargetLocation();
  string sPCName = GetName(oPC);
  string sTargetName = GetName(oTarget);
 
  void ItemActivatedPaleStaff();
    string PALE_STAFF_TAG = "EK_STAFF_001";
    int PALE_STAFF_HIT_VS_REFLEX = d20() + 2 * GetAbilityModifier(ABILITY_DEXTERITY, oPC);
    int PALE_STAFF_HIT_VS_FORTITUDE = d20() + 2 * GetAbilityModifier(ABILITY_INTELLIGENCE, oPC);
    int PALE_STAFF_HIT_VS_WILL = d20() + 2 * GetAbilityModifier(ABILITY_WISDOM, oPC);
    float PALE_STAFF_CAST_TIME = 60.0;
    effect PALE_STAFF_POLYMORPH_VISUAL = EffectVisualEffect(VFX_IMP_POLYMORPH);
    effect PALE_STAFF_POLYMORPH_TYPE_1 = EffectPolymorph(POLYMORPH_TYPE_ZOMBIE, TRUE);
 
void main()
{
  if (oItem == GetObjectByTag(PALE_STAFF_TAG))
  {
    ItemActivatedPaleStaff();
  }
}

void ItemActivatedPaleStaff()
{
  if (GetIsObjectValid(oTarget) == FALSE)
  {
    SendMessageToPC(oPC, "<color=red>Некорректная цель для обращения в нежить!</color>");
    return;
  }
  if (GetLocalInt(oTarget, "Undeadable") < 1 || GetPolymorphLocked(oTarget) == TRUE)
  {
    SendMessageToPC(oPC, "<color=red>Выбранная цель не может быть обращена в нежить!</color>");
    return;
  }
  if (GetIsDead(oTarget) == TRUE)
  {
    SendMessageToPC(oPC, "<color=red>Цель мертва, прежде чем обратить в нежить, ее нужно оживить!</color>");
    return;
  }
 

  if (GetReflexSavingThrow(oTarget) > PALE_STAFF_HIT_VS_REFLEX)
  {
    SendMessageToPC(oPC, "<color=blue>"+sPCName+" бросок "+IntToString(PALE_STAFF_HIT_VS_REFLEX)+" против класса сложности "+IntToString(GetReflexSavingThrow(oTarget))+" "+IntToString(GetReflexSavingThrow(oTarget))+" > "+IntToString(PALE_STAFF_HIT_VS_REFLEX)+" *провал*</color>");
    ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectBeam(VFX_BEAM_BLACK, oPC, BODY_NODE_CHEST, TRUE), oTarget);
    return;
  }
  SendMessageToPC(oPC, "<color=blue>"+sPCName+" бросок "+IntToString(PALE_STAFF_HIT_VS_REFLEX)+" против класса сложности "+IntToString(GetReflexSavingThrow(oTarget))+" "+IntToString(GetReflexSavingThrow(oTarget))+" <= "+IntToString(PALE_STAFF_HIT_VS_REFLEX)+" *успех*</color>");
  ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectBeam(VFX_BEAM_BLACK, oPC, BODY_NODE_CHEST), oTarget, PALE_STAFF_CAST_TIME);
  ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectCutsceneParalyze(), oPC, PALE_STAFF_CAST_TIME);
  ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectCutsceneParalyze(), oTarget, PALE_STAFF_CAST_TIME);
  ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectSpellImmunity(), oTarget, PALE_STAFF_CAST_TIME);
  ApplyEffectToObject(DURATION_TYPE_TEMPORARY, EffectDamageImmunityIncrease(DAMAGE_TYPE_ALL, 100), oTarget, PALE_STAFF_CAST_TIME);
 
  DelayCommand(PALE_STAFF_CAST_TIME/3, ActionWait(0.0));
 
  if (GetFortitudeSavingThrow(oTarget) > PALE_STAFF_HIT_VS_FORTITUDE)
  {
    SendMessageToPC(oPC, "<color=blue>"+sPCName+" бросок "+IntToString(PALE_STAFF_HIT_VS_FORTITUDE)+" против класса сложности "+IntToString(GetFortitudeSavingThrow(oTarget))+" "+IntToString(GetFortitudeSavingThrow(oTarget))+" > "+IntToString(PALE_STAFF_HIT_VS_FORTITUDE)+" *провал*</color>");
    ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_DUR_CONE_EVIL), oTarget);
    RemoveEffect(oTarget, EffectBeam(VFX_BEAM_BLACK, oPC, BODY_NODE_CHEST));
    RemoveEffect(oPC, EffectCutsceneParalyze());
    RemoveEffect(oTarget, EffectCutsceneParalyze());
    RemoveEffect(oTarget, EffectSpellImmunity());
    RemoveEffect(oTarget,EffectDamageImmunityIncrease(
DAMAGE_TYPE_ALL, 100));
    return;
  }
  SendMessageToPC(oPC, "<color=blue>"+sPCName+" бросок "+IntToString(PALE_STAFF_HIT_VS_FORTITUDE)+" против класса сложности "+IntToString(GetFortitudeSavingThrow(oTarget))+" "+IntToString(GetFortitudeSavingThrow(oTarget))+" <= "+IntToString(PALE_STAFF_HIT_VS_FORTITUDE)+" *успех*</color>");
  if (GetLocalInt(oTarget, "Undeadable") == 1)
  {
    ApplyEffectToObject(DURATION_TYPE_INSTANT, PALE_STAFF_POLYMORPH_VISUAL, oTarget);
    ApplyEffectToObject(DURATION_TYPE_PERMANENT, PALE_STAFF_POLYMORPH_TYPE_1, oTarget);
  }
 
  DelayCommand(PALE_STAFF_CAST_TIME/3, ActionWait(0.0));
 
  if (GetWillSavingThrow(oTarget) > PALE_STAFF_HIT_VS_WILL)
  {
    SendMessageToPC(oPC, "<color=blue>"+sPCName+" бросок "+IntToString(PALE_STAFF_HIT_VS_WILL)+" против класса сложности "+IntToString(GetWillSavingThrow(oTarget))+" "+IntToString(GetWillSavingThrow(oTarget))+" > "+IntToString(PALE_STAFF_HIT_VS_WILL)+" *провал*</color>");
    ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_DUR_CONE_EVIL), oTarget);
    RemoveEffect(oTarget, EffectBeam(VFX_BEAM_BLACK, oPC, BODY_NODE_CHEST));
    RemoveEffect(oPC, EffectCutsceneParalyze());
    RemoveEffect(oTarget, EffectCutsceneParalyze());
    RemoveEffect(oTarget, EffectSpellImmunity());
    RemoveEffect(oTarget,EffectDamageImmunityIncrease(
DAMAGE_TYPE_ALL, 100));
    return;
  }
  SendMessageToPC(oPC, "<color=blue>"+sPCName+" бросок "+IntToString(PALE_STAFF_HIT_VS_WILL)+" против класса сложности "+IntToString(GetWillSavingThrow(oTarget))+" "+IntToString(GetWillSavingThrow(oTarget))+" <= "+IntToString(PALE_STAFF_HIT_VS_WILL)+" *успех*</color>");
  ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_BEAM_MIND), oTarget);
  ApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectCutsceneDominated(), oTarget);
}