Skip to content

Commit ce47ec2

Browse files
OutworldzOutworldz
committed
Push All Scripts
1 parent 2ad9795 commit ce47ec2

File tree

8,079 files changed

+2442776
-0
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

8,079 files changed

+2442776
-0
lines changed

‎1337_Translator/1337_Translator.sol

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
<Solution name="1337_Translator">
2+
<Project name="1337_Translator" path="1337_Translator\1337_Translator.prj" active="true"/>
3+
</Solution>

‎1337_Translator/1337_Translator/1337_Translator.prj

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
<Project name="1337_Translator" guid="d80d1156-6c00-1014-b904-200204c60a89">
2+
<Object name="Object" guid="d80d1238-6c00-1014-b904-200204c60a89">
3+
<Script name="1337_Translator_1.lsl" guid="d80d32d6-6c00-1014-b904-200204c60a89">
4+
</Script>
5+
</Object>
6+
</Project>

‎1337_Translator/1337_Translator/Object/1337_Translator_1.lsl

Lines changed: 93 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,93 @@
1+
// :CATEGORY:Translator
2+
// :NAME:1337_Translator
3+
// :AUTHOR:Davy Maltz
4+
// :KEYWORDS:
5+
// :CREATED:2010-01-10 05:20:56.000
6+
// :EDITED:2014-02-15
7+
// :ID:994
8+
// :NUM:1489
9+
// :REV:1.0
10+
// :WORLD:Second Life
11+
// :DESCRIPTION:
12+
// Leet speak translator
13+
// :CODE:
14+
list alphabet = ["a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"," "];
15+
list encode;
16+
17+
list leet = ["4","8","(","|)","3","ƒ","6","#","|","]","|<","1","]V[","/\/","0","","0_","®","5","7","(_)","\/","vv","×","`/","2"," "];
18+
19+
list haxxorz = ["4","b","c","d","e","f","g","h","i","j","k","|","m","n","0","p","q","r","5","t","u","v","w","x","y","2"," "];
20+
21+
list sounds = ["ayh","bee","cey","dey","eey","eff","gee","ehch","eye","jay","kay","el","em","en","oh","pee","quew","are","ehs","tey","yoo","vee","double-yew","ecks","wayh","zee"," "];
22+
string convertedtext;
23+
default
24+
{
25+
on_rez(integer start_parm)
26+
{
27+
llOwnerSay("Talk on channel '777' to encode text. Say '.1337', '.h4xx0r2', or '.sounds' To change the type of text encoding.");
28+
llResetScript();
29+
}
30+
state_entry()
31+
{
32+
if(llGetObjectDesc() == "leet")
33+
{
34+
encode = leet;
35+
}
36+
if(llGetObjectDesc() == "haxxorz")
37+
{
38+
encode = haxxorz;
39+
}
40+
if(llGetObjectDesc() == "sounds")
41+
{
42+
encode = sounds;
43+
}
44+
else
45+
{
46+
encode = haxxorz;
47+
}
48+
llListen(777,"",llGetOwner(),"");
49+
llListen(0,"",llGetOwner(),"");
50+
}
51+
listen(integer channel, string name, key id, string message)
52+
{
53+
convertedtext = "";
54+
if(channel == 777)
55+
{
56+
integer i;
57+
for(i == 0; i < llStringLength(llToLower(message)); ++ i)
58+
{
59+
if(llListFindList(alphabet,[llGetSubString(llToLower(message),i,i)]) != -1)
60+
{
61+
convertedtext = convertedtext + llList2String(encode,llListFindList(alphabet,[llGetSubString(llToLower(message),i,i)]));
62+
}
63+
else
64+
{
65+
convertedtext = convertedtext + llGetSubString(llToLower(message),i,i);
66+
}
67+
}
68+
69+
llSay(0,convertedtext);
70+
}
71+
if(channel == 0)
72+
{
73+
if(message == ".1337")
74+
{
75+
llOwnerSay("Encoding Now Set To '1337'.");
76+
encode = leet;
77+
llSetObjectDesc("leet");
78+
}
79+
if(message == ".h4xx0r2")
80+
{
81+
llOwnerSay("Encoding Now Set To 'h4xx0r2'.");
82+
encode = haxxorz;
83+
llSetObjectDesc("haxxorz");
84+
}
85+
if(message == ".sounds")
86+
{
87+
llOwnerSay("Encoding Now Set To 'Sounds'.");
88+
encode = sounds;
89+
llSetObjectDesc("sounds");
90+
}
91+
}
92+
}
93+
}

