#include "x0_i0_partywide"

void main()

{
    object oActor;

    // Get the PC who is in this conversation.
    object oPC = GetPCSpeaker();

    // Give 5 experience (to party) to the PC.
    GiveXPToAll(oPC, 5);
    CreateItemOnObject("bloodredgem", oPC);

    // Update all players' journals.
    AddJournalQuestEntry("Red God's Curse", 2, oPC, FALSE, TRUE);

    // Have "Klev" perform a sequence of actions.
    oActor = GetObjectByTag("Klev");
    AssignCommand(oActor, ActionMoveToObject(GetNearestObjectByTag("WP_Oomosh")));

    // Have "Oomosh" perform a sequence of actions.
    oActor = GetObjectByTag("Oomosh");
    AssignCommand(oActor, ActionMoveToObject(GetNearestObjectByTag("WP_Oomosh")));

    // Destroy objects (not fully effective until this script ends).
    DelayCommand(3.0, DestroyObject(GetObjectByTag("Klev")));
    DelayCommand(3.0, DestroyObject(GetObjectByTag("Oomosh")));
    DelayCommand(4.0, DestroyObject(GetObjectByTag("oolgkv")));

}