However, as with any number you try to deal with on the calculator, the calculator will start storing the numbers as a decimal with the math exponent symbol E in it if the word is too long. Therefore you would need someway to revert the number to plain form to decrypt the number.

` ``Input Str1 "?->Str2 For(I,1,length(Str1 Str2+toString(64+inString("ABCDEFGHIJKLMNOPQRSTUVWXYZ",sub(Str1,I,1->Str2 End expr(sub(Str2,2,length(Str2)-1->L1(index) //index represents where in the list you are storing the value`

Also note I used the proper ASCII values for this one, which saves me from having to deal with adding a preliminary "0" on some numbers. ]]>

` ``"HELLOTEST WORLD→Str1 For(A,0,2 Disp sub(STR1,1+5A,5 End --Outputs-- HELLO TEST WORLD`

I don't see anything on the routines page for converting text to numbers, but this should work. Input Str1 as the text you want to convert to a number, then Str2 will be the number. To add it to a list, use the expr( command. I will try and add the code for reversing the process later. Note that this code probably can be optimized.

` ``"?→Str2 For(E,1,length(Str1 inString("ABCDEFGHIJKLMNOPQRSTUVWXYZ ",sub(Str1,E,1))→N If N<10 Str2+"0"→Str2 {0,.5,1→L₁ NL₁→L₂ Med-Med Y₁ Equ►String(Y₁,Str3 Str2+sub(Str3,1,length(Str3)-3→Str2 End sub(Str2,2,length(Str2)-1→Str2 Str2`

Of course I know this can't be done like this.

I should turn these words into a number and store that into the list, but after quite a bit of googling, I couldn't find an answer as to how I would go about doing this.

Maybe you guys know a solution? ]]>