Difference between revisions of "HTML HUD Demo"

From Second Life Wiki
Jump to: navigation, search
m (Replaced old <LSL> block with <source lang="lsl2">)
 
(16 intermediate revisions by 5 users not shown)
Line 1: Line 1:
<lsl>// HTML Based, Single Script HUD
+
<span id="top"></span>
// This is intended to be a tech demo of what html on a hud allows.
+
// * Interaction with SL world (give items, play animations, scan nearby avatars)
+
// * Simple, low overhead (1 scripts, 1 prim)
+
// * Rich, dynamic interface (images, menus, flash)
+
// Updates and improvements are welcome at http://wiki.secondlife.com/wiki/HTML_HUD_Demo
+
  
// To Use:
+
=TODO:=
// * Create a cube and wear it as a hud on the top-left. (script will need tweaking for other spots)
+
// * Edit the cube while wearing it and add this script to it.
+
// * Add any animations you want to play to the object
+
// * Add any notecards or objects you want to give away to the object.
+
  
// License:
+
* Suggest a <code>Stop All Animations</code> button be added to Animations selection frame for convenience.
// This script itself is free to share, modify and use without restriction.
+
// Any linked or referenced files are not included in this license and are licensed by their respective owners under their own respective copyright and other licenses.
+
// Created by Kelly Linden, 2011.
+
  
integer display_face = 4;
+
=HTML HUD Demo:=
integer button_face = 2;
+
integer link = LINK_THIS;
+
list visible = [PRIM_POS_LOCAL,<0,-0.13,-0.13>,PRIM_SIZE,<0.01,0.25,0.25>,PRIM_ROT_LOCAL,<0,0,0,1>];
+
list button = [PRIM_POS_LOCAL,<0,-0.04,-0.04>,PRIM_SIZE,<0.05,0.05,0.05>,PRIM_ROT_LOCAL,<0,0,-1,0>];
+
list init = [PRIM_TEXTURE,ALL_SIDES,TEXTURE_BLANK,<1,1,1>,<1,1,1>,0,PRIM_TEXTURE,button_face,"0b815b79-c8f5-fc98-91fc-e77b53a468e2",<1,1,1>,<1,1,1>,0];
+
integer is_visible = FALSE;
+
string my_url = "";
+
  
string footer;
+
== Screenshot: ==
string header;
+
key current_request;
+
  
set_header()
+
[[File:HTML HUD Demo.jpg|200px|thumb|top|screenshots]]
 +
 
 +
==Tip:==
 +
 
 +
{{KBtip|This HUD might take a second or two to load when switching from 'closed' to 'open' mode.}}
 +
 
 +
==Source code:==
 +
 
 +
<source lang="lsl2">
 +
//  HTML-based, single script HUD
 +
//
 +
//  original by Kelly Linden
 +
//
 +
//  To use:
 +
//  - create a default prim (cube)
 +
//  - wear it as a HUD on top_left (script needs tweaking for other attachment points)
 +
//  - edit the cube while wearing
 +
//  - add animations you want to use
 +
//  - add notecards and objects you want to hand out
 +
//  - add this script
 +
//
 +
//  License:
 +
//    This script itself is free to share, modify and use without restriction.
 +
//    Any linked or referenced files are not included in this license and are
 +
//    licensed by their respective owners under their own respective copyright
 +
//    and other licenses.
 +
 
 +
key    owner;
 +
string  ownerName;
 +
 
 +
integer scope;
 +
 
 +
string  url;
 +
 
 +
key    currentRequestID;
 +
 
 +
integer responseStatus;
 +
string  responseBody;
 +
 
 +
list    lastPath;
 +
 
 +
string  video_url;
 +
 
 +
string  header;
 +
string  footer;
 +
 
 +
string  currentAnimation;
 +
 
 +
integer isVisible;
 +
 
 +
string  exceptions;
 +
 
 +
//  user-function: init
 +
//  - does not return anything
 +
//  - sets initial variable values
 +
//  - sets object's name and textures
 +
//  - request a url to use the HUD
 +
 
 +
init()
 
{
 
{
     // TODO: Remove dependency on this css file.
+
     owner    = llGetOwner();
     header = "<html><head>"
+
     ownerName = llKey2Name(owner);
            + "<link href='https://d1979ns0fqtj19.cloudfront.net/assets/common-103828347986224535963905120979424958961.css' media='all' rel='stylesheet' type='text/css' />"
+
    llSetObjectName("HTML HUD");
            + "<base href='" + my_url + "/' />"
+
 
            + "</head><body>";
+
    scope = AGENT_LIST_PARCEL;
}
+
 
   
+
    video_url = "http://www.youtube.com/embed/m7p9IEpPu-c?rel=0";
set_footer()
+
 
{
+
// header set in set_link_media(url)
     // TODO: Remove dependency on the js file
+
//  footer set in set_link_media(url)
     footer = "<div align='center' style='position:absolute;top:93%;left:15%;'><a href='anims'>Anims</a> | <a href=''>Scan</a> | <a href='hide'>Hide</a> | <a href='video'>Video</a></div>"
+
 
         + "<script src='https://d2mjw3k7q9u8rb.cloudfront.net/assets/common-170919042270376442559931151451605602726.js' type='text/javascript'></script></body></html>";
+
     float  FLOAT_FALSE      = 0.0;
 +
     vector  RATIO_ONE_BY_ONE = <0.98, 0.98, 0.00>;// fix Second Life ... or try to!
 +
 
 +
    llSetLinkPrimitiveParamsFast(LINK_THIS, [
 +
         PRIM_TEXTURE, ALL_SIDES, TEXTURE_BLANK,                          RATIO_ONE_BY_ONE, ZERO_VECTOR, FLOAT_FALSE,
 +
        PRIM_TEXTURE, 2,        "0b815b79-c8f5-fc98-91fc-e77b53a468e2", RATIO_ONE_BY_ONE, ZERO_VECTOR, FLOAT_FALSE]);
 +
 
 +
    toggle_visibility_of_HUD_button();
 +
    request_secure_url();
 
}
 
}
  
toggle_show()
+
//  user-function: toggle_visibility_of_HUD_button
 +
//  - does not return anything
 +
//  - toggle the visibility of the prim
 +
//  - will rotate, position and scale the prim
 +
 
 +
toggle_visibility_of_HUD_button()
 
{
 
{
     if (is_visible)
+
     if (isVisible)
         llSetLinkPrimitiveParamsFast(link,visible);
+
    {
 +
         llSetLinkPrimitiveParamsFast(LINK_THIS, [
 +
            PRIM_POS_LOCAL, <0.0, -0.13, -0.13>,
 +
            PRIM_ROT_LOCAL, <0.0, 0.0, 0.0, 1.0>,
 +
            PRIM_SIZE, <0.01, 0.25, 0.25>]);
 +
    }
 
     else
 
     else
         llSetLinkPrimitiveParamsFast(link,button);
+
    {
     is_visible = !is_visible;
+
         llSetLinkPrimitiveParamsFast(LINK_THIS, [
 +
            PRIM_POS_LOCAL, <0.0, -0.04, -0.04>,
 +
            PRIM_ROT_LOCAL, <0.0, 0.0, -1.0, 0.0>,
 +
            PRIM_SIZE, <0.05, 0.05, 0.05>]);
 +
     }
 +
 
 +
    isVisible = !isVisible;
 
}
 
}
  
