Until 5 mins ago, no .....
A simple ROT system, will take the the string and shift each character by (amount)
+ Code SnippetFunction ROT_EnCrypt(input as string, amont as integer)
output as string
l = len(input)
for i=1 to l
char$ = Mid(input, i, 1)
output=output+Chr(Asc(char$)+amont)
next
EndFunction output
Function ROT_DeCrypt(input as string, amont as integer)
output as string
l = len(input)
for i=1 to l
char$ = Mid(input, i, 1)
output=output+Chr(Asc(char$)-amont)
next
EndFunction output
base$ = "This is my string, keep me safe on the interwebs."
rot = 13
enCrypted$ = ROT_EnCrypt(base$, rot)
deCcrypted$ = ROT_DeCrypt(enCrypted$, rot)
Message(enCrypted$)
Message(deCcrypted$)
I must stress this is a very simplistic cypher so do not use this for sensitive data, you could build on top of it and ROT in many directions by variable amounts, this would be your secret cypher that only your code knows what series of rotations will decrypt.