ROT13 is one of the simplest encryptions but you may want to use a better one
#constant rot13Key= //between 0 and 255 work well
c = cipher(value,rot13Key,256)
c = deCipher(value,rot13Key,256)
function cipher(value as integer,key2 as integer,restrict as integer)
//cipher = Mod((value + key2),restrict)
cipher = value + key2
if (value + key2) > restrict
cipher = mod((value + key2),restrict)
endif
endfunction cipher
function deCipher(value as integer,key2 as integer,restrict as integer)
//cipher = Mod((value + key2),restrict)
deCipher = value - key2
if (value - key2) < 0
deCipher = deCipher+restrict
endif
endfunction decipher
