Functions
	UpdateTexture ()

	default ()

void	Ready ()

Variables
integer	LastUnix

integer	DestValidCheck

integer	HasCheckedChanged

integer	NextCheck

list	DestinationsName

list	DestinationsLink

list	DestinationsLogo

list	DestinationsValid

key	CheckRequest

integer	DISPLAY_SIDE = 1

integer	COLUMNS = 3

integer	ROWS = 10

integer	ALT_ROWS = ROWS + 8

string	SOURCE_URL = "https://www.little-sense.au/"

string	LOGO = "images/Brigadoon_Logo_Small.png"

string	FAILURE = "images/question_mark.png"

string	NO_LOGO = "images/no_logo.png"

string	BLANK_LOGO = "images/blank_label.png"

string	FILE_DIRECTORY = "project_dynamic/"

Function Documentation

◆ default()

default ( )

Definition at line 97 of file project_list.lsl.

{
    state_entry()
    {
        string display_list;
        string description = llToLower(llGetObjectDesc()) + ".txt";;
        
        llHTTPRequest(SOURCE_URL + FILE_DIRECTORY + description, [HTTP_METHOD, "GET"], "");
    }
    
    http_response(key Dummy, integer Status, list Meta, string Body)
    {
        DestinationsLogo = [];
        DestinationsName = [];
        DestinationsLink = [];
        DestinationsValid = [];
        list Parse = llParseString2List(Body, ["\n"], []);
        integer i;
        for (i = 0; i < llGetListLength(Parse); ++i)
        {
            if (llList2String(Parse, i) != "")
            {
                list Line = llParseString2List(llList2String(Parse, i), ["="], []);
                if (llGetListLength(Line) == 3 &&
                    llList2String(Line, 0) != "" &&
                    llList2String(Line, 1) != "" &&
                    llList2String(Line, 2) != "")
                {
                    DestinationsName = DestinationsName + [llList2String(Line, 0)];
                    DestinationsLink = DestinationsLink + [llList2String(Line, 1)];
                    DestinationsLogo = DestinationsLogo + [llList2String(Line, 2)];
                    DestinationsValid = DestinationsValid + [TRUE];
                }
            }
        }
        UpdateTexture();
        state Ready;
    }
 }

References DestinationsLink, DestinationsLogo, DestinationsName, DestinationsValid, FILE_DIRECTORY, Ready(), SOURCE_URL, and UpdateTexture().

Here is the call graph for this function:

◆ Ready()

void Ready ( )

Definition at line 140 of file project_list.lsl.

{
    state_entry()
    {
        LastUnix = llGetUnixTime();
        DestValidCheck = 0;
        NextCheck = -1;
        HasCheckedChanged = FALSE;
        CheckRequest = llHTTPRequest(llList2String(DestinationsLink, DestValidCheck), [HTTP_METHOD, "GET"], "");
        llSetTimerEvent(10);
    }
    
    http_response(key Dummy, integer Status, list Meta, string Body)
    {
        if (Dummy != CheckRequest)
         {return;}
        llSetText(".", <1, 0, 0>, 1);
        if (Status == 200)
        {
            if (llList2Integer(DestinationsValid, DestValidCheck) == FALSE)
             {HasCheckedChanged = TRUE;}
            DestinationsValid = llListReplaceList(DestinationsValid, [TRUE], DestValidCheck, DestValidCheck);
        }
        else
        {
            if (llList2Integer(DestinationsValid, DestValidCheck) == TRUE)
             {HasCheckedChanged = TRUE;}
            DestinationsValid = llListReplaceList(DestinationsValid, [FALSE], DestValidCheck, DestValidCheck);
        }
        DestValidCheck = DestValidCheck + 1;
        if (DestValidCheck > llGetListLength(DestinationsLink) - 1)
        {
            if (HasCheckedChanged)
             {UpdateTexture();}
            NextCheck = llGetUnixTime();
            llSetText("", <1, 0, 0>, 1);
            return;
        }
        llSleep(1);
        CheckRequest = llHTTPRequest(llList2String(DestinationsLink, DestValidCheck), [HTTP_METHOD, "GET"], "");
    }
    
    timer()
    {
        if (LastUnix + 3600 * 4 < llGetUnixTime())
         {state default;}
        if (NextCheck != -1 && NextCheck + 90 < llGetUnixTime())
        {
            NextCheck = -1;
            DestValidCheck = 0;
            HasCheckedChanged = FALSE;
            CheckRequest = llHTTPRequest(llList2String(DestinationsLink, DestValidCheck), [HTTP_METHOD, "GET"], "");
        }
    }
    
    
    touch_start(integer Dummy)
    {
        vector point = llDetectedTouchST(0);
        integer face = llDetectedTouchFace(0);
        integer link = llDetectedLinkNumber(0);
 
//        if (link != LINK_ROOT)
//        {return;}
        if (point == TOUCH_INVALID_TEXCOORD)
         {return;}
        if (face != DISPLAY_SIDE)
         {return;}
 
        //integer y = (ALT_ROWS - 1) - llFloor(point.y * ALT_ROWS);
        integer y = (ROWS - 1) - llFloor(point.y * ROWS);
        integer x = llFloor(point.x * COLUMNS);
        integer index = (y + x * ROWS);
        
        if (llList2String(DestinationsLink, index) == "")
         {return;}
        
        if (llList2Integer(DestinationsValid, index) == TRUE)
        {
             key id = llDetectedKey(0);
             string info = "Dummy Information";
             llLoadURL(id, info, llList2String(DestinationsLink, index));
        }
        else
         {
             llDialog(llDetectedKey(0), "This link is invalid.", ["Ok"], -5);
         }
    }
}

