void main()
{
    // Get the creature who triggered this event.
    object oPC = GetLastOpenedBy();

    // Only fire once.
    if ( GetLocalInt(GetModule(), "DO_ONCE__" + GetTag(OBJECT_SELF)) )
        return;
    SetLocalInt(GetModule(), "DO_ONCE__" + GetTag(OBJECT_SELF), TRUE);

    // Have the PC say something.
    AssignCommand(oPC, SpeakString("This former storeroom is now a nightmare of rotting bodies mangled beyond recognition."));

    // Have the PC say something.
    DelayCommand(3.0, AssignCommand(oPC, SpeakString("Heaped about haphazardly, the corpses are nearly naked and their flesh gashed, seared, and boiled.")));

    // Have the PC say something.
    DelayCommand(7.0, AssignCommand(oPC, SpeakString("The few inches of unmarred skin remaining on each corpse bear strange symbols branded into the flesh.")));
}