‎1st_necessity_of_SL/1st_necessity_of_SL.sol

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
<Solution name="1st_necessity_of_SL">
2+
<Project name="1st_necessity_of_SL" path="1st_necessity_of_SL\1st_necessity_of_SL.prj" active="true"/>
3+
</Solution>

‎1st_necessity_of_SL/1st_necessity_of_SL/1st_necessity_of_SL.prj

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
<Project name="1st_necessity_of_SL" guid="d8a31ec3-6c00-1014-b904-200204c60a89">
2+
<Object name="Object" guid="d8a31fb9-6c00-1014-b904-200204c60a89">
3+
<Script name="1st_necessity_of_SL_1.lsl" guid="d8a3435d-6c00-1014-b904-200204c60a89">
4+
</Script>
5+
</Object>
6+
</Project>

‎1st_necessity_of_SL/1st_necessity_of_SL/Object/1st_necessity_of_SL_1.lsl

Lines changed: 122 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,122 @@
1+
// :CATEGORY:Sensor
2+
// :NAME:1st_necessity_of_SL
3+
// :AUTHOR:Beer Dailey
4+
// :KEYWORDS:
5+
// :CREATED:2011-01-22 12:11:17.717
6+
// :EDITED:2014-02-15
7+
// :ID:2
8+
// :NUM:2
9+
// :REV:1.0
10+
// :WORLD:Second Life
11+
// :DESCRIPTION:
12+
// Ever since I noticed that many sims contain 1000's of wonderful objects with fancy effects and 1000's active scripts that use valuable simresources while no-one is around to enjoy it, I wanted to script something simple to offload those resources and give the visitor a better experience.// // That's why I made this little script: '1st necessity of SL' that could and should be used in any project that doesn't need to be active all the time.// // We are building a better place, together :)//
13+
// [Beer Dailey]
14+
// :CODE:
15+
// Improve SecondLife's performance!
16+
// Start with your own(ned) modifyable scripts/objects.
17+
//
18+
// This will disable your rootprim's script(s) when no-one is around to use/admire it
19+
// thus stop wasting valuable sim-resources
20+
//
21+
// Measured script time is 0.002 ms on average.
22+
//
23+
// - don't use it for rental stuff or sorts, not everything is suitable -
24+
//
25+
// Free to use, please use it. Improvements are welcome.
26+
// // Thank you Norton Burns for the testing and feedback :)
27+
//
28+
// Beer Dailey
29+
//
30+
// Don't reset this script or take it back in inventory when you're not within the set distance
31+
// or you'll get unpredictable results !!
32+
//
33+
// modify below to suit your needs
34+
35+
//////////////////////////////////
36+
float distance = 48.0; // scan range
37+
integer delay = 10; // repeat scan every 10 seconds.
38+
39+
// added
40+
// (gnore specific scripts, some scripts need to be off after initial setups
41+
// There's a bug that resets scripts in off state after a sim restart, so when activated again they re-initialise.
42+
// I've no fix for that.
43+
//
44+
list ignore_scripts = ["major script", "even worse script"];
45+
46+
integer debug = FALSE; // for debugging purposes, set it to TRUE to see what it's controlling
47+
48+
49+
//////////////////////////////////////
50+
// no need to modify the code below //
51+
//////////////////////////////////////
52+
53+
integer g_active = FALSE; // if FALSE disable all other scripts
54+
// changed TRUE into FALSE cos of some bug with rezzing, thank you LordGregGreg Back :)
55+
list control_scripts; // list for all scriptnames
56+
57+
active_scripts( integer active )
58+
{
59+
if(g_active == active) return; else g_active = active; //flip TRUE/FALSE
60+
61+
integer a;
62+
for ( a = 0; a < llGetListLength(control_scripts); a++)
63+
{
64+
llSetScriptState(llList2String(control_scripts, a), g_active); //(de)activate scripts
65+
66+
}
67+
if (debug) llOwnerSay("Changed: " + llList2CSV(control_scripts) + " to: " + (string)g_active );
68+
}
69+
70+
default
71+
{
72+
state_entry()
73+
{
74+
string myname = llGetScriptName(); //don't add myself into the list
75+
control_scripts = [];
76+
77+
integer i;
78+
integer n = llGetInventoryNumber(INVENTORY_SCRIPT); //count scripts
79+
80+
if (n == 1) { llOwnerSay("No other scripts found!"); } else //dont be silly ;)
81+
82+
for(i = 0; i < n; ++i)
83+
{
84+
string name = llGetInventoryName(INVENTORY_SCRIPT, i); //parse scriptnames
85+
if(name != myname) //not my name then continue
86+
{
87+
//catch states
88+
if ( llGetScriptState(name) == TRUE) //not on ignore list & running add it
89+
{
90+
control_scripts += [name];
91+
}
92+
else ignore_scripts += [name];
93+
}
94+
}
95+
if (debug) llOwnerSay("Controlling: " + llList2CSV(control_scripts) + "\nIgnoring: " + llList2CSV(ignore_scripts));
96+
llSensorRepeat("", NULL_KEY, AGENT, distance, PI, delay); // how far and how often we scan for avatars
97+
}
98+
99+
on_rez(integer s)
100+
{
101+
if (llGetListLength(control_scripts)== 0 && g_active == TRUE) llResetScript();
102+
//first time use or reset only when scripts are still active or they'll be added to the ignorelist
103+
}
104+
105+
changed(integer change)
106+
{
107+
if (change & CHANGED_OWNER) llResetScript(); // catch new owner
108+
if (change & CHANGED_INVENTORY) llResetScript(); // catch new scripts
109+
}
110+
111+
sensor(integer num_detected)
112+
{
113+
active_scripts(TRUE); //activate the scripts
114+
}
115+
116+
no_sensor() //no-one around? turn off all controlled scripts except myself
117+
{
118+
active_scripts(FALSE); //deactivate the scripts
119+
}
120+
121+
}
122+

