//:: FileName pay500
// PC pays 500 gp to NPC

void main()
{

    // Remove some gold from the player
    TakeGoldFromCreature(500, GetPCSpeaker(), TRUE);
    CreateItemOnObject("Chimay", GetPCSpeaker(),1);
}