Darkchie Resident: moved User:Darkchie Resident to Basic Multi Encryption: Needed to re name the page

2013-11-10T10:26:55Z

moved User:Darkchie Resident to Basic Multi Encryption: Needed to re name the page

← Older revision	Revision as of 03:26, 10 November 2013
(No difference)

Darkchie Resident at 10:24, 10 November 2013

2013-11-10T10:24:27Z

← Older revision		Revision as of 03:24, 10 November 2013
Line 85:		Line 85:
	//llOwnerSay((string)pad1+"......"+(string)pad2+"...."+(string)pad3);		//llOwnerSay((string)pad1+"......"+(string)pad2+"...."+(string)pad3);
	}		}
	}<lsl>		}/<lsl>

Darkchie Resident: Created page with "{{LSL Header}} Here is a basic way of encrypting using several methods rolled into one. == Encryption Code == string protection="201385testghub"; //Password for XOR Base 6…"

2013-11-10T10:23:44Z

Created page with "{{LSL Header}} Here is a basic way of encrypting using several methods rolled into one. == Encryption Code == <lsl>string protection="201385testghub"; //Password for XOR Base 6…"

New page

{{LSL Header}}
Here is a basic way of encrypting using several methods rolled into one.

== Encryption Code ==

<lsl>string protection="201385testghub"; //Password for XOR Base 64
integer pad1; //Main pad to be sent in message
integer pad2; //Roll over buffer pad to catch late messages using this number
integer pad3; //Last roll over buffer pad to catch late messages using this number
integer st; //Temp String

//List of characters you could type
list from=[ "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 of characters to replace yours with
list replace=[">","<",";","d","'","{","[","}","]","%","^","&","*","(",")","_","-","+","g","=","$","£","@","!","±","§","#","€","¡","¢","∞","§","¶","•","ª","º","–","≠","æ","«","…","‘","“","≥","≤","÷","s","g","5","4","f","v","b","h","y","7","9","i","k","m","h","a","z","e"];

//Function to generate a random number based on server time, this number will generate the same in all scripts this code is in, the pad2 and pad3 are to catch messages using an old number once its switched, the longest a number is available for use is around 30 seconds or so.
switch(){
st=(integer)("0x"+llGetSubString(llSHA1String((string)(llGetUnixTime()/10)+";'"),3,9));
st= -st;
pad3=pad2;
pad2=pad1;
pad1=st;
}

//Encrypt message
string encrypt(string msg){
string mess=msg;
integer length=llStringLength(mess);
msg="";
integer i=0;
for(;i<length;++i){
string l=llGetSubString(mess,i,i);
integer index=llListFindList(from,[l]);
msg+=llList2String(replace,index);
}
msg=llXorBase64(llStringToBase64(msg),llStringToBase64(protection));
msg=llMD5String((string)llGetOwner(),1+(integer)llFrand(999999999))+"ß"+llStringToBase64((string)pad1)+"ß"+msg;
return msg;
}
//Decrypt message
string decryption(string msg){
list data=llParseString2List(msg,["ß"],[]);
data=llDeleteSubList(data,0,0);
string temp=llBase64ToString(llList2String(data,0));
integer num=(integer)temp;
if(num==pad1||num==pad2||num==pad3){
msg=llList2String(data,1);
msg=llBase64ToString(llXorBase64(msg,llStringToBase64(protection)));
string mess=msg;
integer length=llStringLength(mess);
msg="";
integer i=0;
for(;i<length;++i){
string l=llGetSubString(mess,i,i);
integer index=llListFindList(replace,[l]);
msg+=llList2String(from,index);
}
}
return msg;
}
//Random number salting
string salt(integer num){
string salt="";
salt=(string)(555555+(integer)llFrand(999999));
integer i=0;
integer length=llGetListLength(replace);
for(;i<num;++i){
integer ran=(integer)llFrand(length);
salt+=llList2String(replace,ran);
}
return salt;
}
default{
state_entry(){
switch();
llSetTimerEvent(5);
string test=encrypt(salt(8)+":TestMessage"+(string)llGetOwner()+":"+"4056");
llOwnerSay(test);
test=decryption(test);
llOwnerSay(test);
}
timer(){
switch();
//llOwnerSay((string)pad1+"......"+(string)pad2+"...."+(string)pad3);
}
}<lsl>

Basic Multi Encryption - Revision history

Darkchie Resident: moved User:Darkchie Resident to Basic Multi Encryption: Needed to re name the page

Darkchie Resident at 10:24, 10 November 2013

Darkchie Resident: Created page with "{{LSL Header}} Here is a basic way of encrypting using several methods rolled into one. == Encryption Code == string protection="201385testghub"; //Password for XOR Base 6…"