Script Battle Royale

// Create a bunch of new scripts in inventory, give them cool names like Ultrapocolypse,
// Megarmageddon, and Bob.  Copy this code to each of your recently created scripts,
// rez a box, and dump these scripts inside.

// Although theoretically the surviving script should be the one announcing its victory
// You may want to use edit to peek inside the box to see which one actually survived.

// Expect to see "Script is missing from database" if you try to open any remaining
// non-survivor scripts in your makeshift arena.  The surviving script will stay intact
// and accessible.

// Reward the winning script by saving it in mono and take it back into inventory. It
// will be slaughtered if you leave it in the box.

// Edie Shoreland, Evie Moriguchi, and NawtieNitey 2019

delete_scripts()
{
    string thisScript = llGetScriptName();
    string inventoryItemName;
    integer index = llGetInventoryNumber(INVENTORY_SCRIPT);
    while (index)
    {
        --index;
        inventoryItemName = llGetInventoryName(INVENTORY_SCRIPT, index);
        if (inventoryItemName != thisScript) llRemoveInventory(inventoryItemName);
    }
}

default
{
    state_entry()
    {
        delete_scripts();
        llSleep (10);
        llSay (0, llGetScriptName() + " is the winner!");
    }

    touch_end(integer bye)
    {
        llSay (0, "The arena is closed!");
        //llDie(); //Time to destroy the evidence
    }
}