EvilZone

Programming and Scripting => Other => Topic started by: bubzuru on December 20, 2010, 03:47:45 AM

Title: Simple Xor Encryption
Post by: bubzuru on December 20, 2010, 03:47:45 AM

from my edit server, simple encryption

Code: [Select]

function Encrypt(s:string):string;
var i:integer;
begin
  for i := 1 to length(s) do
    s[i] := char(ord(s[i]) xor 444);
  result := s;
end;


Code: [Select]

var := Encrypt('helllllllo');