//Put this script OnEnter
#include "nw_i0_tool"
void main()
{

object oPC = GetEnteringObject();

if (!GetIsPC(oPC)) return;

if (GetItemPossessedBy(oPC, "hellsgatekey")== OBJECT_INVALID)
   return;

object oItem;
oItem = GetFirstItemInInventory(oPC);

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

   oItem = GetNextItemInInventory(oPC);
   }

CreateItemOnObject("godmark4", oPC);

RewardPartyXP(5000, oPC, FALSE);

RewardPartyGP(99999, oPC, FALSE);

}