void CreateItemOnObjectVoid(string sItemTemplate, object oTarget=OBJECT_SELF, int nStackSize=1)
{
CreateItemOnObject(sItemTemplate, oTarget, nStackSize);
}
object oItem;


//This script takes all sequencer stones and returns them to the oem stone
//Put this script OnEnter
void main()
{

object oPC = GetEnteringObject();

if (!GetIsPC(oPC)) return;

if (GetItemPossessedBy(oPC, "newstone044")!= OBJECT_INVALID)
   {
   oItem = GetFirstItemInInventory(oPC);

   while (GetIsObjectValid(oItem))
      {
      if (GetTag(oItem)=="newstone044") DestroyObject(oItem);

      oItem = GetNextItemInInventory(oPC);
      }

   DelayCommand(1.0, CreateItemOnObjectVoid("ancstone88", oPC));

   }
}