string sSayThis;
int iTalkVolume = TALKVOLUME_TALK;
int iTalkFlag = 0;
#include "NW_I0_Plot"
void main()
{
    string oItemTag = GetTag(GetItemActivated());
    if (oItemTag == "NW_IT_RECALL")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_1")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_2")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_3")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_4")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_5")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_6")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_7")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_8")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_RECALL_9")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_HOB_HRS")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_CRYSBALL")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_1")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_2")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_3")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_4")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_5")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}


    else if (oItemTag == "RHUN_OBPC_6")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_7")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_OBPC_8")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_PARTREC")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}

    else if (oItemTag == "RHUN_CURALL")
    {
            object oUser;
            effect eHeal;
            effect eHealVis = EffectVisualEffect(VFX_IMP_HEALING_S);
            int nCurrentHitPoints, nMaxHitPoints, nVisualEffectId;
            oUser = GetItemActivator();
            nMaxHitPoints = GetMaxHitPoints(oUser);
            nCurrentHitPoints = GetCurrentHitPoints(oUser);
            if ( nCurrentHitPoints < nMaxHitPoints )
            {
            eHeal = EffectHeal(nMaxHitPoints - nCurrentHitPoints);
            ApplyEffectToObject( DURATION_TYPE_INSTANT, eHeal, oUser );
            ApplyEffectToObject( DURATION_TYPE_INSTANT, eHealVis, oUser );}}

    else if (oItemTag == "RHUN_RESTSIT")
    {
            object oUser;
            oUser = GetItemActivator();
            AssignCommand(oUser, ActionPlayAnimation(ANIMATION_LOOPING_SIT_CROSS, 0.5, 9999.0));}

    else if (oItemTag == "Drum")
    {
            ExecuteScript("bardsongonact", GetItemActivator());}

    else if (oItemTag == "Mandolin")
    {
            ExecuteScript("bardsongonact", GetItemActivator());}

    else if (oItemTag == "Pipes")
    {
            ExecuteScript("bardsongonact", GetItemActivator());}

    else if (oItemTag == "Horn")
    {
            ExecuteScript("bardsongonact", GetItemActivator());}

    else if (oItemTag == "Harp")
    {
            ExecuteScript("bardsongonact", GetItemActivator());}

    else if (oItemTag == "RHUN_TAL_TAN")
    {
      object oClicker = GetItemActivator();
      object oHench = GetHenchman(oClicker);
      {
      if (GetTag(oHench) == "RHUN_SUDEMON"){
      string sSayThis;
      int iTalkVolume = TALKVOLUME_TALK;
      int iTalkFlag = 0;
      sSayThis = "I can only summon one demon at a time.";
      AssignCommand(oClicker, ClearAllActions(TRUE));
      AssignCommand(oClicker, ActionSpeakString(sSayThis, iTalkVolume));}
      else {
      string sSayThis;
      int iTalkVolume = TALKVOLUME_TALK;
      int iTalkFlag = 0;
      object oDemon = CreateObject(OBJECT_TYPE_CREATURE, "balsum", GetLocation(oClicker), FALSE);
      sSayThis = "I call forth upon you to do my bidding!";
      AssignCommand(oClicker, ClearAllActions(TRUE));
      AssignCommand(oClicker, ActionSpeakString(sSayThis, iTalkVolume));
      AddHenchman(oClicker, oDemon);
      AdjustAlignment(oClicker, ALIGNMENT_EVIL, 3);
      ApplyEffectAtLocation(DURATION_TYPE_PERMANENT, EffectVisualEffect(VFX_IMP_UNSUMMON), GetLocation(oDemon));}}}

    else if (oItemTag == "PCList3")
    {
      object oActivator = GetItemActivator();
      AssignCommand(oActivator, ActionStartConversation(oActivator, "c_pcl_activate", TRUE));}

    else if (oItemTag == "PCList2")
    {
      object oActivator = GetItemActivator();
      AssignCommand(oActivator, ActionStartConversation(oActivator, "c_pcl_activate2", TRUE));}

    else if (oItemTag == "TAER_PRISTNCR")
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "This item doesn't seem to do anything here.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));
    }
    else if( oItemTag == "POTION_OF_BLOOD")
    {
       ExecuteScript("sha_potion_blood", GetModule());
    }
    else if(FindSubString(oItemTag, "SHA_EPICBAG_BROOCH") >=0)
    {
       ExecuteScript("sha_epicbags", GetModule());
    }
    else
    {
    object oTaerJ = GetItemActivator();
    sSayThis = "These castle walls must be making my item useless.";
    AssignCommand(oTaerJ, ClearAllActions(TRUE));
    AssignCommand(oTaerJ, ActionSpeakString(sSayThis, iTalkVolume));}
}