User:Ugleh Ulrik

Profile

Born:

6th March 100 BC

About:

I have no face

Achievements:

• Avid Programmer
  • LSL
  • PHP
  • MySql
  • CSS
  • Javascript/jQuery/ajax

About

Im just your average Ugleh. I hang out in SL, helping the scripting groups with my knowledge. I create weapons, utilities, games, and pretty much anything. I work for Learn Avatar as a teacher, in return i get a small piece of land to keep my projects including my inworld servers. I can script projects for free if simple, if not id ask for some lindens, but i never name prices, you name your own price and ill accept what you give me.

The following scripts and functions have been created by me and are under GNU Affero GPL v3.

XStreetSL

Xstreet Link

On my spare time I do need some linden flow to provide some land for my servers and all around scripting zone where I spend most my time, to do this I sell games and other stuff ive made.

UD Functions

Below are some User-Defined functions I have created and use in most of my items. Some other scripters have helped out with improvements on some if you go to the discussion section for the "More at" links.

Vector2List

<lsl> list Vector2List(vector v){

   list alist = llParseString2List((string)v,[",", ">", "<"],[]);

return alist; } </lsl> or <lsl> list Vector2List(vector v){

   return [v.x, v.y, v.z]; // *Tips a wink to Strife*

} </lsl>

More at User:Ugleh_Ulrik/Vector2List

FirstName

<lsl> string FirstName(key k){ list fn = llParseString2List(llKey2Name(k),[" "],[]); string firstn = llList2String(fn,0); return firstn; } </lsl> More at User:Ugleh_Ulrik/FirstName

LastName

<lsl> string LastName (key k){ list ln = llParseString2List(llKey2Name(k),[" "],[]); string lastn = llList2String(ln,1); return lastn; } </lsl> More at User:Ugleh_Ulrik/LastName

trimstring

<lsl> string trimstring(string text, integer length) {

   if (length < llStringLength(text)){
   length = length-1;
   string newstring = llGetSubString(text,0, length) + "...";
   return newstring;

}else{

   return text;

} } </lsl> More at User:Ugleh_Ulrik/trimstring

GiveBulkMoney

<lsl> GiveBulkMoney(list u, integer amount){ integer a = 0; while(a < llGetListLength(u)) {

   llGiveMoney(llList2Key(u,a), amount);
   ++a;

} } </lsl> More at User:Ugleh_Ulrik/GiveBulkMoney

Other Functions

PHP Name2Key User:Ugleh_Ulrik/Name2Key

ListKeyCase User:Ugleh_Ulrik/ListKeyCase

Random String RandomString

Time Ago TimeAgo

DialogPlus DialogPlus

Encryption / Decryption

<lsl> string enc(string source){

   string new;

list s1 = ["!", " ","#","$","%","&","(",")","*","+",",","-",".","/","0","1","2","3","4","5","6","7","8","9",":",";","<","=",">","?","@","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","[","]","^","_","`","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","{","|","}","~"]; list s2 = ["y","n","C","?","q","Z","d","`","B","u","t","<",";","a","+","J","[","m","7","M","v","I","g","}","i","]","K","L","k","H","W","@","P","Y","4","{","V","Q","x","(","O","X","0","=","T","c","9","[","z","N","r","|","^","!","h","F","3",".","8","/","5","6",">","1","A","~","D","U","p","o","_","$","&","l","*","R","w","S","-","f","G","2","E","e","b","#",":",")","s","%","j"," "]; integer s; integer l = llStringLength(source); do new+= llList2String(s2,llListFindList(s1, [llGetSubString(source,s,s)])); while(l>++s); return new; }

string dec(string source){

   string new;

list s2 = ["!", " ","#","$","%","&","(",")","*","+",",","-",".","/","0","1","2","3","4","5","6","7","8","9",":",";","<","=",">","?","@","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","[","]","^","_","`","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","{","|","}","~"]; list s1 = ["y","n","C","?","q","Z","d","`","B","u","t","<",";","a","+","J","[","m","7","M","v","I","g","}","i","]","K","L","k","H","W","@","P","Y","4","{","V","Q","x","(","O","X","0","=","T","c","9","[","z","N","r","|","^","!","h","F","3",".","8","/","5","6",">","1","A","~","D","U","p","o","_","$","&","l","*","R","w","S","-","f","G","2","E","e","b","#",":",")","s","%","j"," "]; integer s; integer l = llStringLength(source); do new+= llList2String(s2,llListFindList(s1, [llGetSubString(source,s,s)])); while(l>++s); return new; }

default {

   touch_start(integer total_number)
   {
       string encoded = enc("Hello There");//encoding the string "Hello There"
       llSay(0, encoded);//Outputting it
       string decoded = dec(encoded);//Decoding the encoded text, returning back "Hello There"
       llSay(0, decoded);//Outputting it
   }

}

</lsl>

Contributions

function	purpose
Google_Translator	Translates Spanish to English and as long as you know the language abbreviations you can make it translate anything to anything.
Category:LSL_User-Defined_Functions	UD Functions category, to provide a list of custom functions.