References CheckRequest, COLUMNS, DestinationsLink, DestinationsValid, DestValidCheck, DISPLAY_SIDE, HasCheckedChanged, LastUnix, NextCheck, ROWS, and UpdateTexture().

Referenced by default().

Here is the call graph for this function:

Here is the caller graph for this function:

◆ UpdateTexture()

UpdateTexture ( )

Definition at line 24 of file project_list.lsl.

{
    integer TEXTURE_SIZE = 512;
    integer FONT_SIZE = (TEXTURE_SIZE / ROWS) / 5;
        
        
    string drawList;
    drawList = osSetPenSize(drawList, 1);
    drawList = osSetFontSize(drawList, FONT_SIZE);
 
    drawList = osMovePen(drawList, 0, 0);
    drawList = osSetPenColor(drawList, "Gray");
    drawList = osDrawFilledRectangle(drawList, TEXTURE_SIZE, TEXTURE_SIZE);
 
    integer x;
    integer y;
    string  Logo;
    
    for (x = 0; x < COLUMNS; x++)
    {
        for (y = 0; y < ROWS; y++)
        {
            integer CELL_HEIGHT = TEXTURE_SIZE / (ROWS + 8);
            integer CELL_WIDHT = TEXTURE_SIZE / COLUMNS;
            integer xTopLeft = x * CELL_WIDHT;
            integer yTopLeft = y * CELL_HEIGHT;
 
            drawList = osSetPenColor(drawList, "White");
            drawList = osMovePen(drawList, xTopLeft, yTopLeft);
            drawList = osDrawRectangle(drawList, CELL_WIDHT, CELL_HEIGHT);
 
            integer index = (y + x * ROWS);
            string  cellName  = llList2String(DestinationsName, index);
            integer cellValid = llList2Integer(DestinationsValid, index);
 
            string cellBbackground;
            if (cellName == "")
            {
                cellBbackground = "DarkGray";
                Logo = SOURCE_URL + BLANK_LOGO;
            }
            else
            {
                if (cellValid)
                {
                    cellBbackground = "CadetBlue";
                    Logo = llList2String(DestinationsLogo, index);
                }
                else
                {
                    cellBbackground = "IndianRed";
                    Logo = SOURCE_URL + FAILURE;
                }
            }
 
            drawList = osSetPenColor(drawList, cellBbackground);
            drawList = osMovePen(drawList, xTopLeft + 2, yTopLeft + 2);
            drawList = osDrawFilledRectangle(drawList, CELL_WIDHT - 3, CELL_HEIGHT - 3);
 
            xTopLeft += 2;
            yTopLeft += 6;
            drawList = osSetPenColor(drawList, "Black");
            drawList = osMovePen(drawList, xTopLeft + 3, yTopLeft + 3);
            drawList = osDrawImage(drawList, 16,16, Logo);
            drawList = osMovePen(drawList, xTopLeft + 20, yTopLeft - 1);
            drawList = osDrawText(drawList, cellName);
        }
    }
    osSetDynamicTextureDataBlendFace("", "vector", drawList, "alpha:false,width:" + (string)TEXTURE_SIZE + ",height:" + (string)TEXTURE_SIZE, FALSE, 1, 0, 255, DISPLAY_SIDE);
}

