// Script for the Aidbringer administrator-rod
// This script revokes an Aidbringer membership, and removes all Aidbringer
// items from the player.
// 5th of September 2005, Alangara, made by -Seeker-#include "mn_h_constants"

#include "mn_h_constants"
#include "mn_i_checkrank"

void main()
{
   object oPC = GetPCSpeaker();
   object oTarget = GetLocalObject( oPC, "mn_target" );
   DeleteLocalObject( oPC, "mn_target" );

   // Destroy all items
   object pass = GetItemPossessedBy( oPC, "MN_I_PCACCESS" );
   if (GetIsObjectValid ( pass ) )
   {
      SetPlotFlag( pass, FALSE );
      DestroyObject( pass );
   }

   object item = GetItemPossessedBy( oPC, "MN_AIDBR_MEMKEY" );
   if (GetIsObjectValid ( item ) )
   {
      SetPlotFlag( item, FALSE );
      DestroyObject( item );
   }

   item = GetItemPossessedBy( oPC, "MN_AIDBR_OFFKEY" );
   if (GetIsObjectValid ( item ) )
   {
      SetPlotFlag( item, FALSE );
      DestroyObject( item );
   }

   item = GetItemPossessedBy( oPC, "MN_AIDB_TOKEN" );
   if (GetIsObjectValid ( item ) )
   {
      SetPlotFlag( item, FALSE );
      DestroyObject( item );
   }

   item = GetItemPossessedBy( oPC, "MN_AIDB_ROD" );
   if (GetIsObjectValid ( item ) )
   {
      SetPlotFlag( item, FALSE );
      DestroyObject( item );
   }

   item = GetItemPossessedBy( oPC, "MN_AIDB_TELRING" );
   if (GetIsObjectValid ( item ) )
   {
      SetPlotFlag( item, FALSE );
      DestroyObject( item );
   }


   // Feedback
   effect visual1 = EffectVisualEffect( VFX_FNF_PWSTUN );
   ApplyEffectToObject( DURATION_TYPE_INSTANT, visual1, oTarget );
}