//:: FileName pay400
// PC pays 400 gp to NPC

void main()
{

    // Remove some gold from the player
    TakeGoldFromCreature(400, GetPCSpeaker(), TRUE);
}