void main()
{
    int nRand;

    nRand = d6();
    location loc = GetLocation(OBJECT_SELF);
    switch(nRand)
    {
    case 1:
        ActionCastSpellAtLocation(SPELL_WAIL_OF_THE_BANSHEE , loc, METAMAGIC_ANY, TRUE, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
        break;
    case 2:
        DestroyObject(GetObjectByTag("JeweledDoor1"));
        SoundObjectPlay(GetObjectByTag("PotClangsLever"));
        break;
    case 3:
        DestroyObject(GetObjectByTag("JeweledDoor2"));
        SoundObjectPlay(GetObjectByTag("PotClangsLever"));
        break;
    case 4:
        DestroyObject(GetObjectByTag("JeweledDoor1"));
        DestroyObject(GetObjectByTag("JeweledDoor2"));
        SoundObjectPlay(GetObjectByTag("PotClangsLever"));
        SoundObjectPlay(GetObjectByTag("PotClangsLever"));
        break;
    case 5:
        DestroyObject(GetObjectByTag("NW_DGASTRAP001"));
        break;
    case 6:
        CreateObject(OBJECT_TYPE_CREATURE, "golbone002", loc, TRUE);
        CreateObject(OBJECT_TYPE_CREATURE, "golbone002", loc, TRUE);
        CreateObject(OBJECT_TYPE_CREATURE, "golbone002", loc, TRUE);
        break;
    }
}