djzone - lslLayne's Stuffs
https://www.djz.one/
2026-05-06T14:25:19+00:00djzone
https://www.djz.one/
https://www.djz.one/_media/wiki/dokuwiki.svgtext/html2024-01-14T02:40:26+00:00Anonymous (anonymous@undisclosed.example.com)authz
https://www.djz.one/lsl/authz?rev=1705200026&do=diff
LSL: Authorization
List of Users / Same Group
// Allow matching groups
integer ALLOW_GROUP = TRUE;
// A list of avatar keys (UUID) or usernames
list AUTHORIZED_USERS = [
"6c8ff91f-d74b-4842-b38b-81bb08f6efde", // tomjs
"bobka Resident", // fails
"bobka.Resident", // fails
"ernest.cone", // OK (angelus coen)
"rebozuelo" // OK
];
// authorized(ID)
// Return TRUE if:
// * owner
// * group matches object group
// * key in AUTHORIZED_USERS
// * name(key) …text/html2024-01-14T02:48:38+00:00Anonymous (anonymous@undisclosed.example.com)can_haz_rez
https://www.djz.one/lsl/can_haz_rez?rev=1705200518&do=diff
LSL: Functions: can_haz_rez()
can_haz_rez()
integer can_haz_rez(vector pos) {
integer parcel_flags = llGetParcelFlags(pos);
if (parcel_flags & PARCEL_FLAG_ALLOW_CREATE_OBJECTS) {
// Rez is allowed for all
return TRUE;
}
list parcel_details = llGetParcelDetails(pos, [PARCEL_DETAILS_OWNER, PARCEL_DETAILS_GROUP]);
if (llList2Key(parcel_details, 0) == llGetOwner()) {
// Owner can always rez
return TRUE;
}
// Do we have group rez rights…text/html2024-11-06T04:26:24+00:00Anonymous (anonymous@undisclosed.example.com)color_timer
https://www.djz.one/lsl/color_timer?rev=1730867184&do=diff
color_timer()
// cycle through a list of colors
integer SPOT_CHANNEL = 1520;
// How long to show each color (seconds)
float delay = 3.0;
// Define the color vectors
vector Blue = <0.2, 0.2, 0.4>; // Blue
vector Cyan = <0.0, 0.314, 0.314>; // Cyan
vector Green = <0.0, 0.5, 0.0>; // Green
vector Gold = <0.5, 0.25, 0.0>; // Gold
// Show the colors in this order
list colors = [Blue, Cyan, Green, Gold];
integer index = 0;
default {
state_entry() {
llListen(SPOT_C…text/html2024-01-19T02:56:45+00:00Anonymous (anonymous@undisclosed.example.com)config_from_desc
https://www.djz.one/lsl/config_from_desc?rev=1705633005&do=diff
LSL: Configure From Description
// config-from-desc - Get configuration from object Description field
// Use channel 66 by default
integer CHANNEL = 66;
// Enable sound by default
integer SOUND = TRUE;
// parse_args() sets global config directly from the contents of the object's Description field
// Multiple items are separated by a colon (':').
// Configs can either be a key=value pair or just a single key word to enable a feature
//
// Set the channel to 99:
// channel=99
//
// Set the …text/html2024-10-01T01:25:18+00:00Anonymous (anonymous@undisclosed.example.com)hud_buttons
https://www.djz.one/lsl/hud_buttons?rev=1727745918&do=diff
HUD Button Handling
Handle button presses on the HUD by detecting the link, face and position, as well as if it was a long-click (> 2 seconds).
Do button handling outside of the state handlers
button(integer link, integer face, vector p, integer long) {
string name = llGetLinkName(link);
log("button() name: " + name + " face: " + (string)face + " pos: " + (string)p);
if (name == "button") {
if (face == 4) {
// handle 5x2 buttons
integer bx = (in…text/html2024-09-29T21:50:38+00:00Anonymous (anonymous@undisclosed.example.com)hud_position
https://www.djz.one/lsl/hud_position?rev=1727646638&do=diff
HUD Positioning
HUDs can detect where they are attached and make appropriate adjustments to ensure they are not hidden off the edge of the viewer's window.
There is a bit of magic involved in setting the actual offsets as it depends on the geometry of all of the links in the HUD but the basics are here.text/html2024-01-14T03:06:04+00:00Anonymous (anonymous@undisclosed.example.com)is_sl
https://www.djz.one/lsl/is_sl?rev=1705201564&do=diff
LSL: is_SL()
Detect SL vs OpenSim
This relies on a bug in SL that does not exist in OpenSim, per WaS bug Splitting Strings to Lists. We can detect SL by looking for this bug in llParseString2List():
// Hack to detect Second Life vs OpenSim
// Relies on a bug in llParseString2List() in SL
// http://grimore.org/fuss/lsl/bugs#splitting_strings_to_lists
integer is_SL() {
string sa = "12999";
// list OS = [1,2,9,9,9];
list SL = [1,2,999];
list la = llParseString2List(sa, [], ["0",…text/html2025-03-30T02:49:11+00:00Anonymous (anonymous@undisclosed.example.com)linksetdata
https://www.djz.one/lsl/linksetdata?rev=1743302951&do=diff
LSL:LinksetData
* LSL Wiki LinksetData
Dump All Data
dump_ls_data() {
integer count = llLinksetDataCountKeys();
list keys = llLinksetDataListKeys(0, -1);
integer i = 0;
for (i=0; i<count; ++i) {
llOwnerSay(" " + llList2String(keys, i) + "=" + llLinksetDataRead(llList2String(keys, i)));
}
}text/html2024-01-13T02:52:42+00:00Anonymous (anonymous@undisclosed.example.com)longtouch
https://www.djz.one/lsl/longtouch?rev=1705114362&do=diff
LSL: Long Touch
default {
touch_start(integer num) {
warning("*idle touch_start("+(string)num+")");
llResetTime();
}
touch_end(integer num) {
warning("*idle touch_end("+(string)num+")");
if (llGetTime() > 2.0) {
// Reposition on long-touch
debug("~~~~~~~touch_end()");
}
}
}text/html2025-03-27T01:43:58+00:00Anonymous (anonymous@undisclosed.example.com)memory
https://www.djz.one/lsl/memory?rev=1743039838&do=diff
LSL: Memory Limits
Minimize a scripts memory usage
Every Mono script in Second Life uses 65536 bytes if it needs it or not, this lets you reduce that amount
Uncomment the llOwnerSay line to see how much memory is being used, then set MEM_LIMIT to just above that. Some scripts will need additional memory while they run, if you get errors liketext/html2024-11-06T04:17:00+00:00Anonymous (anonymous@undisclosed.example.com)miniscripts
https://www.djz.one/lsl/miniscripts?rev=1730866620&do=diff
Mini-Scripts
Small single-purpose scripts that are insanely handy to have
Set-and-Delete
* desc2float
* name2float
* set-for-sale
* no-prim-all - reset all prim properties
* simple no- scripts - reset specific prim propertiestext/html2024-01-14T02:52:07+00:00Anonymous (anonymous@undisclosed.example.com)name
https://www.djz.one/lsl/name?rev=1705200727&do=diff
LSL: Name
Name Lookups
Looking up UUIDs and usernames can be fin, this is a quick example of how to resolve (possible leagacy) login name to the current login name if it has been changed.
string name = "imaaltthree Resident";
key displayname_query;
key username_query;
key userkey_query;
default {
state_entry() {
llOwnerSay("original name: " + name);
// Key the user key first, the other lookups need it
userkey_query = llRequestUserKey(name);
}
dataserver(…text/html2024-01-19T02:58:53+00:00Anonymous (anonymous@undisclosed.example.com)popup_dislog
https://www.djz.one/lsl/popup_dislog?rev=1705633133&do=diff
LSL: Popup Dialog
list POPUP_OPTIONS = ['Debug', 'On', 'Off'];
string POPUP_TEXT = "Pop-up dialog box";
integer LISTEN_CHANNEL = -1;
float MENU_TIMEOUT = 30.0;
integer listen_handle;
...
touch_start(integer touchNumber) {
listen_handle = llListen(LISTEN_CHANNEL, "", NULL_KEY, "");
llDialog(llDetectedKey(0), POPUP_TEXT, POPUP_OPTIONS, LISTEN_CHANNEL);
llSetTimerEvent(MENU_TIMEOUT);
}
listen(integer channel, string name, key id, string message) {
if…text/html2024-01-19T02:49:49+00:00Anonymous (anonymous@undisclosed.example.com)read_ini_notecard
https://www.djz.one/lsl/read_ini_notecard?rev=1705632589&do=diff
LSL: Read INI Notecard
list group_labels;
list buttons;
list labels;
list button_labels;
list colors;
// Internal vars
string DEFAULT_NOTECARD = "!CONFIG";
string notecard_name;
key notecard_qid;
integer line;
integer current_group;
string current_section;
integer current_buttons;
string current_label;
string current_button_label;
vector current_color;
// See if the notecard is present in object inventory
integer can_haz_notecard(string name) {
integer count = llGetInventoryNumber(INVE…text/html2025-03-30T02:37:54+00:00Anonymous (anonymous@undisclosed.example.com)read_notecard
https://www.djz.one/lsl/read_notecard?rev=1743302274&do=diff
LSL: Read Notecard
string CONFIG_NOTECARD = "notecard";
key card_query;
integer line;
state default {
state_entry() {
if (llGetInventoryType(CONFIG_NOTECARD) == INVENTORY_NOTECARD) {
// Read the notecard
card_query = llGetNotecardLine(CONFIG_NOTECARD, line=0);
}
}
dataserver(key queryid, string data) {
if (queryid == card_query) {
if (data != EOF) {
// Skip comments
integer ix = llSubStrin…text/html2024-01-14T02:58:43+00:00Anonymous (anonymous@undisclosed.example.com)updatelinksittarget
https://www.djz.one/lsl/updatelinksittarget?rev=1705201123&do=diff
LSL: UpdateLinkSitTarget()
// Sets/Updates the sit target moving the avatar on it if necessary.
// Written by Strife Onizuka, size adjustment provided by Talarus Luan
// http://wiki.secondlife.com/wiki/User:Strife_Onizuka/UpdateLinkSitTarget
UpdateLinkSitTarget(integer link, vector pos, rotation rot) {
//Using this while the object is moving may give unpredictable results.
llLinkSitTarget(link, pos, rot);
key user = llAvatarOnLinkSitTarget(link);
if (user) {
// If there…