Menu

[StarWolff]

// the problem is in the SubMenu_List(key id) function
// This menu worked before I started to add another if/else
// the function was like:
// function()
// some settings
// some stuff
// show dialog box

// I am trying to re-use the function for multiple menus (so it will run this function for one main menu button, which would populate a submenu, run it again for another main menu button, which would populate a second submenu...etc - and I need it to NOT run that function when the main menu is showing

// so I changed the SubMenu_List(key id) function like this:

// function()
// some settings
// if(this is the main menu)
// {
// do some stuff
// }
// else
// {
// some stuff
// }
// show dialog box

// USER SETTABLE PARAMETERS
float MENU_TIMEOUT = 25; // Time in seconds before menu times out & listener is removed

// Menu parameters
integer menu_channel ;
integer options_channel;
integer menu_handler;
integer options_handler;
//list Menu_00 = ["INFO/About","Admin","Close Menu"];
//TEMPORARY MENU
string Menu_00_Caption = "Select a Category";
list Menu_00 = ["INFO/About","Admin","Close Menu","Ground","Horizon","Sky","Sun/Moon","Underground","Themes"];
list Menu_NAV_butt = ["<==","Themes","==>"];
list Menu_THM = ["These","are","dummy","theme","names"," - ","Don't","click","these"];

// !!!!!!!!
// TEMP specifying this - THE ACTUAL CODE WOULD USE THIS
// to flag which type of Items we're listing
integer Menu_Sub_ID = 0;
list Menu_Sub_Names = ["Main Menu","Ground","Horizon","Sky","Sun/Moon","Underground","Themes"];
string Menu_Sub_Caption = "Main Menu";
// CHANGE THIS: When a SubMenu is selected, set this flag

//Misc parameters
string aviname;
integer Item_CountPointer = 0;
integer Item_CountCurrentPos = 0;
integer Item_Total; // number of sounds in the prim's inventory
float sound_volume = 1.0;
string lastsound;

remove_listens()
{
llSetTimerEvent(0.0);
llListenRemove(menu_handler);
llListenRemove(options_handler);
}

// opens menu channel and displays dialog
SubMenu_List(key id)
{
remove_listens();
menu_channel = -(integer) (llFrand(100000000) + 100000);
options_channel = menu_channel + 1;
menu_handler = llListen(menu_channel, "", NULL_KEY, "");
options_handler = llListen(options_channel,"",NULL_KEY,"");
llSetTimerEvent(MENU_TIMEOUT);

//-SKIP Listing SubMenus~BEG//
// if this is the main menu...
// ------------------------------------------------------------------2FIX this 'if' section
if ((Menu_Sub_Names(Menu_Sub_ID)) == 0)
{
// ...then display the main menu
Menu_Sub_Caption = Menu_00_Caption;
Menu_Sub = Menu_00;
}
// ...and skip the SubMenus Listing
// Otherwise, List SubMenus
else
{

list Menu_Sub = [];
// count the Items in the prim to see if we need pages
Item_Total = llGetInventoryNumber(INVENTORY_TEXTURE);
if (Item_Total < 9)
{
    for (Item_CountPointer = 0; Item_CountPointer < Item_Total; Item_CountPointer++)
    {
        Menu_Sub += llGetInventoryName(INVENTORY_TEXTURE, Item_CountPointer);
    }
    Menu_Sub = Menu_00 + Menu_NAV_butt + Menu_Sub;

}
else
{
    for (Item_CountPointer = 6 * Item_CountCurrentPos; Item_CountPointer < (6 + (6 * Item_CountCurrentPos)) ; Item_CountPointer++)
    {

        // check to make sure name <= 24, or else the menu will not work.
        string Item_Name = llGetInventoryName(INVENTORY_TEXTURE, Item_CountPointer);
        if ( llStringLength(Item_Name) >24)
        {
            llOwnerSay("NOTICE");
            llOwnerSay("Item Name: " + Item_Name + " is too long. Item Names can not be longer than 24 characters");
        }
        else
        {
            if (Item_CountPointer < Item_Total)
            {
                Menu_Sub += Item_Name;
            }
        }
    }
    Menu_Sub = Menu_00 + Menu_NAV_butt + Menu_Sub;
}

// }
Menu_Sub_Caption = "Select a " + llList2String(Menu_Sub_Names, Menu_Sub_ID) + " Item";
llDialog(id, Menu_Sub_Caption, Menu_Sub, menu_channel);

//-SKIP Listing SubMenus~END//
}

}
//---GET SUB LIST END--//

default
{
state_entry()
{

}

on_rez(integer num)
{
    llResetScript();
}

timer()
{
    llSetTimerEvent(0.0);
    remove_listens();
}

touch_start(integer total_number)
{
    aviname = llDetectedName(0);
    Item_CountCurrentPos = 0;
    // display the dialog
    SubMenu_List(llDetectedKey(0));
}

listen(integer channel, string name, key id, string message)
{
    // THIS WILL BE NEEDING TO CHANGE TO A FLAG when you select WHICH menu you're talking to/about
    Menu_Sub_ID = 1;

llSay(0,llList2String(Menu_Sub_Names, Menu_Sub_ID));

    if (channel == menu_channel)
    {
        if (message == "==>")
        {
            if(Item_CountCurrentPos < (llRound((float)Item_Total/6)) ) Item_CountCurrentPos ++;
            SubMenu_List(id);
        }
        else if (message == "<==")
        {
            Item_CountCurrentPos--;
            if (Item_CountCurrentPos < 0) Item_CountCurrentPos = 0;
            SubMenu_List(id);
        }
        else if (message == "Themes")
        {
            llSetTimerEvent(MENU_TIMEOUT);
            Menu_Sub_Caption = "Select a " + llList2String(Menu_Sub_Names, Menu_Sub_ID) + " Item";
            llDialog(id, Menu_Sub_Caption, Menu_THM, options_channel);
        }
        else
        {
            llPlaySound(message, sound_volume);  // Play the sound
            lastsound = message;
            SubMenu_List(id);
        }
    }
    if (channel == options_channel)
    {
        if(message == "Main Menu")  // no entry in options menu for this so it is currently not used
        {
            Item_CountCurrentPos = 0;
            SubMenu_List(id);
        }
        else if(message == "Admin")
        {
            llSetTimerEvent(MENU_TIMEOUT);
            llTextBox(id,"Enter Sound Volume\nMinimum = 0.0\nMaximum = 1.0",options_channel);
        }

        else // sound volume setting
        {
            sound_volume = (float)message;
            if (sound_volume > 1.0) sound_volume = 1.0;
            if (sound_volume < 0.0) sound_volume = 0.0;
            Item_CountCurrentPos =  0;
            SubMenu_List(id);
        }

    }
}

}