2007-06-12T01:18:16Z

Emma Nowhere:

{{LSL Header}}
= How to use =
This set of scripts allows you to centrally update objects such as Freeview screens or teleport pads within a region that are configured by notecards or contain modifiable objects or media assets.

Place the UpdateServer script inside a prim along with the objects (notecards, etc.) that you want to broadcast as updates to objects containing the UpdateSubscriber script.

To broadcast an update from the server, click on the server prim, and then click on the "Broadcast" button in the dialog. The "Info" button displays the server's object key and listening channel. The "Purge" button removes all contents from the prim so you can drag new updates objects onto it.

Place the UpdateSubscriber script inside a prim that you want to receive object updates from an UpdateServer. You should have your UpdateServer already set up before adding this script to a prim. At startup the script will broadcast a request for all UpdateServers in the region and output the results to you.

You need to register the subscriber with a specific UpdateServer to enable updates to be received. To do this, type:

/128 UpdateSubscriberRegister <subscriberkey> <serverkey>

where <subscriberkey> is the key of the prin containing the script and <serverkey> is the key shown next to the UpdateServer name that is displayed when this script displays the available UpdateServers in the region. The UpdateSubscriber script will output exact text that you can copy and past into your chat line to do this.

= Note to Sellers! =
Please give some attribution if you use these scripts. Thanks!

= UpdateServer =
//////////////////////////////////////////////////////////////////////////////////////
//
// UpdateServer
// Version 1.0a Release
// By Emma Nowhere
// emma.nowhere@yahoo.com
//
// Place inside a prim along with the objects (notecards, etc.) that you
// want to broadcast as updates to objects containing the UpdateSubscriber
// script.
//
// To broadcast an update, click on the prim, and then click on the "Broadcast"
// button in the dialog.
//
// The "Info" button displays the server's object key and listening channel.
//
// The "Purge" button removes all contents from the prim so you can drag new
// updates objects onto it.
//
//////////////////////////////////////////////////////////////////////////////////////

integer listenChannel = 128;
integer listenHandle = 0;
integer dialogChannel = 52;
integer dialogHandle = 0;
string scriptName;
key serverKey;

list mainMenu = ["Info", "Broadcast", "Purge"];

deleteAllItems() {

integer total = llGetInventoryNumber(INVENTORY_ALL);
integer i;
for (i = 0; i < total; i++) {
string name = llGetInventoryName(INVENTORY_ALL, i);
if (name != scriptName) llRemoveInventory(name);
}
}

integer containsItem(string itemName) {

integer total = llGetInventoryNumber(INVENTORY_ALL);
integer i;
for (i = 0; i < total; i++) {
string name = llGetInventoryName(INVENTORY_ALL, i);
if ((name != scriptName) && (itemName == name)) return TRUE;
}
return FALSE;

}

broadcastAvailableUpdates() {

llSay(0, "Broadcasting available updates...");

integer total = llGetInventoryNumber(INVENTORY_ALL);
integer i;
for (i = 0; i < total; i++) {
string name = llGetInventoryName(INVENTORY_ALL, i);
if (name != scriptName) {
llRegionSay(listenChannel, "UpdateAvailable " + llEscapeURL(name));
llSay(0, "UpdateAvailable item: " + name);
}
}

llSay(0, "Broadcasting complete");

}

showServerInfo() {

llOwnerSay("Update Server key: " + (string)serverKey);

llOwnerSay("Update Server listening on channel #" + (string)listenChannel);

llRegionSay(listenChannel, "UpdateSubscribersQuery " + (string)serverKey);

}

