Join us in Outworldz at www.outworldz.com:9000 or follow us:

Search dozens of selected web sites for OpenSim and LSL script

New! Script Meta-Search will search thousands of scripts here and at other sites for LSL or Opensim scripts.
Loading

Want to add a script or a project? Upload it and a half million people will see it and your name here this year.

Home   Show All
Category: Contributor: Creator
Translator 1337_Translator  

1337_Translator

Leet speak translator

Category: Translator
By : Davy Maltz
Created: 2010-01-10 Edited: 2014-02-15
Worlds: Second Life

the Zip file

Download all files for 1337_Translator
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. 1337_Translator_1.lsl
1 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"," "];
2 list encode;
3
4 list leet = ["4","8","(","|)","3","ƒ","6","#","|","]","|<","1","]V[","/\/","0","¶","0_","®","5","7","(_)","\/","vv","×","`/","2"," "];
5
6 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"," "];
7
8 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"," "];
9 string convertedtext;
10 default
11 {
12 on_rez(integer start_parm)
13 {
14 llOwnerSay("Talk on channel '777' to encode text. Say '.1337', '.h4xx0r2', or '.sounds' To change the type of text encoding.");
16 }
18 {
19 if(llGetObjectDesc() == "leet")
20 {
21 encode = leet;
22 }
23 if(llGetObjectDesc() == "haxxorz")
24 {
25 encode = haxxorz;
26 }
27 if(llGetObjectDesc() == "sounds")
28 {
29 encode = sounds;
30 }
31 else
32 {
33 encode = haxxorz;
34 }
35 llListen(777,"",llGetOwner(),"");
36 llListen(0,"",llGetOwner(),"");
37 }
38 listen(integer channel, string name, key id, string message)
39 {
40 convertedtext = "";
41 if(channel == 777)
42 {
43 integer i;
44 for(i == 0; i < llStringLength(llToLower(message)); ++ i)
45 {
46 if(llListFindList(alphabet,[llGetSubString(llToLower(message),i,i)]) != -1)
47 {
48 convertedtext = convertedtext + llList2String(encode,llListFindList(alphabet,[llGetSubString(llToLower(message),i,i)]));
49 }
50 else
51 {
52 convertedtext = convertedtext + llGetSubString(llToLower(message),i,i);
53 }
54 }
55
56 llSay(0,convertedtext);
57 }
58 if(channel == 0)
59 {
60 if(message == ".1337")
61 {
62 llOwnerSay("Encoding Now Set To '1337'.");
63 encode = leet;
64 llSetObjectDesc("leet");
65 }
66 if(message == ".h4xx0r2")
67 {
68 llOwnerSay("Encoding Now Set To 'h4xx0r2'.");
69 encode = haxxorz;
70 llSetObjectDesc("haxxorz");
71 }
72 if(message == ".sounds")
73 {
74 llOwnerSay("Encoding Now Set To 'Sounds'.");
75 encode = sounds;
76 llSetObjectDesc("sounds");
77 }
78 }
79 }
80 }

Back to the Best Free Tools in Second Life and OpenSim.