//:: FileName pay2000
// PC pays2000 gp to NPC

void main()
{

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