default {

state_entry() {
scriptName = llGetScriptName();
serverKey = llGetKey();

llSetText("Update Server\n" + llGetObjectName() + "\n" + (string)serverKey, <1,0,0>, 1.0);

listenHandle = llListen(listenChannel, "", NULL_KEY, "");

showServerInfo();
}

touch_start(integer num_detected) {
llListenRemove(dialogHandle);
dialogChannel = llFloor(llFrand(-99899.0) - 100);
dialogHandle = llListen(dialogChannel, "", NULL_KEY, "");

integer group = llDetectedGroup(0);
key agent = llDetectedKey(0);
key objectowner = llGetOwner();
if ((objectowner == agent) || group) {
llDialog(agent, "Update Server v1.0a", mainMenu, dialogChannel);
}
}

listen(integer channel, string name, key id, string message)
{

if (channel == dialogChannel) {

llListenRemove(dialogHandle);

if (message == "Broadcast") broadcastAvailableUpdates();

if (message == "Purge") deleteAllItems();

if (message == "Info") showServerInfo();

return;
}

list parsed = llParseString2List(message, [" "], []);
integer l = llGetListLength(parsed);

if ((l == 4) && (llList2String(parsed, 0) == "UpdateRequest")) {

string itemName = llUnescapeURL(llList2String(parsed, 1));
key destination = (key)llList2String(parsed, 2);
key requestServer = (key)llList2String(parsed, 3);

if (requestServer != serverKey) return;

if (containsItem(itemName)) {
llSay(0, "Giving item " + itemName + " to object " + llKey2Name(destination) + " (" + (string)destination + ")");
llGiveInventory(destination, itemName);
}
}
else if (llList2String(parsed, 0) == "UpdateServersQuery") {

llRegionSay(listenChannel, "UpdateServerAvailable " + (string)serverKey);

}
else if ((l == 3) && (llList2String(parsed, 0) == "UpdateSubscriberRegistered")) {

key subscriberUpdateServer = (key)llList2String(parsed, 1);
key subscriberKey = (key)llList2String(parsed, 2);

if (subscriberUpdateServer != serverKey) return;

if (subscriberUpdateServer == serverKey) {

string msg = "UpdateSubscriber " + llKey2Name(subscriberKey) +
" (" + (string)subscriberKey + ") registered to UpdateServer " +
llKey2Name(subscriberUpdateServer) + " (" + (string)subscriberUpdateServer + ")";

llSay(0, msg);
}

}
}

}

= UpdateSubscriber =
//////////////////////////////////////////////////////////////////////////////////////
//
// UpdateSubscriber
// Version 1.0a Release
// By Emma Nowhere
// emma.nowhere@yahoo.com
//
// Place inside a prim that you want to receive object updates from an
// UpdateServer. You should have your UpdateServer already set up
// before adding this script to a prim.
//
// At startup the script will broadcast a request for all UpdateServers
// in the region and output the results to you.
//
// You need to register with a specific UpdateServer to enable updates
// to be received.
//
// To lock onto a specific UpdateServer, type:
//
// /128 UpdateSubscriberRegister <subscriberkey> <serverkey>
//
// where <subscriberkey> is the key of the prin containing the script
// and <serverkey> is the key shown next to the UpdateServer name that is
// displayed when this script displays the available UpdateServers in
// the region.
//
//////////////////////////////////////////////////////////////////////////////////////

integer listenChannel = 128;
integer listenHandle = 0;
string scriptName;
key subscriberKey;
key serverKey;
integer registered = FALSE;

integer containsItem(string itemName) {

integer total = llGetInventoryNumber(INVENTORY_ALL);
integer i;
for (i = 0; i < total; i++) {
string name = llGetInventoryName(INVENTORY_ALL, i);
if ((name != scriptName) && (itemName == name)) return TRUE;
}
return FALSE;
}

default {

state_entry() {

scriptName = llGetScriptName();
subscriberKey = llGetKey();

llOwnerSay("UpdateSubscriber installed in object " + llGetObjectName() + " (" + (string)subscriberKey + ")");
listenHandle = llListen(listenChannel, "", NULL_KEY, "");

llOwnerSay("UpdateSubscriber listening on channel #" + (string)listenChannel);
llRegionSay(listenChannel, "UpdateServersQuery");
}

listen(integer channel, string name, key id, string message) {

list parsed = llParseString2List(message, [" "], []);
integer l = llGetListLength(parsed);

if (!registered) {

if ((l == 3) && (llList2String(parsed, 0) == "UpdateSubscriberRegister")) {

if ((key)llList2String(parsed, 1) != subscriberKey) return;

serverKey = (key)llList2String(parsed, 2);

llListenRemove(listenHandle);

listenHandle = llListen(listenChannel, "", serverKey, "");

llSay(0, "Registered to Update Server " + llKey2Name(serverKey) + " (" + (string)serverKey + ")");

registered = TRUE;
}
else if ((l == 2) && (llList2String(parsed, 0) == "UpdateServerAvailable")) {

key serverKey = (key)llList2String(parsed, 1);

string msg = "Update Server available:\n" + llKey2Name(serverKey) + " (" + (string)serverKey + ")\n\n" +
"Copy and paste the following line to register to this server:\n\n" +
"/128 UpdateSubscriberRegister " + (string)subscriberKey + " " + (string)serverKey + "\n\n";

llSay(0, msg);
}

return;
}

if ((l == 2) && (llList2String(parsed, 0) == "UpdateAvailable")) {

string itemName = llUnescapeURL(llList2String(parsed, 1));

if (containsItem(itemName)) {

llSay(0, "Deleting old version of item " + itemName);
llRemoveInventory(itemName);

llSay(0, "Requesting new version of item " + itemName);
llRegionSay(listenChannel, "UpdateRequest " + llEscapeURL(itemName) + " " + (string)subscriberKey + " " + (string)serverKey);
}
}
else if ((l == 2) && (llList2String(parsed, 0) == "UpdateSubscribersQuery")) {

key serverKey = (key)llList2String(parsed, 1);

llRegionSay(listenChannel, "UpdateSubscriberRegistered " + (string)serverKey + " " + (string)subscriberKey);
}

}

}

