Difference between revisions of "User:Opensource Obscure/FFHUD"
m |
m |
||
Line 4: | Line 4: | ||
'''v 0.6 by [[User:Opensource_Obscure|Opensource Obscure]] '''<br> | '''v 0.6 by [[User:Opensource_Obscure|Opensource Obscure]] '''<br> | ||
this code is probably horrible and flawed<br> | |||
use of this script may be a violation of [[Project:Terms_of_Service|ToS]] - help to clearify this [[User_talk:Opensource_Obscure/FFHUD|is welcome]] :) | |||
== How it works == | == How it works == |
Revision as of 10:33, 13 June 2008
LSL Portal | Functions | Events | Types | Operators | Constants | Flow Control | Script Library | Categorized Library | Tutorials |
FFHUD: a simple FriendFeed HUD
v 0.6 by Opensource Obscure
this code is probably horrible and flawed
use of this script may be a violation of ToS - help to clearify this is welcome :)
How it works
- edit script 1 with your FriendFeed account data
- put script 1 in a prim
- put script 2 in another prim
- link the prims
- wear the object as an HUD
________ | | | | 1 | 2 | |___|___|
- touch button 2 to get info about the parcel you're in and agents around
- touch button 1 to publish a post on FriendFeed that includes available info about the parcel (SLURL, name, description, owner/owner group profile image if available)
- say a message on channel 8 to publish a post on FriendFeed with parcel info + your message:
/8 This is my message
script 1/2: FFHUD
This script:
- accepts touch event
- listens on channel 8 for your message
- sends a linkedmessage to script 2 (upon touch event or message on channel 8)
- receives texture uuid from script 2 via linkedmessage
- sends http request to friendfeed (after the linkedmessage from script 2)
<lsl>
// your FriendFeed username are here: https://friendfeed.com/account/api string user=""; // your FriendFeed username string ffkey=""; // your FriendFeed key
string baseurl="@friendfeed.com/api/share"; string text; string url; string message; string desc;
azzera() {
text=""; url=""; message=""; desc = "";
}
string strReplace(string source, string pattern, string replace) {
while (llSubStringIndex(source, pattern) > -1) { integer len = llStringLength(pattern); integer pos = llSubStringIndex(source, pattern); if (llStringLength(source) == len) { source = replace; } else if (pos == 0) { source = replace+llGetSubString(source, pos+len, -1); } else if (pos == llStringLength(source)-len) { source = llGetSubString(source, 0, pos-1)+replace; } else { source = llGetSubString(source, 0, pos-1)+replace+llGetSubString(source, pos+len, -1); } } return source;
}
string regionname()
{
string region=llDumpList2String(llParseString2List(llGetRegionName(),[" "],[]),"+"); return region;
}
string parcelname() {
list lstParcelName=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_NAME]); string a = (string)lstParcelName; string name = llDumpList2String(llParseString2List(a,[" "],[]),"+"); name = strReplace(name,"&","and"); return name;
}
string parceldesc() {
list lstParcelDesc=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_DESC]); string a = (string)lstParcelDesc; if(a != "00000000-0000-0000-0000-000000000000") { desc = llDumpList2String(llParseString2List(a,[" "],[]),"+"); } else { desc = ""; } desc = strReplace(desc,"&","and"); return desc;
}
string slurl() {
string simname = llDumpList2String(llParseString2List(llGetRegionName(),[" "],[]),"+"); string regionname = simname; vector detectedPos = llGetRootPosition(); string sx = (string)llRound(detectedPos.x); string sy = (string)llRound(detectedPos.y); string sz = (string)llRound(detectedPos.z); string url = "http://slurl.com/secondlife/"; url += simname; url += "/" + sx + "/" + sy + "/" + sz ; return url;
}
default {
state_entry() { azzera(); llListen(8, "", llGetOwner(), ""); }
touch_start(integer total_number) { azzera(); llMessageLinked(2, 1, "", NULL_KEY); } listen(integer channel, string name, key id, string message) { azzera(); llMessageLinked(2, 1, "", NULL_KEY); text = "+-+MY MESSAGE:+" + message; text = strReplace(text,"&","and"); }
link_message(integer sender_num, integer num, string str, key id) { string imageurl = "http://secondlife.com/app/image/" + (string)id + "/2"; text = llDumpList2String(llParseString2List(text,[" "],[]),"+"); string post = "http://" + user + ":" + ffkey + baseurl + "?title=" + regionname() + "+-+" + parcelname() + "&link=" + llEscapeURL(slurl()) + "&comment=" + "PARCEL+INFO:+" + parceldesc() + text + "&image0_url=" + llEscapeURL(imageurl); // post = strReplace(post,"&","and"); llHTTPRequest(post, [HTTP_METHOD,"POST"], ""); }
http_response(key request_id, integer status, list metadata, string body) { { llOwnerSay("Message sent to http://friendfeed.com/" + user); } }
}
</lsl>
script 2/2: PARCEL INFO
This script:
- accepts touch event
- gives info via chat about the parcel you're in:
- name
- description
- resident or group that owns it
- how many people are around you right now, their names and a link you can click to directly open their profile
- receives linkedmessages from script 1
- retrieves from web the profile image texture UUID for resident or group that owns the parcel you're in
- sends texture UUID to script 1
<lsl>
string ownerurl = "http://world.secondlife.com/resident/"; string groupurl = "http://world.secondlife.com/group/"; string code1 = "<img alt=\"profile image\" src=\"http://secondlife.com/app/image/"; string code2 = "\" class=\"parcelimg\" />"; key texturedefault = "19920f4f-d667-ab18-7234-af4623b52065"; string desc; float scanradius = 96.0;
string parcelname() {
list lstParcelName=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_NAME]); string a = (string)lstParcelName; string name = llDumpList2String(llParseString2List(a,[" "],[]),"+"); return name;
}
string parceldesc()
{
list lstParcelDesc=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_DESC]); string a = (string)lstParcelDesc; if(a != "00000000-0000-0000-0000-000000000000") { desc = llDumpList2String(llParseString2List(a,[" "],[]),"+") + "+-+"; } else { desc = ""; } return desc;
}
string parcelowner()
{
list lstParcelOwner=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_OWNER]); string uuid = (string)lstParcelOwner; return uuid;
}
string parcelgroup()
{
list lstParcelGroup=llGetParcelDetails(llGetPos(),[PARCEL_DETAILS_GROUP]); string uuid = (string)lstParcelGroup; return uuid;
}
infoparcel()
{
llOwnerSay("parcel name =" + parcelname()); llOwnerSay("parcel desc =" + parceldesc()); llOwnerSay("parcel owner = " + "secondlife:///app/agent/" + parcelowner() + "/about"); llOwnerSay("parcel group = " + "secondlife:///app/group/" + parcelgroup() + "/about"); llSensor("", NULL_KEY, AGENT, scanradius, PI);
}
default
{
state_entry() { llSetTexture(texturedefault, ALL_SIDES); }
link_message(integer sender_num, integer num, string str, key id) { string a = parcelgroup(); if(a == "00000000-0000-0000-0000-000000000000") { llOwnerSay("Proprieta' del resident " + parcelowner()); llHTTPRequest( ownerurl + parcelowner(),[HTTP_METHOD,"GET"],""); } else { llOwnerSay("Proprieta' del gruppo " + parcelgroup()); llHTTPRequest( groupurl + parcelgroup(),[HTTP_METHOD,"GET"],""); } } touch_start(integer total_number) { infoparcel(); } http_response(key req,integer stat, list met, string body) { key texture = (key)llGetSubString(body,llSubStringIndex(body, code1)+llStringLength(code1),llSubStringIndex(body,code2)-3); llSetTexture(texture, ALL_SIDES); llMessageLinked(1, 2, "", texture); } sensor(integer total_number) { llOwnerSay((string)total_number + " avatar" + " in " + (string)scanradius+ " meters"); integer i; for (i = 0; i < total_number; i++) { llOwnerSay(llDetectedName(i) + " > secondlife:///app/agent/" + (string)llDetectedKey(i) + "/about"); } } no_sensor() { llOwnerSay("nobody here right now (radius=" + (string)scanradius + " meters)"); }
}
</lsl>