string av_image(key id)
+
//  user-function: drop and clear the old url
 +
//  - does not return anything
 +
 
 +
release_url()
 
{
 
{
     return "https://my-secondlife.s3.amazonaws.com/users/" + llGetUsername(id) + "/thumb_sl_image.png";
+
     llReleaseURL(url);
 +
    url = "";
 
}
 
}
  
string app_profile_url(key id)
+
//  user-function: request secure url
 +
//  - does not return anything
 +
//  - make sure we release the old url before requesting a new one
 +
 
 +
request_secure_url()
 
{
 
{
     return "secondlife:///app/agent/" + (string)id + "/about";
+
     release_url();
 +
    currentRequestID = llRequestSecureURL();
 
}
 
}
  
set_media(string url)
+
//  user-function: set_link_media
 +
//  - does not return anything
 +
//  - set the values for the string variables 'header' and 'footer'
 +
//  - prepare face 4 for media on a prim
 +
 
 +
set_link_media(string scriptUrl)
 
{
 
{
     //llClearLinkMedia(link,display_face);
+
     url = scriptUrl;
     llSetLinkMedia(link, display_face,              // Side to display the media on.
+
 
            [PRIM_MEDIA_AUTO_PLAY,TRUE,     // Show this page immediately
+
     header = "<html><head><link href='https://d1979ns0fqtj19.cloudfront.net/"
            PRIM_MEDIA_CURRENT_URL,url,   // The url if they hit 'home'
+
        + "assets/common-103828347986224535963905120979424958961.css'"
            PRIM_MEDIA_HOME_URL,url,       // The url currently showing
+
        + " media='all' rel='stylesheet' type='text/css' />"
            PRIM_MEDIA_HEIGHT_PIXELS,256, // Height/width of media texture will be
+
        + "<base href='" + scriptUrl + "/' /></head><body>";
            PRIM_MEDIA_WIDTH_PIXELS,256,   //  rounded up to nearest power of 2.
+
 
            PRIM_MEDIA_PERMS_CONTROL, PRIM_MEDIA_PERM_NONE]);
+
    footer = "<div align='center' style='position:absolute;top:93%;left:8%;'>"
 +
        + "<a href=''>Scan</a> | <a href='anims'>Anims</a> | <a href='video'>"
 +
        + "Video</a> | <a href='config'>Config</a> | <a href='hide'>Hide</a>"
 +
        + "</div><script src='https://d2mjw3k7q9u8rb.cloudfront.net/assets/"
 +
        + "common-170919042270376442559931151451605602726.js' type='text/"
 +
        + "javascript'></script></body></html>";
 +
 
 +
    llSetLinkMedia(LINK_THIS, 4, [
 +
        PRIM_MEDIA_AUTO_PLAY, TRUE,
 +
        PRIM_MEDIA_CURRENT_URL, url,
 +
        PRIM_MEDIA_HOME_URL, url,
 +
        PRIM_MEDIA_HEIGHT_PIXELS, 256,
 +
        PRIM_MEDIA_WIDTH_PIXELS, 256,
 +
        PRIM_MEDIA_PERMS_CONTROL, PRIM_MEDIA_PERM_NONE]);
 
}
 
}
  
string vec2str(vector v)
+
//  user-function:
 +
//  - does not return anything
 +
//  - used if there's not a request to the homepage of our website
 +
//  - check where on the site we are and prepare variables for the response
 +
 
 +
http_get(key requestID, list path)
 
{
 
{
     return "<" + (string)((integer)v.x) + "," + (string)((integer)v.y) + "," + (string)((integer)v.z) + ">";
+
     currentRequestID        = requestID;
 +
 
 +
    integer numOfPathsParts = llGetListLength(path);
 +
    string firstPathPart    = llList2String(path, 0);
 +
 
 +
    if (firstPathPart == "hide")
 +
    {
 +
        toggle_visibility_of_HUD_button();
 +
        http_get(requestID, lastPath);
 +
        return;
 +
    }
 +
 
 +
    lastPath = path;
 +
 
 +
    if (firstPathPart == "agent")
 +
    {
 +
        if (numOfPathsParts == 1)
 +
        {
 +
            prepare_profile_overview_page(requestID, owner);
 +
            return;
 +
        }
 +
        else if (numOfPathsParts == 2)
 +
        {
 +
            key id = (key)llList2String(path, 1);
 +
            prepare_profile_overview_page(requestID, id);
 +
            return;
 +
        }
 +
        else if (numOfPathsParts == 4)
 +
        {
 +
            if (llList2String(path, 2) != "give")
 +
            {
 +
                return;
 +
            }
 +
 
 +
            key id          = (key)llList2String(path, 1);
 +
            string name    = llKey2Name(id);
 +
            string itemName = llUnescapeURL(llList2String(path, 3));
 +
 
 +
            llOwnerSay("Giving '" + itemName + "' to '" + name + "'.");
 +
            llGiveInventory(id, itemName);
 +
            prepare_profile_overview_page(requestID, id);
 +
            return;
 +
        }
 +
    }
 +
    else if (firstPathPart == "anims")
 +
    {
 +
        if (numOfPathsParts == 1)
 +
        {
 +
            anims_page();
 +
            return;
 +
        }
 +
        else if (numOfPathsParts == 2)
 +
        {
 +
            play_anim(llList2String(path, 1));
 +
            anims_page();
 +
            return;
 +
        }
 +
    }
 +
    else if (firstPathPart == "video")
 +
    {
 +
        responseStatus = 200;
 +
        responseBody = header + "<br><iframe width='255' height='173' src='"
 +
                    + video_url + "' frameborder='0' allowfullscreen></iframe>"
 +
                    + footer;
 +
 
 +
        return;
 +
    }
 +
    else if (firstPathPart == "config")
 +
    {
 +
        if (numOfPathsParts == 1)
 +
        {
 +
            config_page();
 +
            return;
 +
        }
 +
        else if (llList2String(path, 1) == "set")
 +
        {
 +
            string queryString = llGetHTTPHeader(requestID, "x-query-string");
 +
            list args          = llParseString2List(queryString, ["="], ["&"]);
 +
 
 +
            integer index      = -llGetListLength(args);
 +
            while (index)
 +
            {
 +
                string variable = llList2String(args, index);
 +
                string value    = llUnescapeURL(llList2String(args, index + 1));
 +
 
 +
                if (variable == "video")
 +
                {
 +
                    video_url = value;
 +
                }
 +
 
 +
//              because: var, val, &, var, val, &, ...
 +
                index += 3;
 +
            }
 +
            config_page();
 +
        }
 +
    }
 +
 
 +
    responseStatus = 404;
 +
    responseBody = header + "<h1>404 Page Not Found.</h1>" + footer;
 +
    throw_exception("There has been a HTTP-request to a non-existant page on "
 +
                    + "your HUD's website. Please check the path of the request "
 +
                    + "for mistakes.");
 
}
 
}
  
string bytes2str(integer b)
+
//  user-function: prepare_profile_overview_page
 +
//  - does not return anything
 +
//  - prepares a response for a page with information about a certain avatar
 +