Category:LSL Library

2007-06-12T01:14:57Z

Emma Nowhere:

{{LSL Header}}
==Script Library==

<div id="box">
<div style="padding: 0.5em 0.5em 1.5em">
There are many [[script|scripts]] that have become buried in the [http://forums.secondlife.com/forumdisplay.php?f=15 Scripting Library forum], were lost with the death of the scripting forums, or sit idle in [[inventory|inventories]] that could be useful and should be more accessible.

Other scripters may be in the same situation. This wiki is a well-suited medium for a script library. Feel free to add your scripts to the script library by creating new pages for them and linking to those pages here.

Note that there are many more scripts in the LSL Library here, but you can't get to them if you don't know they exist, because they are subpages now, instead of an automatically updated category. Good luck searching.
</div>
</div>

<div id="box">

== Rules for posting: ==
<div style="padding: 0.5em">
#Your script must be tested and working. If it's not, stick it in your user-space until it is. This is a list of working, usable scripts.
#Add a link to your script's page here. Link back to this page from your script's page. Start your page with <nowiki>{{LSL Header}}</nowiki>.
#Do not add scripts that duplicate the same functionality as an existing script or built in {{LSLGC|Functions|function}}. If yours does, explain why.
#Do not post simple scripts to the library. Simple scripts should be posted to the [[:Category:LSL Examples| Examples list]].

----

</div>

{| {{Prettytable}}
|-
|{{Hl2}}| '''Name'''
|{{Hl2}}| '''Creator'''
|{{Hl2}}| '''Description'''
|-
||[[Hello Avatar]]
||Linden Lab
||SL's default script
|-
||[[Basic Encryption Modules]]
||[[User:Beverly Larkin|Beverly Larkin]]
||Basic encryption scripts, allows you to encrypt a float, and shout it to another prim on a randomly chosen channel.
|-
||[[Builders Buddy|Builder's Buddy]]
||[[User:Newfie Pendragon|Newfie Pendragon]]
||Script to easily move/rotate large builds that exceed the linkable size limit (30 meters)
|-
||[[Camera Sync]]
||[[User:Meyermagic Salome|Meyermagic Salome]] and [[User:Nomad Padar|Nomad Padar]]
||A system to synchronize the cameras of two avatars
|-
||[[Chat Logger (GPL)]]
||[[User:Nobody Fugazi|Nobody Fugazi]]
||Chat logger which requests permission from participants before recording them.
|-
||[[Date Library]]
||[[User:Corto Maltese|Corto Maltese]]
|| Date library, based on number of day since march 3rd 1600, can be used to calculate weekday, date differences, and date offset, and date formating.
|-
||[[Day of the Week]]
||[[User:DoteDote Edison|DoteDote Edison]]
||Function to get day of the week from [[llGetUnixTime]].
|-
||[[Dialog NumberPad|Dialog Number Pad]]
||[[User:DoteDote Edison|DoteDote Edison]]
||Use a dialog to accept positive integer input from users.
|-
||[[Email-to-IM]]
||[[User:DoteDote Edison|DoteDote Edison]]
||Send IMs to SL friends via email (translate emails from friends into IMs).
|-
||[[Efficiency Tester]]
||[[User:Xaviar Czervik|Xaviar Czervik]]
||Tests the speed of a function.
|-
||[[Float2Hex]]
||[[User:Strife Onizuka|Strife Onizuka]]
||Very useful for transporting [[float|floats]].
|-
||[[Follower (script)|Follower]]
||Unknown, uploaded by [[User:Slik Swindlehurst|Slik Swindlehurst]]
||Makes an object follow the nearest person. Do not use for [[grief|griefing]].
|-
||[[Intra-Region Update Server]]
||[[User:Emma_Nowhere|Emma Nowhere]]
||Centrally update objects such as Freeview screens or teleport pads within a region that are configured by notecards or contain modifiable objects or media assets.
|-
||[[Multirezzer|Multirezzer (on collision)]]
||[[User:Beet Streeter|Beet Streeter]]
||Spawns up to 10 objects when the object containing the script collides with a user.
|-
||[[Nargus Dialog Control 1.5]]
||[[User:Nargus Asturias|Nargus Asturias]]
|| A (not-so) simple dialog control script. Call dialog and receive selected value via link_message(), with built-in timer and link_message() notification on time out. Support multi-pages dialog and numerical property dialog. Button text and dialog's returned value can be difference.
|-
|| [[Object to Data v1.0]]
|| [[User:Xaviar Czervik|Xaviar Czervik]]
|| Turns an object into text. Allows people to post their objects to websites.
|-
||[[Prefix Calculator]]
||[[User:Xaviar Czervik|Xaviar Czervik]]
|| A calculator that evaluates expressions in prefix notation. + 3 4 = 5. * + 1 2 + 3 4 = 14.
|-
||[[Say Region Frames Per Second]]
||[[User:Heymeriou Mystakidou|Heymariou Mystakidou]]
|| Says the Region name and Frames per Second Out loud on command.
|-
||[[Secure HTTP Post]]
||[[User:Corto Maltese|Corto Maltese]]
|| This small library allow you to send Secure requests to your website with a security mechanism aimed to stop hacking.
|-
|| [[String Compare]]
|| [[User:Xaviar Czervik|Xaviar Czervik]]
|| Compares two strings and reliably returns either 1, -1, or 0 if they are the same.
|-
||[[Self Upgrading Script Enhanced]]
||[[User:Cron Stardust|Cron Stardust]]
|| Keeps only latest version of the script on prim (Even with multiple adds of the same script!)
|-
||[[User:SignpostMarv_Martin/LSL/SLNTPoHTTP_v1.1_client|SLNTPoHTTP v1.1 client]]
|[[User:SignpostMarv Martin|SignpostMarv Martin]]
||Emulates the function of [[llGetWallclock]] for any timezone by using SLOpenID's SLNTPoHTTP service. Also supports ISO 8601 and RFC 2822 timestamps.
|-
||[[Key Pad Door|Tdub's Keypad Door]]
||[[User:Tdub Dowler|Tdub Dowler]]
|| Door and keypad with changable code. Follow instructions carefully!
|-
||[[Timer Module]]
||[[User:Isabelle Aquitaine|Isabelle Aquitaine]]
||Manage multiple timers via linked messages.
|-
||[[WarpPos]]
|[[User:Keknehv Psaltery|Keknehv Psaltery]]
||Non-physical movement without the 10m limit.
|-
||[[XTEA Strong Encryption Implementation]]
||[[User:Morse Dillon|Morse Dillon]]
||An LSL implementation of XTEA (eXtended Tiny Encryption Algorithm). This is the first known public release of a 'real' strong encryption implementation in LSL and is released under the GNU General Public License (GPL).
|-
||[[XyText 1.5]]
||[[User:Xylor Baysklef|Xylor Baysklef]]
|| Display text (up to 10 characters) on a prim. Use as many prims as desired.
|-
||[[Computer:jaycoonlanguage]]
||[[User:jayco121 Bing]]
|| A language written in lsl that is meant for my computer (available at the shop).
|-}
----

==Support Script Library==
These are scripts in other languages, intended to be run on other systems that support scripts written in LSL

{| {{Prettytable}}
|-
|{{Hl2}}| '''Name'''
|{{Hl2}}| '''Creator'''
|{{Hl2}}| '''Description'''
|-
|| Silo
|| [[User:Zero_Linden|Zero Linden]]
|| General purpose data store in PHP. Use this to persist arbitrary data from LSL via [[llHTTPRequest]]. See:
* [http://www.notabene-sl.com/misc/silo-README.txt README] file
* [http://www.notabene-sl.com/misc/silo.tgz silo.tgz] tarball
* forum post [http://forums.secondlife.com/showthread.php?t=119570 Announcement].
|-
|| [[User:SignpostMarv Martin/PHP/llXorBase64StringsCorrect|llXorBase64StringsCorrect]]
|| [[User:SignpostMarv Martin|SignpostMarv Martin]]
|| An implementation of [[llXorBase64StringsCorrect]] in PHP- should be useful if you're using llXorBase64StringsCorrect to do cryptography work in LSL2 and posting it out to the web via [[llHTTPRequest]].
|-
|| [[User:SignpostMarv Martin/PHP/lsl fu.php|lsl_fu.php]]
|| [[User:SignpostMarv Martin|SignpostMarv Martin]]
|| A basic OOP'd PHP Class containing VeloxSeverine's $_POST fixer and Marv's own eccentric ideas for "fixing" things.
|}