Get Avatar Info

list Queue;

default {
    touch_end( integer d ) {
        key av = llDetectedKey(0);
        string name = llDetectedName(0);
        if (llSubStringIndex(name, " Resident") != -1)
        { //no last name
            name = llGetSubString(name, 0, llSubStringIndex(name, " Resident")-1);
        }
        else
        {
            name = llGetSubString(name, 0, llSubStringIndex(name, " ")-1) + "." + llGetSubString(name, llSubStringIndex(name, " ")+1, -1);
        }

        Queue += [
            llHTTPRequest("http://chromebackend.net/s/Groups/" + name, [], ""),
            av
        ];
    }

    http_response( key k, integer s, list m, string b ) {
        integer Ptr     = llListFindList(Queue,[k]);
        if(!~Ptr) return;

        key av          = llList2Key(Queue,Ptr+1);
        Queue           = llDeleteSubList(Queue,Ptr,Ptr+1);

        list x          = llParseString2List(b,["%^"],[]);
        string SystemMessage = llList2String(x,0);
             x          = llParseString2List(llList2String(x,1),["%#"],[]);
        list Names      = llParseString2List(llList2String(x,0),["%$"],[]);
        list Keys       = llParseString2List(llList2String(x,1),["%$"],[]);
        list Descs      = llParseString2List(llList2String(x,2),["%$"],[]);
        list Images     = llParseString2List(llList2String(x,3),["%$"],[]);

        llRegionSayTo(av, PUBLIC_CHANNEL, "Your groups are:\n- "+llDumpList2String(Names,"\n- "));
    }
}