//  - includes profile thumbnail, name, script info, give menu
 +
 
 +
prepare_profile_overview_page(key requestID, key id)
 
{
 
{
     if (b < 1024 * 1024) return (string)(b / 1024) + "KB";
+
     list avatarDetails = llGetObjectDetails(id, [
    return (string)(b / (1024 * 1024)) + "MB";
+
                                    OBJECT_POS, OBJECT_TOTAL_SCRIPT_COUNT,
 +
                                    OBJECT_SCRIPT_MEMORY, OBJECT_SCRIPT_TIME]);
 +
 
 +
    responseStatus = 200;
 +
    responseBody = header + "<table border='0' cellspacing='1' cellpadding='1'>"
 +
                + "<tr><td colspan='2' style='white-space:nowrap'><div class='"
 +
                + "profile_title'><h1 id='display_name'>"
 +
                + html_body_with_formatted_avatar_name(id) + "</h1><h2 id='"
 +
                + "username'>" + llGetUsername(id) + "</h2></div></td><td>"
 +
                + "<div align='right'>"
 +
                + html_body_with_links_for_interaction_with_certain_avatar(id)
 +
                + "<br>" + html_body_with_inventory_overview_for_give_menu(id)
 +
                + "</div></td></tr><tr><td width='80'>"
 +
                + html_body_avatar_profile_pic_thumbnail(id)
 +
                + "</td><td colspan='2'><ul style='list-style-type:circle'>"
 +
                + "<li>Scripts:<ul style='list-style-type:disc;margin-left:"
 +
                + "10px'><li>" + (string)llList2Integer(avatarDetails, 1)
 +
                + " total</li><li>" + bytes2str(llList2Integer(avatarDetails, 2))
 +
                + "</li><li>"
 +
                + (string)((integer)(llList2Float(avatarDetails, 3) * 1000000.0))
 +
                + "us</li></ul></li></ul></td></tr></table>" + footer;
 
}
 
}
  
string img_html(key agent)
+
//  user-function: html_body_with_formatted_avatar_name
 +
//  - returns the name of the avatar in html format
 +
//  - removes the lastname if it is Resident
 +
//  - adds a line-break for long names
 +
 
 +
string html_body_with_formatted_avatar_name(key id)
 
{
 
{
     return "<a href='" + app_profile_url(agent) + "' class='avatar avatar_thumb' rel='#sl_image_zoom' title='Click to zoom'><img alt='Thumb_sl_image' src='https://my-secondlife.s3.amazonaws.com/users/" + llGetUsername(agent) + "/sl_image.png' /></a>";
+
     string stringToReturn = llKey2Name(id);
 +
 
 +
    if (llGetSubString(stringToReturn, -9, -1) == " Resident")
 +
    {
 +
        stringToReturn = llDeleteSubString(stringToReturn, -9, -1);
 +
    }
 +
    if (15 < llStringLength(stringToReturn))
 +
    {
 +
        stringToReturn = llDumpList2String(
 +
                            llParseString2List(stringToReturn,[" "], []),
 +
                            "<br>"
 +
                        );
 +
    }
 +
 
 +
    return stringToReturn;
 
}
 
}
  
string agent_menu_html(key agentid)
+
//  user-function: html_body_with_links_for_interaction_with_certain_avatar
 +
//  - returns html text with links for an avatar to interact with who has a certain uuid
 +
 
 +
string html_body_with_links_for_interaction_with_certain_avatar(key id)
 
{
 
{
     return "<div class='menu_button'>"
+
     return "<div class='menu_button'><a class='button call_to_action'>Options"
        + "<a class='button call_to_action'><b class='actions_dropdown'>&nbsp;</b></a>"
+
         + "</a><ul style='list-style-type:none;text-align:left' class='menu'>"
         + "<ul style='list-style-type:none;text-align:left' class='menu'>"
+
         + "<li><a href='secondlife:///app/agent/" + (string)id + "/im'>IM</a>"
         + "<li><a href='secondlife:///app/agent/" + (string)agentid + "/im'>IM</a></li>"
+
         + "</li><li><a href='secondlife:///app/agent/" + (string)id
         + "<li><a href='secondlife:///app/agent/" + (string)agentid + "/offerteleport'>Offer Teleport</a></li>"
+
        + "/offerteleport'>Offer Teleport</a></li><li><a href='secondlife:///"
        + "<li><a href='secondlife:///app/maptrackavatar/" + (string)agentid + "'>Map</a></li>"
+
        + "app/maptrackavatar/" + (string)id + "'>Map</a></li><li><a href='"
        + "<li><a href='secondlife:///app/sharewithavatar/" + (string)agentid + "'>Share</a></li>"
+
        + "secondlife:///app/sharewithavatar/" + (string)id + "'>Share</a></li>"
         + "<li><a href='secondlife:///app/agent/" + (string)agentid + "/pay'>Pay</a></li></ul></div>";
+
         + "<li><a href='secondlife:///app/agent/" + (string)id + "/pay'>Pay</a>"
 +
        + "</li></ul></div>";
 
}
 
}
  
string give_list(key agentid, integer type)
+
//  user-function: html_body_with_inventory_overview_for_give_menu
 +
//  - returns html text with inventory item lists
 +
 
 +
string html_body_with_inventory_overview_for_give_menu(key id)
 
{
 
{
     string resp;
+
     string stringToReturn = "<div class='menu_button'><a class='button "
     integer n = llGetInventoryNumber(type);
+
        + "call_to_action'>Give</a><ul style='list-style-type:none;text-align:"
     integer i;
+
        + "left;white-space:nowrap' class='menu'>";
     for (i=0;i<n;++i)
+
 
 +
     integer sizeOfStringBefore = llStringLength(stringToReturn);
 +
 
 +
     stringToReturn += inventory_list_in_html_format_for_give_menu(id, INVENTORY_NOTECARD);
 +
     stringToReturn += inventory_list_in_html_format_for_give_menu(id, INVENTORY_OBJECT);
 +
 
 +
    if (llStringLength(stringToReturn) == sizeOfStringBefore)
 
     {
 
     {
         resp += "<li><a href='agent/" + (string)agentid + "/give/" + llGetInventoryName(type,i) + "'>" + llGetInventoryName(type,i) + "</a></li>";
+
         stringToReturn += "<li>(no objects or notecards found)</li>";
 
     }
 
     }
     return resp;
+
 
 +
    stringToReturn += "</ul></div>";
 +
     return stringToReturn;
 
}
 
}
  
string give_menu_html(key agentid)
+
//  user-function: bytes2str
 +
//  - returns a string with script memory info in readable format
 +
 
 +
string bytes2str(integer bytes)
 
{
 
{
    string resp = "<div class='menu_button'>"
+
// 1024² = 1048576
        + "<a class='button call_to_action'>Give</a>"
+
        + "<ul style='list-style-type:none;text-align:left;white-space:nowrap' class='menu'>";
+
   
+
    // Give notecards and objects.
+
    resp += give_list(agentid,INVENTORY_NOTECARD);
+
    resp += give_list(agentid,INVENTORY_OBJECT);
+
  
     resp += "</ul></div>";
+
     if (bytes < 1048576)
    return resp;
+
        return (string)(bytes / 1024) + " KB";
 +
//  else
 +
        return (string)(bytes / 1048576) + " MB";
 
}
 
}
  
