Shift Encryption

Code:


cls
cls
input "Decrypted Text >>> ", in$
out$ = ""
shift = 10 # shifty
for n = 1 to length(in$)
letter$ = mid(in$, n, 1)
m = asc(letter$)
out$ = out$ + chr(m + shift)
next n
print "Encrypted Text >>> " + out$