‎3D_Radar/3D_Radar.sol

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
<Solution name="3D_Radar">
2+
<Project name="3D_Radar" path="3D_Radar\3D_Radar.prj" active="true"/>
3+
</Solution>

‎3D_Radar/3D_Radar/3D_Radar.prj

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
<Project name="3D_Radar" guid="D89A6A63-6C00-1014-B904-200204C60A89">
2+
<Object name="Object" guid="D89A6B7F-6C00-1014-B904-200204C60A89">
3+
<Script name="3D_Radar_1.lsl" guid="D89A9039-6C00-1014-B904-200204C60A89">
4+
</Script>
5+
<Script name="3D_Radar_2.lsl" guid="D89AB007-6C00-1014-B904-200204C60A89">
6+
</Script>
7+
</Object>
8+
</Project>

‎3D_Radar/3D_Radar/Object/3D_Radar_1.lsl

Lines changed: 71 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,71 @@
1+
// :CATEGORY:Radar
2+
// :NAME:3D_Radar
3+
// :AUTHOR:Jesse Barnett
4+
// :KEYWORDS:
5+
// :CREATED:2010-12-27 12:41:03.763
6+
// :EDITED:2013-09-18 15:38:46
7+
// :ID:4
8+
// :NUM:6
9+
// :REV:1.0
10+
// :WORLD:Second Life
11+
// :DESCRIPTION:
12+
// Rezzes a ball for each avatar in range. Each ball tracks it's on AV and displays distance.
13+
// :CODE:
14+
//
15+
// This formula: vector avDivPos = (avPos - rPos) * 0.010417; Takes the (avatars position - position of scanner) & multiplies by (radius of the distance you want the balls to go(2 meter sphere = 1 meter radius)/scan range(96meters)):
16+
//
17+
// 1/96 = approximately 0.010417.
18+
19+
//////////////////////////////////////////////////////////////////////////////////////////////////////
20+
// 3D Radar 2.5
21+
// "Oct 15 2008", "18:43:28"
22+
// Creator: Jesse Barnett
23+
// Released into the Public Domain
24+
//////////////////////////////////////////////////////////////////////////////////////////////////////
25+
26+
integer Scan = TRUE;
27+
string avKey;
28+
integer list_pos;
29+
list key_list;
30+
integer key_chan; //Key channel is generated randomly and passed to the scan ball
31+
integer die_chan = -9423753; //Hey pick your own channels and be sure to paste them into
32+
//the scan balls too!
33+
integer key_rem_chan = -49222879;
34+
default {
35+
state_entry() {
36+
llSetObjectName("3D Radar");
37+
}
38+
touch_start(integer total_number) {
39+
if (Scan) {
40+
llSensorRepeat("", "", AGENT, 96, PI, 1);
41+
key_list =[];
42+
llListen(key_rem_chan, "", "", "");
43+
llOwnerSay("on");
44+
Scan = FALSE;
45+
}
46+
else {
47+
llSensorRemove();
48+
llRegionSay(die_chan, "die");
49+
llOwnerSay("off");
50+
Scan = TRUE;
51+
}
52+
}
53+
sensor(integer iNum) {
54+
integer p = 0;
55+
for (p = 0; p < iNum; ++p) {
56+
avKey = llDetectedKey(p);
57+
list_pos = llListFindList(key_list, (list)avKey);
58+
if (list_pos == -1) {
59+
key_list += (list) avKey;
60+
key_chan = (integer) llFrand(-1000000) - 1000000;
61+
llRezObject("scan ball", llGetPos(), ZERO_VECTOR, ZERO_ROTATION, key_chan);
62+
llSleep(.25);
63+
llRegionSay(key_chan, avKey);
64+
}
65+
}
66+
}
67+
listen(integer c, string name, key id, string msg) {
68+
integer r = llListFindList(key_list,[(key)msg]);
69+
key_list = llDeleteSubList(key_list, r, r);
70+
}
71+
}