agent_details(key request, key agent)
+
//  user-function: html_body_avatar_profile_pic_thumbnail
 +
//  - returns html text with urls to someone's profile pic
 +
 
 +
string html_body_avatar_profile_pic_thumbnail(key id)
 
{
 
{
     // Get the details we want.
+
     return "<a href='secondlife:///app/agent/" + (string)id + "/about' class='"
    list r = llGetObjectDetails(agent,[OBJECT_POS,OBJECT_TOTAL_SCRIPT_COUNT,OBJECT_SCRIPT_MEMORY,OBJECT_SCRIPT_TIME]);
+
        + "avatar avatar_thumb' rel='#sl_image_zoom' title='Click to zoom'"
 +
        + "<img alt='Thumb_sl_image' src='https://my-secondlife.s3.amazonaws"
 +
        + ".com/users/" + llGetUsername(id) + "/sl_image.png' /></a>";
 +
}
  
    // Build the html.
+
// user-function: inventory_list_in_html_format_for_give_menu
    string resp = header + "<table border='0' cellspacing='1' cellpadding='1'>"
+
// - returns html text with inventory item list of given type
        + "<tr><td colspan='2' style='white-space:nowrap'><div class='profile_title'>"
+
        +  "<h1 id='display_name'>" + llKey2Name(agent) + "</h1>"
+
        +  "<h2 id='username'>" + llGetUsername(agent) + "</h2>"
+
        + "</div></td><td><div align='right'>" + agent_menu_html(agent) + "<br>" + give_menu_html(agent) + "</div></td></tr>"
+
        + "<tr><td width='80'>" + img_html(agent) + "</td><td colspan='2'>"
+
        +  "<ul style='list-style-type:circle'>"
+
        +  "<li>Scripts:"
+
        +      "<ul style='list-style-type:disc;margin-left:10px'>"
+
        +      "<li>" + (string)llList2Integer(r,1) + " total</li>"
+
        +      "<li>" + bytes2str(llList2Integer(r,2)) + "</li>"
+
        +      "<li>" + (string)((integer)(llList2Float(r,3) * 1000000.0)) + "us</li>"
+
        +  "</ul></li></ul></td></tr></table>" + footer;
+
   
+
    // Send the response.
+
    llSetContentType(current_request, CONTENT_TYPE_HTML);
+
    llHTTPResponse(current_request,200,resp);
+
  
     //llOwnerSay("Memory used: " + (string)llGetUsedMemory() + ", response size: " + (string)llStringLength(resp));
+
string inventory_list_in_html_format_for_give_menu(key id, integer type)
 +
{
 +
     string stringToReturn;
 +
 
 +
    integer index = llGetInventoryNumber(type);
 +
    while (index)
 +
    {
 +
        --index;
 +
 
 +
        string name = llGetInventoryName(type, index);
 +
 
 +
        stringToReturn += "<li><a href='agent/" + (string)id + "/give/" + name
 +
                      + "'>" + name + "</a></li>";
 +
    }
 +
 
 +
    return stringToReturn;
 
}
 
}
  
string anim_menu_html()
+
//  user-function: anims_page
 +
//  - does not return anything
 +
//  - prepares an html text overview page of animations
 +
 
 +
anims_page()
 
{
 
{
     string resp = "<div class='menu_button' style='align:center'>"
+
    responseStatus = 200;
        + "<a class='button call_to_action'>Animate<b class='actions_dropdown'>&nbsp;</b></a>"
+
    responseBody  = header + "<h1>Animations</h1><h2>Choose an animation:</h2>"
        + "<ul style='list-style-type:none;text-align:left' class='menu'>";
+
                  + "<div style='margin-left:40px'>"
 +
                  + html_body_animations_overview() + "</div><br><br>" + footer;
 +
}
 +
 
 +
//  user-function: html_body_animations_overview
 +
//  - returns html text with a list of included animations
 +
 
 +
string html_body_animations_overview()
 +
{
 +
     string stringToReturn = "<div class='menu_button' style='align:center'>"
 +
                          + "<a class='button call_to_action'>Animate<b class="
 +
                          + "'actions_dropdown'>&nbsp;</b></a><ul style='"
 +
                          + "list-style-type:none;text-align:left' class='menu'>";
 +
 
 +
    integer index = llGetInventoryNumber(INVENTORY_ANIMATION);
  
    integer n = llGetInventoryNumber(INVENTORY_ANIMATION);
+
     if (!index)
     if (n == 0)
+
 
     {
 
     {
         resp += "<li>(no animations found)</li>";
+
         stringToReturn += "<li>(no animations found)</li>";
 
     }
 
     }
     else
+
     else while (index)
 
     {
 
     {
         integer i;
+
         --index;
         for(i=0;i<n;++i)
+
 
         {
+
         string name = llGetInventoryName(INVENTORY_ANIMATION, index);
            resp += "<li><a href='anims/" + llGetInventoryName(INVENTORY_ANIMATION,i) + "'>" + llGetInventoryName(INVENTORY_ANIMATION,i) + "</a></li>";
+
 
        }
+
         stringToReturn += "<li><a href='anims/" + name + "'>" + name + "</a></li>";
 
     }
 
     }
  
     resp += "</ul></div>";
+
     stringToReturn += "</ul></div>";
     return resp;
+
 
 +
     return stringToReturn;
 
}
 
}
 +
 +
//  user-function: play_anim
 +
//  - does not return anything
 +
//  - prompts a perms request to animate owner
  
 
play_anim(string anim)
 
play_anim(string anim)
 
{
 
{
     llRequestPermissions(llGetOwner(),PERMISSION_TRIGGER_ANIMATION);
+
     llRequestPermissions(owner, PERMISSION_TRIGGER_ANIMATION);
     llStartAnimation(llUnescapeURL(anim));
+
     currentAnimation = llUnescapeURL(anim);
 
}
 
}
  
anims_page()
+
//  user-function: config_page
 +
//  - does not return anything
 +
//  - prepares page to configure youtube video link
 +
 
 +
config_page()
 
{
 
{
     string resp = header + "<h1>Animations</h1><h2>Choose an animation:</h2>"
+
     responseStatus = 200;
    + "<div style='margin-left:40px'>" + anim_menu_html() + "</div><br><br>" + footer;
+
    responseBody = header + "<h1>Options:</h1><form action='config/set' method='"
    llSetContentType(current_request, CONTENT_TYPE_HTML);
+
                + "get'>Video URL: <input type='text' name='video' value='"
    llHTTPResponse(current_request,200,resp);
+
                + video_url + "' /><input type='submit' value='Set' /></form>"
 +
                + footer;
 
}
 
}
  
// Process a get request with a path.
+
// user-function: throw_exception
GET(key request, list path)
+
//  - does not return anything
 +
//  - logs errors into cache for later viewing and debugging
 +
 
 +
throw_exception(string inputString)
 