References BLANK_LOGO, COLUMNS, DestinationsLogo, DestinationsName, DestinationsValid, DISPLAY_SIDE, FAILURE, ROWS, and SOURCE_URL.

Referenced by default(), and Ready().

Here is the caller graph for this function:

Variable Documentation

◆ ALT_ROWS

integer ALT_ROWS = ROWS + 8

Definition at line 14 of file project_list.lsl.

◆ BLANK_LOGO

string BLANK_LOGO = "images/blank_label.png"

Definition at line 19 of file project_list.lsl.

Referenced by UpdateTexture().

◆ CheckRequest

key CheckRequest

Definition at line 9 of file project_list.lsl.

Referenced by Ready().

◆ COLUMNS

integer COLUMNS = 3

Definition at line 12 of file project_list.lsl.

Referenced by Ready(), and UpdateTexture().

◆ DestinationsLink

list DestinationsLink

Definition at line 6 of file project_list.lsl.

Referenced by default(), and Ready().

◆ DestinationsLogo

list DestinationsLogo

Definition at line 7 of file project_list.lsl.

Referenced by default(), and UpdateTexture().

◆ DestinationsName

list DestinationsName

Definition at line 5 of file project_list.lsl.

Referenced by default(), and UpdateTexture().

◆ DestinationsValid

list DestinationsValid

Definition at line 8 of file project_list.lsl.

Referenced by default(), Ready(), and UpdateTexture().

◆ DestValidCheck

integer DestValidCheck

Definition at line 2 of file project_list.lsl.

Referenced by Ready().

◆ DISPLAY_SIDE

integer DISPLAY_SIDE = 1

Definition at line 11 of file project_list.lsl.

Referenced by Ready(), and UpdateTexture().

◆ FAILURE

string FAILURE = "images/question_mark.png"

Definition at line 17 of file project_list.lsl.

Referenced by UpdateTexture().

◆ FILE_DIRECTORY

string FILE_DIRECTORY = "project_dynamic/"

Definition at line 20 of file project_list.lsl.

Referenced by default().

◆ HasCheckedChanged

integer HasCheckedChanged

Definition at line 3 of file project_list.lsl.

Referenced by Ready().

◆ LastUnix

integer LastUnix

Definition at line 1 of file project_list.lsl.

Referenced by Ready().

◆ LOGO

string LOGO = "images/Brigadoon_Logo_Small.png"

Definition at line 16 of file project_list.lsl.

◆ NextCheck

integer NextCheck

Definition at line 4 of file project_list.lsl.

Referenced by Ready().

◆ NO_LOGO

string NO_LOGO = "images/no_logo.png"

Definition at line 18 of file project_list.lsl.

◆ ROWS

integer ROWS = 10

Definition at line 13 of file project_list.lsl.

Referenced by Ready(), and UpdateTexture().

◆ SOURCE_URL

string SOURCE_URL = "https://www.little-sense.au/"

Definition at line 15 of file project_list.lsl.

Referenced by default(), and UpdateTexture().

Functions

Variables

Function Documentation

◆ default()

◆ Ready()

◆ UpdateTexture()

Variable Documentation

◆ ALT_ROWS

◆ BLANK_LOGO

◆ CheckRequest

◆ COLUMNS

◆ DestinationsLink

◆ DestinationsLogo

◆ DestinationsName

◆ DestinationsValid

◆ DestValidCheck

◆ DISPLAY_SIDE

◆ FAILURE

◆ FILE_DIRECTORY

◆ HasCheckedChanged

◆ LastUnix

◆ LOGO

◆ NextCheck

◆ NO_LOGO

◆ ROWS

◆ SOURCE_URL