//::///////////////////////////////////////////////
//:: FileName s_takeladyscryst
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 12/20/2004 7:51:53 PM
//:://////////////////////////////////////////////
#include "x0_i0_partywide"
void main()
{

    // Remove items from the player's inventory
    object oItemToTake;
    effect oBurst = EffectVisualEffect(VFX_FNF_SOUND_BURST);
    GiveXPToAll(GetPCSpeaker(), 1000);
    ApplyEffectToObject(DURATION_TYPE_TEMPORARY, oBurst, GetPCSpeaker());
    oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "SHA_LADYS_TELECRYSTAL");
    if(GetIsObjectValid(oItemToTake) != 0)
        DestroyObject(oItemToTake);

    object Siger = GetObjectByTag("SIGER");
    object fakelady = CreateObject(OBJECT_TYPE_PLACEABLE, "sha_fake_ladym", GetLocation(Siger));
    //For the sake of security, destroy the Fake Lady Moon after 10mins. So that even if the PC
    //suddenly leaves the conversation the fake Lady Moon is destroyed.
    DelayCommand(600.0, DestroyObject(fakelady));
}