// ♥♥♥♥♥♥♥♥♥♥♥♥♥ Texture UUID List 1/3 ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
list texturen = [
"70727ab1-dd8e-7304-8b8b-115ab9c2c9c0", // 1. Beer Keg 2018
"584c339c-62cf-8ed2-c266-d73a202636ae", // 2. Brewery Apple Ale Keg 2018
"c00ecd26-9cd4-47c9-0230-2fd13f1cf0da", // 3. Brewery Banana Bread Beer Keg 2018
"678970f3-bd46-7ab3-e0ca-063058ae4d8d", // 4. Brewery Chocolate Ale Keg 2018
"e8fd6a2c-e786-c20e-1f0c-225e6b1f323e", // 5. Brewery My Bloody Valentine Ale Keg 2018
"4d0ced8b-69b0-77dd-2a3c-5e88dbc741e9", // 6. Brewery Orange Pale Ale Keg 2018
"7e5b4247-914e-c632-4e80-ee1c8ca1aacb", // 7. Brewery Pumpkin Stout Keg 2018
"95408ccc-8182-8640-7852-62402496eae1", // 8. Brewery Strawberry Ale Keg 2018
"95408ccc-8182-8640-7852-62402496eae1", // 9. Drunkin Ubar Paga
"12edb207-e6d6-c75c-f38e-13ad3d0c9801", // 10. HW Slave Wine 2018
"f05572fb-9289-ec1a-f85b-1ec6cd1434fb", // 11. Meadery Mead 2018
"3e108bc4-d3f6-1e55-ec08-b6742dc11ef6", // 12. Meadery Runefalls Festival Mead
"b06b88d7-100e-24e4-5313-c20efb38be3c", // 13. Meadery Runefalls Mead 2018
"a293befd-ef7c-9ec7-bd3b-954336e0b827",// 14. Meadery Spiced Apple Honey Mead 2018
"f6915202-6938-b4ee-0d5f-efa9d6c05e3e",// 15. Runefalls Orange Cinnamon Mead Keg 2018
"ad318692-d3f1-ba27-eec0-f14e7653bfaf",// 16. Soda - Root Beer Six Pack
"574f938b-282e-e3a1-fc05-335d842dfec4",// 17. Vinegar
"dd36d756-8051-7ca3-bd8b-32c151b04173",// 18. Wine Barrel 2018
"5e2cc9f8-053a-781a-e38b-5a3c852131b5" // 19. Yogurt - Plain
];
// ♥♥♥♥♥♥♥♥♥♥♥♥♥ Dialog List 2/3 ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
list diaList = [
"1","2","3","4","5","6","7",
"8","9","10","11","12","13",
"14","15","16","17","18","19"
];
// ♥♥♥♥♥♥♥♥♥♥♥♥♥ Menu description field ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
string main_text = "\n✬✬✬ DFS FERMENTER ✬✬✬
Which recipe would you like to cook? \n
1. Beer Keg 2018
2. Brewery Apple Ale Keg 2018
3. Brewery Banana Bread Beer Keg 2018
4. Brewery Chocolate Ale Keg 2018
5. Brewery My Bloody Valentine Ale Keg 2018
6. Brewery Orange Pale Ale Keg 2018
7. Brewery Pumpkin Stout Keg 2018
8. Brewery Strawberry Ale Keg 2018
9. Drunkin Ubar Paga
10. HW Slave Wine 2018
11. Meadery Mead 2018
12. Meadery Runefalls Festival Mead
13. Meadery Runefalls Mead 2018
14. Meadery Spiced Apple Honey Mead 2018
15. Runefalls Orange Cinnamon Mead Keg 2018
16. Soda - Root Beer Six Pack
17. Vinegar
18. Wine Barrel 2018
19. Yogurt - Plain
";

integer dialogChannel;
key ToucherID;
integer menuindex;
set_textur(string message)
{
    integer listnum = llListFindList(diaList,[message]);
    // ♥♥♥♥♥♥♥♥♥♥♥♥♥ Face ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
    llSetTexture( llList2String(texturen,listnum), 1);
    message = " ";
    list temp = [];
}
list order_buttons(list buttons)
{
    return llList2List(buttons, -3, -1) + llList2List(buttons, -6, -4) +
    llList2List(buttons, -9, -7) + llList2List(buttons, -12, -10);
}
integer findinList(list src,list item)
{
    if(~llListFindList(src, (list)item))
    return TRUE;
    else
    return FALSE;
}
DialogPlus(key owner, string message, list buttons, integer channel, integer CurMenu)
{
// ♥♥♥♥♥♥♥♥♥♥♥♥♥ Pages & Main Text ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
    message =  message + main_text + "\n" + "";
    if (llGetListLength(buttons) >12)
    {
        list lbut = buttons;
        list Nbuttons = [];
        if(CurMenu == -1)
        {
            CurMenu = 0;
            menuindex = 0;
        }
        if((Nbuttons = (llList2List(buttons, (CurMenu * 10), ((CurMenu * 10) + 9)) + ["<", ">"])) == ["<", ">"])
        DialogPlus(owner, message, lbut, channel, menuindex = 0);
        else
        {
            llDialog(owner, message,  order_buttons(Nbuttons), channel);
        }
    }
    else
    {
        llDialog(owner, message,  order_buttons(buttons), channel);
    }
}
default
{
    state_entry()
    {
        dialogChannel = (integer)llFrand(99999 - 10000) + 10000;
        llListen(dialogChannel, "", NULL_KEY, "");
    }
    changed(integer c)
    {
        if(c & CHANGED_OWNER)
        {
            llResetScript();
        }
    }
    touch_start(integer num_detected)
    {
            ToucherID = llDetectedKey(0); // ♥♥♥♥Public♥♥♥ //
            integer touchedFace = llDetectedTouchFace(0);
            // ♥♥♥♥♥♥♥♥♥♥♥♥♥ Face ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
            if ( touchedFace != 1 ) return;
                DialogPlus(ToucherID,"",diaList,dialogChannel,menuindex=0);
    }

    listen(integer channel, string name, key id, string message)
    {
        if( (id == ToucherID) && (channel == dialogChannel) )
        {
            if (message == ">" )
            {
                DialogPlus(ToucherID,"",diaList,dialogChannel,++menuindex);
            }
            else if (message == "<" )
            {
                DialogPlus(ToucherID,"",diaList,dialogChannel,--menuindex);
            }
            else
            {
                list temp = llParseString2List(message,["|"],[]);
                message = llList2String(temp,0);
                {
// ♥♥♥♥♥♥♥♥♥♥♥♥♥ List 3/3 ♥♥♥♥♥♥♥♥♥♥♥♥♥ //
if(findinList([
"1","2","3","4","5","6","7",
"8","9","10","11","12","13",
"14","15","16","17","18","19"
],[message]))
                    {
                        set_textur(message);
                    }
                }
            }
        }
    }
}