#include "x0_i0_partywide"

void main()

{

    object oTarget;

    object oPC = GetPCSpeaker();

    FadeToBlack(oPC);

    // Give 5 XP (to party) to the PC.
    GiveXPToAll(oPC, 5);

    // Give 150 GP (to party) to the PC.
    GiveGoldToAll(oPC, 150);

    // Close "mrhyn1".
    oTarget = GetObjectByTag("mrhyn1");
    AssignCommand(oTarget, ActionCloseDoor(oTarget));

    DelayCommand(3.5, FadeFromBlack(oPC));

    // Have "Marhuyn" say something.
    DelayCommand(3.7, AssignCommand(GetObjectByTag("Marhuyn"), SpeakString("Farewell, my hero of Lankhmar!")));

    // Destroy an object (not fully effective until this script ends).
    DelayCommand(4.0, DestroyObject(GetObjectByTag("Marhuyn")));

}