{
 
{
    current_request = request;
+
     if (exceptions == "")
    integer path_segments = llGetListLength(path);
+
     if (path_segments == 0)
+
 
     {
 
     {
         // Home page.
+
         exceptions = "The following un-handled exception(s) occurred that are "
        llSensor("",NULL_KEY,AGENT,96,PI);
+
                  + "preventing this device's operation:\n";
        return;
+
 
     }
 
     }
   
 
    string p0 = llList2String(path,0);
 
    if (p0 == "agent")
 
    {
 
        if (path_segments == 1)
 
        {
 
            // just /agent lets show stuff for the owner.
 
            agent_details(request,llGetOwner());
 
            return;
 
        }
 
       
 
        // p1 should be an agent id
 
        key agent = (key)llList2String(path,1);
 
  
        if (path_segments == 2)
+
    exceptions += "\t"+inputString+"\n";
        {
+
}
            // Just an agent id. Get their info.
+
 
            agent_details(request,agent);
+
default
            return;
+
{
        }
+
     on_rez(integer start_param)
        else if (path_segments == 4)
+
        {
+
            // agent/<id>/<cmd>/<option>
+
            string p2 = llList2String(path,2);
+
            if (p2 == "give")
+
            {
+
                string p3 = llUnescapeURL(llList2String(path,3));
+
                llOwnerSay("Giving " + p3 + " to " + llKey2Name((key)agent));
+
                llGiveInventory(agent,p3);
+
                agent_details(request,agent);
+
                return;
+
            }
+
        }
+
     }
+
    else if (p0 == "hide")
+
 
     {
 
     {
         llSensor("",NULL_KEY,AGENT,96,PI);
+
         release_url();
         toggle_show();
+
         llResetScript();
 
     }
 
     }
     else if (p0 == "anims")
+
 
 +
     changed(integer change)
 
     {
 
     {
         if (path_segments == 1)
+
         if (change & (CHANGED_OWNER | CHANGED_INVENTORY))
 
         {
 
         {
             anims_page();
+
             release_url();
 +
            llResetScript();
 
         }
 
         }
         else if (path_segments == 2)
+
 
 +
         if (change & (CHANGED_REGION | CHANGED_REGION_START | CHANGED_TELEPORT))
 
         {
 
         {
             play_anim(llList2String(path,1));
+
             request_secure_url();
            anims_page();
+
 
         }
 
         }
 
     }
 
     }
    else if (p0 == "video")
 
    {
 
        string resp = header
 
            + "<br><iframe width='255' height='173' src='http://www.youtube.com/embed/m7p9IEpPu-c?rel=0' frameborder='0' allowfullscreen></iframe>" + footer;
 
        llSetContentType(current_request, CONTENT_TYPE_HTML);
 
        llHTTPResponse(current_request,200,resp);
 
    }
 
}
 
  
default
 
{
 
 
     state_entry()
 
     state_entry()
 
     {
 
     {
         llSetObjectName(llKey2Name(llGetOwner()) + "'s HUD");
+
         init();
        llSetLinkPrimitiveParamsFast(link,init);
+
        toggle_show();
+
        //llOwnerSay(llList2CSV(llGetLinkPrimitiveParams(2,[PRIM_POS_LOCAL])));
+
        //llSetColor(<1,0,0>,button_face);
+
        llRequestURL();
+
 
     }
 
     }
  
     on_rez(integer n) { llResetScript();}
+
     touch_start(integer num_detected)
    changed(integer c)
+
 
     {
 
     {
         if (c & (CHANGED_TELEPORT | CHANGED_OWNER | CHANGED_REGION)) { llResetScript();}
+
         toggle_visibility_of_HUD_button();
 
     }
 
     }
   
+
 
    touch_start(integer total_number)
+
    {
+
        toggle_show();
+
    }
+
   
+
 
     http_request(key id, string method, string body)
 
     http_request(key id, string method, string body)
 
     {
 
     {
         //llOwnerSay(method + ": "  + llGetHTTPHeader(id,"x-path-info"));
+
         responseStatus = 400;
 +
        responseBody  = "Unsupported method";
 +
 
 
         if (method == URL_REQUEST_GRANTED)
 
         if (method == URL_REQUEST_GRANTED)
 
         {
 
         {
             my_url = body;
+
             responseStatus = 200;
             set_footer();
+
             responseBody  = "OK";
            set_header();
+
 
             set_media(my_url);
+
             set_link_media(body);
            return;
+
 
         }
 
         }
 
         else if (method == URL_REQUEST_DENIED)
 
         else if (method == URL_REQUEST_DENIED)
 
         {
 
         {
             llOwnerSay("Unable to get url: " + body);
+
             responseBody  = "Bad request";
            llSleep(10);
+
 
            llRequestURL();
+
            throw_exception("The following error occurred while attempting to "
            return;
+
                            + "get a free URL for this device:\n \n" + body);
 
         }
 
         }
          
+
         else if (method == "GET")
        if (method == "GET")
+
 
         {
 
         {
             list path = llParseString2List(llGetHTTPHeader(id,"x-path-info"),["/"],[]);
+
             responseStatus = 200;
             GET(id,path);
+
            responseBody  = "GET";
             return;
+
 
 +
            string pathInfoHeader = llGetHTTPHeader(id, "x-path-info");
 +
            list path            = llParseString2List(pathInfoHeader, ["/"], []);
 +
 
 +
             if (path == [])
 +
            {
 +
                currentRequestID = id;
 +
 
 +
                list    agents = llGetAgentList(scope, []);
 +
                integer index  = llGetListLength(agents);
 +
 
 +
                if (!index)
 +
                {
 +
                    responseBody  = header + "<h2>Scan Results:</h2><ul style='"
 +
                                  + "list-style-type:circle;margin-left:20px'><li>No one "
 +
                                  + "near by.</li><li>Owner: <a href='agent/" + (string)owner
 +
                                  + "'>" + ownerName + "</a></li></ul>" + footer;
 +
                }
 +
                else
 +
                {
 +
                    responseBody  = header + "<h2>Scan Results:</h2><ul style='"
 +
                                  + "list-style-type:circle;margin-left:20px'>";
 +
 
 +
                    while (index)
 +
                    {
 +
                        --index;
 +
 
 +
                        key agent = llList2Key(agents, index);
 +
 
 +
                        responseBody += "<li><a href='agent/" + (string)agent + "'>"
 +
                                    + html_body_with_formatted_avatar_name(agent) + "</a></li>";
 +
                    }
 +
 
 +
                    responseBody += "</ul>" + footer;
 +
                }
 +
 
 +
                lastPath = [];
 +
            }
 +
            else
 +
            {
 +
                http_get(id, path);
 +
             }
 +
        }
 +
 
 +
        llSetContentType(id, CONTENT_TYPE_HTML);
 +
        llHTTPResponse(id, responseStatus, responseBody);
 +
 
 +
        if (exceptions != "")
 +
        {
 +
            state error;
 
         }
 
         }
       
 
        llHTTPResponse(id,400,"Unsupported method.");
 
        return;
 
 
     }
 
     }
   
+
 
     sensor(integer n)
+
     run_time_permissions(integer perm)
 
     {
 
     {
        string resp = header + "<h2>Scan Results:</h2><ul style='list-style-type:circle;margin-left:20px'>";
+
         if (perm & PERMISSION_TRIGGER_ANIMATION)
       
+
        // TODO: Only fits 14 right now. Figure out how to fit all 16. Figure out how to find more than 16.
+
         if (n > 14) n = 14;
+
        for (--n; n >= 0; --n)
+
 
         {
 
         {
             resp += "<li><a href='agent/" + (string)llDetectedKey(n) + "'>" + llDetectedName(n) + "</a></li>";
+
             llStartAnimation(currentAnimation);
 +
        }
 +
        else
 +
        {
 +
            throw_exception("This HUD has tried to animate your avatar WITHOUT "
 +
                            + "having the permissions to do so. You must grant this HUD "
 +
                            + "permissions to animate your avatar for this feature to work.");
 +
        }
 +
 
 +
        if (exceptions != "")
 +
        {
 +
            state error;
 
         }
 
         }
        resp += "</ul>" + footer;
 
        llSetContentType(current_request, CONTENT_TYPE_HTML);
 
        llHTTPResponse(current_request,200,resp);
 
 
     }
 
     }
   
+
 
     no_sensor()
+
     state_exit()
 
     {
 
     {
         string resp = header + "<h2>Scan Results:</h2> <ul style='list-style-type:circle;margin-left:20px'>";
+
         release_url();
        resp += "<li>No one near by.</li>";
+
        resp += "<li>Owner: <a href='agent/" + (string)llGetOwner() + "'>" + llKey2Name(llGetOwner()) + "</a></li>";
+
        resp += "</ul>" + footer;
+
        llSetContentType(current_request, CONTENT_TYPE_HTML);
+
        llHTTPResponse(current_request,200,resp);
+
 
     }
 
     }
 
}
 
}
</lsl>
+
 
 +
