XOR-Based String Encryption

ID:257763
 
Mar 6 2007, 2:14 pm (Edited on Jul 22 2007, 11:10 am)
 
//Title: XOR-Based String Encryption
//Credit to: Xx Dark Wizard xX
//Contributed by: Xx Dark Wizard xX


/*
A very simple encryption algorithm, not very secure but useful.
*/

proc
  XorEncrypt(string,key)
    for(var/i = 1 to length(string))
      var/char = text2ascii(string,i)
      . += ascii2text(char ^ key)
Jul 21 2007, 3:29 am
text2ascii() has a second parameter to allow you to specify the position in the string, so you can take out the copytext().
Jul 21 2007, 6:15 am
In response to Shadowdarke
Yeah, I wrote that a long time ago, fixed now.