Cry34 by h3lp (encrypt 34)

usage:
$cry34(text,properties)

properties =
e = encrypt the text
d = decrypt the text

alias cry34 {
  var %n = 1, %cry34 = ""
  if ($2 == e) { 
    while ($mid($1,%n,1)) { %cry34 = %cry34 $+ $iif($mid($1,%n,1) == $chr(32),$chr(66),$chr($calc($asc($mid($1,%n,1)) + 34))) | inc %n  }
  }
  else if ($2 == d) {
    while ($mid($1,%n,1)) { %cry34 = %cry34 $+ $iif($mid($1,%n,1) == $chr(66),-,$chr($calc($asc($mid($1,%n,1)) - 34))) | inc %n }
  }
  else { echo -a * Invalid Parameter }
  return %cry34
}