User:Darwin Recreant
LSL Portal | Functions | Events | Types | Operators | Constants | Flow Control | Script Library | Categorized Library | Tutorials |
About Me
Hi I'm Darwin Recreant. I reside in Israel and has been enjoying Second Life since March 2007. I co-own the College of Scripting Music and Science along with Keystoner March and Shera Beam. I'm an advanced scripter and currently open for any large project offers. I also give private lessons on scripting.
Feel free to contact me in-world.
Achievements
- Contributed to the success of the College
- Creator of the Anti-Griefer HUD
- Creator of the DRUID Holodeck
- Non-stop scripting development
- Teleporters
- Vendors
- Anti-Griefing tools
- Scripting tools (functions)
- Useful HUD's of all sorts
- Helper to dozens of newbie/intermediate scripters
My Wiki Articles
- llSetFaceText - function on lsl wish list
- College of Scripting Music and Science - college page
- College of Scripting Music and Science/Group Guidelines - college group policy
- Template:Darwin's Scripts - my personal template
- FindScreenWidth - one of my lsl examples
My Jira Reports
- VWR-6493 - Momentary inaccuracy with llSetPos in linked objects
- SVC-3449 - New function: llGetParcelAgents
- MISC-969 - New Feature: Prim Animations - Less laggy, smoother, avatar like, animations on prims
- SEC-230 - MONO: Script crashes sim
My Scripts
Find Screen Width
The script below will give the width of the screen in meters by touching anywhere on the visible face, given that the prim is a box with zero rotation and attached at one of the corner HUD attachment points. <lsl>default {
touch_start(integer total_number) { vector scale = llGetScale(); vector off_point = llGetLocalPos(); vector face_pos = llDetectedTouchST(0); vector screen_pos = llDetectedTouchPos(0); float screen_width = ((face_pos.x-.5)*scale.y-off_point.y+screen_pos.y)*2; llOwnerSay((string)screen_width); }}</lsl>
Color Picker
Script that converts hue/sat/lum to red/green/blue based on texture coordinates on a single prim and outputs the vector rgb.
Prim Setup
<lsl>default {
state_entry() { llSetPrimitiveParams([ PRIM_SIZE, <.5,.4,.1>, PRIM_TYPE, PRIM_TYPE_BOX, PRIM_HOLE_SQUARE, <0,1,0>, 0.0, <0,0,0>, <.8,1,0>, <.02,0,0>, PRIM_TEXTURE, ALL_SIDES, (key)"5748decc-f629-461c-9a36-a35a221fe21f", <1,1,0>, <0,0,0>, 0.0, PRIM_TEXTURE, 0, (key)"404e4461-8a22-fbf7-7652-4b81dc7da325", <1,1,0>, <0,0,0>, 0.0, PRIM_TEXTURE, 2, (key)"01c02d68-dfb0-d907-7397-cba857c61144", <1,1,0>, <0,0,0>, -PI_BY_TWO]); }
} </lsl>
Color Picker
<lsl>float hue = 0.0; float lum = 0.5; float sat = 1.0;
integer start_face;
//hsl to rgb steps take from http://130.113.54.154/~monger/hsl-rgb.html vector hsl_to_rbg(float h, float s, float l) {
vector rbg; float temp1; float temp2; if(l < .5) temp2 = l*(1.0+s); else temp2 = l+s-l*s; temp1 = l*2.0-temp2; float Rtemp3 = h+1.0/3.0; if(Rtemp3 < 0.0) Rtemp3 = Rtemp3+1.0; else if(Rtemp3 > 1.0) Rtemp3 = Rtemp3-1.0; float Gtemp3 = h; if(Gtemp3 < 0.0) Gtemp3 = Gtemp3+1.0; else if(Gtemp3 > 1.0) Gtemp3 = Gtemp3-1.0; float Btemp3 = h-1.0/3.0; if(Btemp3 < 0.0) Btemp3 = Btemp3+1.0; else if(Btemp3 > 1.0) Btemp3 = Btemp3-1.0; if(6.0*Rtemp3 < 1.0) rbg.x = temp1+(temp2-temp1)*6.0*Rtemp3; else if(2.0*Rtemp3 < 1.0) rbg.x = temp2; else if(3.0*Rtemp3 < 2.0) rbg.x = temp1+(temp2-temp1)*((2.0/3.0)-Rtemp3)*6.0; else rbg.x = temp1; if(6.0*Gtemp3 < 1.0) rbg.y = temp1+(temp2-temp1)*6.0*Gtemp3; else if(2.0*Gtemp3 < 1.0) rbg.y = temp2; else if(3.0*Gtemp3 < 2.0) rbg.y = temp1+(temp2-temp1)*((2.0/3.0)-Gtemp3)*6.0; else rbg.y = temp1; if(6.0*Btemp3 < 1.0) rbg.z = temp1+(temp2-temp1)*6.0*Btemp3; else if(2.0*Btemp3 < 1.0) rbg.z = temp2; else if(3.0*Btemp3 < 2.0) rbg.z = temp1+(temp2-temp1)*((2.0/3.0)-Btemp3)*6.0; else rbg.z = temp1;
return rbg;
}
default {
touch_start(integer total_number) { start_face = llDetectedTouchFace(0); if(start_face == 4) llOwnerSay((string)hsl_to_rbg(hue, sat, lum)); } touch(integer total_number) { vector st = llDetectedTouchST(0); integer face = llDetectedTouchFace(0); if(start_face != face) return; if(face == 0) { sat = st.y; hue = st.x; llSetColor(hsl_to_rbg(hue, sat, lum), 4); } else if(face == 2) { lum = st.x; llSetColor(hsl_to_rbg(hue, sat, lum), 4); } }
}
</lsl>UV Button Maker
The following scripts are tools to making your own uv button setup for a texture in a hud or for any multi-button texture. First script is for getting the button coordinates which are used in the second script (detected_button) which returns the button number pressed.
Get Coordinates
<lsl>integer start_face; vector start_uv;
default {
touch_start(integer s) { start_face = llDetectedTouchFace(0); start_uv = llDetectedTouchUV(0); start_uv.x += -(integer)start_uv.x - (start_uv.x < 0); start_uv.y += -(integer)start_uv.y - (start_uv.y < 0); }
touch(integer s) { if(llDetectedTouchFace(0) == start_face) { vector new_uv = llDetectedTouchUV(0); new_uv.x -= (integer)new_uv.x - (new_uv.x < 0); new_uv.y -= (integer)new_uv.y - (new_uv.y < 0);
llSetText((string)start_uv+"
Pass Code Dialog
A simple script that will receive number inputs through menu like a number pad, and will grant access when submission matches pass code <lsl>string pass_code = "1234"; string code_input;
integer dialog_ch; integer dialog_handle; key dialog_user;
list rebutton(list src) {
list temp; temp += llList2List(src, -3, -1); temp += llList2List(src, -6, -4); temp += llList2List(src, -9, -7); temp += llList2List(src, -12, -10); return temp;
}
integer rand(integer max) {
return llAbs((integer)("0x"+llGetSubString(llMD5String((string)llFrand(10000), 0), 0, 7)))%max;
}
num_pad() {
llSetTimerEvent(10);
list buttons = [
"1", "2", "3", "4", "5", "6", "7", "8", "9", "Submit", "0", "Cancel"];
llDialog(dialog_user, "Enter pass code.\n\n"+code_input, rebutton(buttons), dialog_ch);
}
new_channel() {
dialog_ch = rand(1 << 30); llListenRemove(dialog_handle); dialog_handle = llListen(dialog_ch, "", "", "");
}
new_user(key user) {
dialog_user = user; code_input = ""; new_channel(); num_pad();
}
clear_user() {
llSetTimerEvent(0); dialog_user = NULL_KEY; llListenRemove(dialog_handle); dialog_handle = 0;
}
default {
touch_start(integer s) { if(dialog_user); else new_user(llDetectedKey(0)); } timer() { clear_user(); } listen(integer channle, string name, key id, string message) { if(id != dialog_user) return; if((integer)message