‎3D_Radar/3D_Radar/Object/3D_Radar_2.lsl

Lines changed: 62 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,62 @@
1+
// :CATEGORY:Radar
2+
// :NAME:3D_Radar
3+
// :AUTHOR:Jesse Barnett
4+
// :KEYWORDS:
5+
// :CREATED:2010-12-27 12:41:03.763
6+
// :EDITED:2013-09-18 15:38:46
7+
// :ID:4
8+
// :NUM:7
9+
// :REV:1.0
10+
// :WORLD:Second Life
11+
// :DESCRIPTION:
12+
// DESCRIPTION: []::Rezzes a ball for each avatar in range. Each ball tracks it's on AV and displays distance
13+
// :CODE:
14+
// Place this script in a prim and then place the prim into the inventory of the Scanner/Rezzer. It will automatically name itself.// // Suggestion; Create a sphere prim of 0.05 diameter with glow set about .80.
15+
//////////////////////////////////////////////////////////////////////////////////////////////////////
16+
// 3D Radar 2.5
17+
// "Oct 15 2008", "18:44:36"
18+
// Creator: Jesse Barnett
19+
// Released into the Public Domain
20+
//////////////////////////////////////////////////////////////////////////////////////////////////////
21+
22+
string avName;
23+
integer avDistance;
24+
key avKey;
25+
integer avListen;
26+
integer key_chan;
27+
integer die_chan = -9423753;
28+
integer key_rem_chan = -49222879;
29+
vector avPos;
30+
vector rPos;
31+
default {
32+
state_entry() {
33+
llSetObjectName("scan ball");
34+
}
35+
on_rez(integer start_param) {
36+
rPos = llGetPos();
37+
key_chan = start_param;
38+
llListen(die_chan, "", "", "");
39+
avListen = llListen(key_chan, "", "", "");
40+
}
41+
listen(integer c, string n, key id, string msg) {
42+
if (c == die_chan)
43+
llDie();
44+
else {
45+
avKey = (key) msg;
46+
avName = llKey2Name(avKey);
47+
llSensorRepeat("", avKey, AGENT, 96, PI, 1.0);
48+
llListenRemove(avListen);
49+
}
50+
}
51+
sensor(integer n) {
52+
avPos = llDetectedPos(0);
53+
vector avDivPos = (avPos - rPos) / (96 / 1); //Scan range/Radius of large sphere
54+
avDistance = (integer) llVecDist(rPos, llDetectedPos(0));
55+
llSetPos(rPos + avDivPos);
56+
llSetText(avName + "[" + (string) avDistance + "]", <1, 1, 1 >, 1);
57+
}
58+
no_sensor() {
59+
llRegionSay(key_rem_chan, avKey);
60+
llDie();
61+
}
62+
}

‎3_scripts_for_Fun_With_Dynamic_Came/3_scripts_for_Fun_With_Dynamic_Came.sol

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
<Solution name="3_scripts_for_Fun_With_Dynamic_Came">
2+
<Project name="3_scripts_for_Fun_With_Dynamic_Came" path="3_scripts_for_Fun_With_Dynamic_Came\3_scripts_for_Fun_With_Dynamic_Came.prj" active="true"/>
3+
</Solution>

0 commit comments

Comments
 (0)