state error
 +
{
 +
    on_rez(integer start_param)
 +
    {
 +
        llResetScript();
 +
    }
 +
 
 +
    changed(integer change)
 +
    {
 +
        if (change & (CHANGED_OWNER | CHANGED_INVENTORY))
 +
        {
 +
            llResetScript();
 +
        }
 +
    }
 +
 
 +
    state_entry()
 +
    {
 +
        llOwnerSay("========== ERROR REPORT START ==========");
 +
        llOwnerSay(exceptions);
 +
        llOwnerSay("========== ERROR REPORT END ==========");
 +
        llOwnerSay("Resetting now...");
 +
        llResetScript();
 +
    }
 +
}
 +
</source>
 +
 
 +
[[#top|Go to top!]]

Latest revision as of 14:49, 22 January 2015

TODO:

  • Suggest a Stop All Animations button be added to Animations selection frame for convenience.

HTML HUD Demo:

Screenshot:

screenshots

Tip:

KBtip2.png Tip: This HUD might take a second or two to load when switching from 'closed' to 'open' mode.

Source code:

//  HTML-based, single script HUD
//
//  original by Kelly Linden
//
//  To use:
//  - create a default prim (cube)
//  - wear it as a HUD on top_left (script needs tweaking for other attachment points)
//  - edit the cube while wearing
//  - add animations you want to use
//  - add notecards and objects you want to hand out
//  - add this script
//
//  License:
//    This script itself is free to share, modify and use without restriction.
//    Any linked or referenced files are not included in this license and are
//    licensed by their respective owners under their own respective copyright
//    and other licenses.
 
key     owner;
string  ownerName;
 
integer scope;
 
string  url;
 
key     currentRequestID;
 
integer responseStatus;
string  responseBody;
 
list    lastPath;
 
string  video_url;
 
string  header;
string  footer;
 
string  currentAnimation;
 
integer isVisible;
 
string  exceptions;
 
//  user-function: init
//  - does not return anything
//  - sets initial variable values
//  - sets object's name and textures
//  - request a url to use the HUD
 
init()
{
    owner     = llGetOwner();
    ownerName = llKey2Name(owner);
    llSetObjectName("HTML HUD");
 
    scope = AGENT_LIST_PARCEL;
 
    video_url = "http://www.youtube.com/embed/m7p9IEpPu-c?rel=0";
 
//  header set in set_link_media(url)
//  footer set in set_link_media(url)
 
    float   FLOAT_FALSE      = 0.0;
    vector  RATIO_ONE_BY_ONE = <0.98, 0.98, 0.00>;//  fix Second Life ... or try to!
 
    llSetLinkPrimitiveParamsFast(LINK_THIS, [
        PRIM_TEXTURE, ALL_SIDES, TEXTURE_BLANK,                          RATIO_ONE_BY_ONE, ZERO_VECTOR, FLOAT_FALSE,
        PRIM_TEXTURE, 2,         "0b815b79-c8f5-fc98-91fc-e77b53a468e2", RATIO_ONE_BY_ONE, ZERO_VECTOR, FLOAT_FALSE]);
 
    toggle_visibility_of_HUD_button();
    request_secure_url();
}
 
//  user-function: toggle_visibility_of_HUD_button
//  - does not return anything
//  - toggle the visibility of the prim
//  - will rotate, position and scale the prim
 
toggle_visibility_of_HUD_button()
{
    if (isVisible)
    {
        llSetLinkPrimitiveParamsFast(LINK_THIS, [
            PRIM_POS_LOCAL, <0.0, -0.13, -0.13>,
            PRIM_ROT_LOCAL, <0.0, 0.0, 0.0, 1.0>,
            PRIM_SIZE, <0.01, 0.25, 0.25>]);
    }
    else
    {
        llSetLinkPrimitiveParamsFast(LINK_THIS, [
            PRIM_POS_LOCAL, <0.0, -0.04, -0.04>,
            PRIM_ROT_LOCAL, <0.0, 0.0, -1.0, 0.0>,
            PRIM_SIZE, <0.05, 0.05, 0.05>]);
    }
 
    isVisible = !isVisible;
}
 
//  user-function: drop and clear the old url
//  - does not return anything
 
release_url()
{
    llReleaseURL(url);
    url = "";
}
 
//  user-function: request secure url
//  - does not return anything
//  - make sure we release the old url before requesting a new one
 
request_secure_url()
{
    release_url();
    currentRequestID = llRequestSecureURL();
}
 
//  user-function: set_link_media
//  - does not return anything
//  - set the values for the string variables 'header' and 'footer'
//  - prepare face 4 for media on a prim
 
set_link_media(string scriptUrl)
{
    url = scriptUrl;
 
    header = "<html><head><link href='https://d1979ns0fqtj19.cloudfront.net/"
        + "assets/common-103828347986224535963905120979424958961.css'"
        + " media='all' rel='stylesheet' type='text/css' />"
        + "<base href='" + scriptUrl + "/' /></head><body>";
 
    footer = "<div align='center' style='position:absolute;top:93%;left:8%;'>"
        + "<a href=''>Scan</a> | <a href='anims'>Anims</a> | <a href='video'>"
        + "Video</a> | <a href='config'>Config</a> | <a href='hide'>Hide</a>"
        + "</div><script src='https://d2mjw3k7q9u8rb.cloudfront.net/assets/"
        + "common-170919042270376442559931151451605602726.js' type='text/"
        + "javascript'></script></body></html>";
 
    llSetLinkMedia(LINK_THIS, 4, [
        PRIM_MEDIA_AUTO_PLAY, TRUE,
        PRIM_MEDIA_CURRENT_URL, url,
        PRIM_MEDIA_HOME_URL, url,
        PRIM_MEDIA_HEIGHT_PIXELS, 256,
        PRIM_MEDIA_WIDTH_PIXELS, 256,
        PRIM_MEDIA_PERMS_CONTROL, PRIM_MEDIA_PERM_NONE]);
}
 
//  user-function:
//  - does not return anything
//  - used if there's not a request to the homepage of our website
//  - check where on the site we are and prepare variables for the response
 
http_get(key requestID, list path)
{
    currentRequestID        = requestID;
 
    integer numOfPathsParts = llGetListLength(path);
    string firstPathPart    = llList2String(path, 0);
 
    if (firstPathPart == "hide")
    {
        toggle_visibility_of_HUD_button();
        http_get(requestID, lastPath);
        return;
    }
 
    lastPath = path;
 
    if (firstPathPart == "agent")
    {
        if (numOfPathsParts == 1)
        {
            prepare_profile_overview_page(requestID, owner);
            return;
        }
        else if (numOfPathsParts == 2)
        {
            key id = (key)llList2String(path, 1);
            prepare_profile_overview_page(requestID, id);
            return;
        }
        else if (numOfPathsParts == 4)
        {
            if (llList2String(path, 2) != "give")
            {
                return;
            }
 
            key id          = (key)llList2String(path, 1);
            string name     = llKey2Name(id);
            string itemName = llUnescapeURL(llList2String(path, 3));
 
            llOwnerSay("Giving '" + itemName + "' to '" + name + "'.");
            llGiveInventory(id, itemName);
            prepare_profile_overview_page(requestID, id);
            return;
        }
    }
    else if (firstPathPart == "anims")
    {
        if (numOfPathsParts == 1)
        {
            anims_page();
            return;
        }
        else if (numOfPathsParts == 2)
        {
            play_anim(llList2String(path, 1));
            anims_page();
            return;
        }
    }
    else if (firstPathPart == "video")
    {
        responseStatus = 200;
        responseBody = header + "<br><iframe width='255' height='173' src='"
                     + video_url + "' frameborder='0' allowfullscreen></iframe>"
                     + footer;
 
        return;
    }
    else if (firstPathPart == "config")
    {
        if (numOfPathsParts == 1)
        {
            config_page();
            return;
        }
        else if (llList2String(path, 1) == "set")
        {
            string queryString = llGetHTTPHeader(requestID, "x-query-string");
            list args          = llParseString2List(queryString, ["="], ["&"]);
 
            integer index      = -llGetListLength(args);
            while (index)
            {
                string variable = llList2String(args, index);
                string value    = llUnescapeURL(llList2String(args, index + 1));
 
                if (variable == "video")
                {
                    video_url = value;
                }
 
//              because: var, val, &, var, val, &, ...
                index += 3;
            }
            config_page();
        }
    }
 
    responseStatus = 404;
    responseBody = header + "<h1>404 Page Not Found.</h1>" + footer;
    throw_exception("There has been a HTTP-request to a non-existant page on "
                    + "your HUD's website. Please check the path of the request "
                    + "for mistakes.");
}
 
//  user-function: prepare_profile_overview_page
//  - does not return anything
//  - prepares a response for a page with information about a certain avatar
//  - includes profile thumbnail, name, script info, give menu
 
prepare_profile_overview_page(key requestID, key id)
{
    list avatarDetails = llGetObjectDetails(id, [
                                    OBJECT_POS, OBJECT_TOTAL_SCRIPT_COUNT,
                                    OBJECT_SCRIPT_MEMORY, OBJECT_SCRIPT_TIME]);
 
    responseStatus = 200;
    responseBody = header + "<table border='0' cellspacing='1' cellpadding='1'>"
                 + "<tr><td colspan='2' style='white-space:nowrap'><div class='"
                 + "profile_title'><h1 id='display_name'>"
                 + html_body_with_formatted_avatar_name(id) + "</h1><h2 id='"
                 + "username'>" + llGetUsername(id) + "</h2></div></td><td>"
                 + "<div align='right'>"
                 + html_body_with_links_for_interaction_with_certain_avatar(id)
                 + "<br>" + html_body_with_inventory_overview_for_give_menu(id)
                 + "</div></td></tr><tr><td width='80'>"
                 + html_body_avatar_profile_pic_thumbnail(id)
                 + "</td><td colspan='2'><ul style='list-style-type:circle'>"
                 + "<li>Scripts:<ul style='list-style-type:disc;margin-left:"
                 + "10px'><li>" + (string)llList2Integer(avatarDetails, 1)
                 + " total</li><li>" + bytes2str(llList2Integer(avatarDetails, 2))
                 + "</li><li>"
                 + (string)((integer)(llList2Float(avatarDetails, 3) * 1000000.0))
                 + "us</li></ul></li></ul></td></tr></table>" + footer;
}
 
//  user-function: html_body_with_formatted_avatar_name
//  - returns the name of the avatar in html format
//  - removes the lastname if it is Resident
//  - adds a line-break for long names
 
string html_body_with_formatted_avatar_name(key id)
{
    string stringToReturn = llKey2Name(id);
 
    if (llGetSubString(stringToReturn, -9, -1) == " Resident")
    {
        stringToReturn = llDeleteSubString(stringToReturn, -9, -1);
    }
    if (15 < llStringLength(stringToReturn))
    {
        stringToReturn = llDumpList2String(
                            llParseString2List(stringToReturn,[" "], []),
                            "<br>"
                         );
    }
 
    return stringToReturn;
}
 
//  user-function: html_body_with_links_for_interaction_with_certain_avatar
//  - returns html text with links for an avatar to interact with who has a certain uuid
 
string html_body_with_links_for_interaction_with_certain_avatar(key id)
{
    return "<div class='menu_button'><a class='button call_to_action'>Options"
        + "</a><ul style='list-style-type:none;text-align:left' class='menu'>"
        + "<li><a href='secondlife:///app/agent/" + (string)id + "/im'>IM</a>"
        + "</li><li><a href='secondlife:///app/agent/" + (string)id
        + "/offerteleport'>Offer Teleport</a></li><li><a href='secondlife:///"
        + "app/maptrackavatar/" + (string)id + "'>Map</a></li><li><a href='"
        + "secondlife:///app/sharewithavatar/" + (string)id + "'>Share</a></li>"
        + "<li><a href='secondlife:///app/agent/" + (string)id + "/pay'>Pay</a>"
        + "</li></ul></div>";
}
 
//  user-function: html_body_with_inventory_overview_for_give_menu
//  - returns html text with inventory item lists
 
string html_body_with_inventory_overview_for_give_menu(key id)
{
    string stringToReturn = "<div class='menu_button'><a class='button "
        + "call_to_action'>Give</a><ul style='list-style-type:none;text-align:"
        + "left;white-space:nowrap' class='menu'>";
 
    integer sizeOfStringBefore = llStringLength(stringToReturn);
 
    stringToReturn += inventory_list_in_html_format_for_give_menu(id, INVENTORY_NOTECARD);
    stringToReturn += inventory_list_in_html_format_for_give_menu(id, INVENTORY_OBJECT);
 
    if (llStringLength(stringToReturn) == sizeOfStringBefore)
    {
        stringToReturn += "<li>(no objects or notecards found)</li>";
    }
 
    stringToReturn += "</ul></div>";
    return stringToReturn;
}
 
//  user-function: bytes2str
//  - returns a string with script memory info in readable format
 
string bytes2str(integer bytes)
{
//  1024² = 1048576
 
    if (bytes < 1048576)
        return (string)(bytes / 1024) + " KB";
//  else
        return (string)(bytes / 1048576) + " MB";
}
 
//  user-function: html_body_avatar_profile_pic_thumbnail
//  - returns html text with urls to someone's profile pic
 
string html_body_avatar_profile_pic_thumbnail(key id)
{
    return "<a href='secondlife:///app/agent/" + (string)id + "/about' class='"
        + "avatar avatar_thumb' rel='#sl_image_zoom' title='Click to zoom'"
        + "<img alt='Thumb_sl_image' src='https://my-secondlife.s3.amazonaws"
        + ".com/users/" + llGetUsername(id) + "/sl_image.png' /></a>";
}
 
//  user-function: inventory_list_in_html_format_for_give_menu
//  - returns html text with inventory item list of given type
 
string inventory_list_in_html_format_for_give_menu(key id, integer type)
{
    string stringToReturn;
 
    integer index = llGetInventoryNumber(type);
    while (index)
    {
        --index;
 
        string name = llGetInventoryName(type, index);
 
        stringToReturn += "<li><a href='agent/" + (string)id + "/give/" + name
                       + "'>" + name + "</a></li>";
    }
 
    return stringToReturn;
}
 
//  user-function: anims_page
//  - does not return anything
//  - prepares an html text overview page of animations
 
anims_page()
{
    responseStatus = 200;
    responseBody   = header + "<h1>Animations</h1><h2>Choose an animation:</h2>"
                   + "<div style='margin-left:40px'>"
                   + html_body_animations_overview() + "</div><br><br>" + footer;
}
 
//  user-function: html_body_animations_overview
//  - returns html text with a list of included animations
 
string html_body_animations_overview()
{
    string stringToReturn = "<div class='menu_button' style='align:center'>"
                          + "<a class='button call_to_action'>Animate<b class="
                          + "'actions_dropdown'>&nbsp;</b></a><ul style='"
                          + "list-style-type:none;text-align:left' class='menu'>";
 
    integer index = llGetInventoryNumber(INVENTORY_ANIMATION);
 
    if (!index)
    {
        stringToReturn += "<li>(no animations found)</li>";
    }
    else while (index)
    {
        --index;
 
        string name = llGetInventoryName(INVENTORY_ANIMATION, index);
 
        stringToReturn += "<li><a href='anims/" + name + "'>" + name + "</a></li>";
    }
 
    stringToReturn += "</ul></div>";
 
    return stringToReturn;
}
 
//  user-function: play_anim
//  - does not return anything
//  - prompts a perms request to animate owner
 
play_anim(string anim)
{
    llRequestPermissions(owner, PERMISSION_TRIGGER_ANIMATION);
    currentAnimation = llUnescapeURL(anim);
}
 
//  user-function: config_page
//  - does not return anything
//  - prepares page to configure youtube video link
 
config_page()
{
    responseStatus = 200;
    responseBody = header + "<h1>Options:</h1><form action='config/set' method='"
                 + "get'>Video URL: <input type='text' name='video' value='"
                 + video_url + "' /><input type='submit' value='Set' /></form>"
                 + footer;
}
 
//  user-function: throw_exception
//  - does not return anything
//  - logs errors into cache for later viewing and debugging
 
throw_exception(string inputString)
{
    if (exceptions == "")
    {
        exceptions = "The following un-handled exception(s) occurred that are "
                   + "preventing this device's operation:\n";
    }
 
    exceptions += "\t"+inputString+"\n";
}
 
default
{
    on_rez(integer start_param)
    {
        release_url();
        llResetScript();
    }
 
    changed(integer change)
    {
        if (change & (CHANGED_OWNER | CHANGED_INVENTORY))
        {
            release_url();
            llResetScript();
        }
 
        if (change & (CHANGED_REGION | CHANGED_REGION_START | CHANGED_TELEPORT))
        {
            request_secure_url();
        }
    }
 
    state_entry()
    {
        init();
    }
 
    touch_start(integer num_detected)
    {
        toggle_visibility_of_HUD_button();
    }
 
    http_request(key id, string method, string body)
    {
        responseStatus = 400;
        responseBody   = "Unsupported method";
 
        if (method == URL_REQUEST_GRANTED)
        {
            responseStatus = 200;
            responseBody   = "OK";
 
            set_link_media(body);
        }
        else if (method == URL_REQUEST_DENIED)
        {
            responseBody   = "Bad request";
 
            throw_exception("The following error occurred while attempting to "
                            + "get a free URL for this device:\n \n" + body);
        }
        else if (method == "GET")
        {
            responseStatus = 200;
            responseBody   = "GET";
 
            string pathInfoHeader = llGetHTTPHeader(id, "x-path-info");
            list path             = llParseString2List(pathInfoHeader, ["/"], []);
 
            if (path == [])
            {
                currentRequestID = id;
 
                list    agents = llGetAgentList(scope, []);
                integer index  = llGetListLength(agents);
 
                if (!index)
                {
                    responseBody   = header + "<h2>Scan Results:</h2><ul style='"
                                   + "list-style-type:circle;margin-left:20px'><li>No one "
                                   + "near by.</li><li>Owner: <a href='agent/" + (string)owner
                                   + "'>" + ownerName + "</a></li></ul>" + footer;
                }
                else
                {
                    responseBody   = header + "<h2>Scan Results:</h2><ul style='"
                                   + "list-style-type:circle;margin-left:20px'>";
 
                    while (index)
                    {
                        --index;
 
                        key agent = llList2Key(agents, index);
 
                        responseBody += "<li><a href='agent/" + (string)agent + "'>"
                                     + html_body_with_formatted_avatar_name(agent) + "</a></li>";
                    }
 
                    responseBody += "</ul>" + footer;
                }
 
                lastPath = [];
            }
            else
            {
                http_get(id, path);
            }
        }
 
        llSetContentType(id, CONTENT_TYPE_HTML);
        llHTTPResponse(id, responseStatus, responseBody);
 
        if (exceptions != "")
        {
            state error;
        }
    }
 
    run_time_permissions(integer perm)
    {
        if (perm & PERMISSION_TRIGGER_ANIMATION)
        {
            llStartAnimation(currentAnimation);
        }
        else
        {
            throw_exception("This HUD has tried to animate your avatar WITHOUT "
                            + "having the permissions to do so. You must grant this HUD "
                            + "permissions to animate your avatar for this feature to work.");
        }
 
        if (exceptions != "")
        {
            state error;
        }
    }
 
    state_exit()
    {
        release_url();
    }
}
 
state error
{
    on_rez(integer start_param)
    {
        llResetScript();
    }
 
    changed(integer change)
    {
        if (change & (CHANGED_OWNER | CHANGED_INVENTORY))
        {
            llResetScript();
        }
    }
 
    state_entry()
    {
        llOwnerSay("========== ERROR REPORT START ==========");
        llOwnerSay(exceptions);
        llOwnerSay("========== ERROR REPORT END ==========");
        llOwnerSay("Resetting now...");
        llResetScript();
    }
}

Go to top!