void main()

{

object oTarget;

object oPC = GetEnteringObject();

if (!GetIsPC(oPC)) return;
int DoOnce = GetLocalInt(oPC, GetTag(OBJECT_SELF));
if (DoOnce==TRUE) return;
SetLocalInt(oPC, GetTag(OBJECT_SELF), TRUE);

AssignCommand(oTarget, TakeGoldFromCreature(GetGold(oPC), oPC));

oTarget = GetObjectByTag("sextant");
DestroyObject(oTarget, 0.2);

}