Maintenance script: Automated @@ correction

2016-02-24T22:12:08Z

Automated @@ correction

← Older revision		Revision as of 22:12, 24 February 2016
Line 1:		Line 1:
	{{Template:TI-BASIC:Routine		{{Template:TI-BASIC:Routine
	\|picture=@@		\|picture=
	\|summary=Converts a string to a list of numbers.		\|summary=Converts a string to a list of numbers.
	\|input=''Str1'' - The string you want to convert		\|input=''Str1'' - The string you want to convert
Line 6:		Line 6:
	\|variable=L₁, A, Str1		\|variable=L₁, A, Str1
	\|compatibility=TI-83/84/+/SE		\|compatibility=TI-83/84/+/SE
	\|author=@@		\|author=
	\|authors=@@		\|authors=
	\|url=@@		\|url=
	\|download=[file stringtolist.zip]		\|download=[file stringtolist.zip]
	}}		}}

Maintenance script: Initial automated import

2016-02-24T18:32:59Z

Initial automated import

New page

{{Template:TI-BASIC:Routine
|picture=@@
|summary=Converts a string to a list of numbers.
|input=''Str1'' - The string you want to convert
|output=''L₁'' - The list that the numbers are stored to
|variable=L₁, A, Str1
|compatibility=TI-83/84/+/SE
|author=@@
|authors=@@
|url=@@
|download=[file stringtolist.zip]
}}

:~1+seq(inString("0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ ",sub(Str1,A,1)),A,1,length(Str1→L₁

With our characters stored in Str1, we loop through each character and store its position in our reference string (the uppercase alphabet) to the respective element of L₁.

This routine only allows for values from 1 to 26 in the list, since our string of characters is the uppercase alphabet, and each list value must match up to one of the string positions. If you add more characters to the string, however, you can increase the range of values in the list. This routine uses Str1, so you should [[TI-BASIC:Cleanup|clean it up]] at the end of your program.

= Advanced Routine =

Since a list element can store up to 14 digits, you can use int(, fPart(, and exponents to compress an additional 7 letters per element (2 digits for each letter), thus increasing your total number of characters to 6993.

" ABCDEFGHIJKLMNOPQRSTUVWXYZ->Str0
DelVar L1
For(A,0,dim(L1
0
For(B,1,min(7,length(Str1)-7A
Ans+.1^(2B)inString(Str0,sub(Str1,B+7A,1
End
Ans->L1(A+1
End
"

= Related Routines =

* [[TI-BASIC:Number_To_String|Number to String]]
* [[TI-BASIC:List_To_String|List to String]][[Category:TI-BASIC]]
[[Category:TIBD]]

TI-BASIC:String To List - Revision history

Maintenance script: Automated @@ correction

Maintenance script: Initial automated import