aboutsummaryrefslogtreecommitdiffstatshomepage
path: root/onefang's leash holder and 1ring support.lsl
diff options
context:
space:
mode:
Diffstat (limited to 'onefang's leash holder and 1ring support.lsl')
-rw-r--r--onefang's leash holder and 1ring support.lsl31
1 files changed, 20 insertions, 11 deletions
diff --git a/onefang's leash holder and 1ring support.lsl b/onefang's leash holder and 1ring support.lsl
index e9a11e0..b7b34ee 100644
--- a/onefang's leash holder and 1ring support.lsl
+++ b/onefang's leash holder and 1ring support.lsl
@@ -43,7 +43,11 @@ default
43 list input = llParseStringKeepNulls(data, ["|"], []); 43 list input = llParseStringKeepNulls(data, ["|"], []);
44 string domain = llList2String(input, 0); 44 string domain = llList2String(input, 0);
45 if ("URL" == domain) 45 if ("URL" == domain)
46 {
47 list l = llGetObjectDetails(id, [OBJECT_OWNER]);
46 URL = llList2String(input, 1); 48 URL = llList2String(input, 1);
49llOwnerSay(llKey2Name(id) + ", owned by " + llKey2Name(llList2Key(l, 0)) + ", tells me their new URL is " + URL);
50 }
47 } 51 }
48 52
49 http_response(key id, integer status, list metaData, string body) 53 http_response(key id, integer status, list metaData, string body)
@@ -72,22 +76,27 @@ default
72 { 76 {
73 if ("" != URL) 77 if ("" != URL)
74 { 78 {
75 if (change & CHANGED_REGION) 79 string message = llGetRegionName() + "|" + (string) llGetPos();
80
81// llSleep(1.0);
82 if (NULL_KEY != them)
76 { 83 {
77 RequestID = llHTTPRequest(URL, 84 if (change & CHANGED_REGION)
85 {
86 RequestID = llHTTPRequest(URL,
78 [HTTP_METHOD, "POST", HTTP_VERBOSE_THROTTLE, FALSE, HTTP_BODY_MAXLENGTH, 16384], 87 [HTTP_METHOD, "POST", HTTP_VERBOSE_THROTTLE, FALSE, HTTP_BODY_MAXLENGTH, 16384],
79 llEscapeURL("REGION|" + llGetRegionName() + "|" + (string)llGetPos())); 88 llEscapeURL("REGION|" + message));
80 llOwnerSay("Changed region to " + llGetRegionName() + " - " + (string)llGetPos() 89 llOwnerSay("Changed region to " + llGetRegionName() + " - " + (string)llGetPos()
81 + "\n Requesting that " + osKey2Name(them) + " join me."); 90 + "\n Requesting that " + osKey2Name(them) + " join me.");
82 } 91 }
83 else if (change & CHANGED_TELEPORT) 92 else if (change & CHANGED_TELEPORT)
84 { 93 {
85 llSleep(1.0); 94 RequestID = llHTTPRequest(URL,
86 RequestID = llHTTPRequest(URL,
87 [HTTP_METHOD, "POST", HTTP_VERBOSE_THROTTLE, FALSE, HTTP_BODY_MAXLENGTH, 16384], 95 [HTTP_METHOD, "POST", HTTP_VERBOSE_THROTTLE, FALSE, HTTP_BODY_MAXLENGTH, 16384],
88 llEscapeURL("TELEPORT|" + llGetRegionName() + "|" + (string)llGetPos())); 96 llEscapeURL("TELEPORT|" + message));
89 llOwnerSay("Teleported to " + llGetRegionName() + " - " + (string)llGetPos() 97 llOwnerSay("Teleported to " + llGetRegionName() + " - " + (string)llGetPos()
90 + "\n Requesting that " + osKey2Name(them) + " join me."); 98 + "\n Requesting that " + osKey2Name(them) + " join me.");
99 }
91 } 100 }
92 } 101 }
93 } 102 }