Talk:"TDOS"/@comment-24945049-20150629153157

Here's the command:

TMP1$=MID$(ENCRYPT$, I, 1)

TMP2=ASC(TMP1$)