Is it possible to convert a list into several different number variables on the ti 83+. For one of my programs I need to convert 4 part lists into 4 different variables and was wondering if it was possible to do this in a way other than
:L₁(1)→A
:L₁(2)→B
:L₁(3)→C
:L₁(4)→D
ect.
I don't know of an easier way to do THIS, however, I do know of an easier way to store variables into a list. What you would do is:
"ABCDEFG...→Str1 //store your variables into a string in the order you want
For(var,1,length(Str1
expr(sub(Str1,var,1→∟List
End
This takes the expression (numeric value) of one character in the string, beginning at the variable chosen in the For( loop. This works for all capitol letters (A-Z) and theta (θ). It does not, sadly, work in reverse.
Projects: BexIDE (hold), Hadean.NET, Legend of Zelda: Link to the Future
For that code to work it needs to store the value to the individual list element:
DelVar L1"ABCDEFG…→Str1
For(X,1,length(Str1
expr(sub(Str1,X,1→L1(X
End
I would just do this:
{A,B,C,D,E…→L1
It's a whole lot faster…
Just sayin' :D
Z80 Assembly>English>TI-BASIC>Python>French>C>0
Nope. Not that I know, sorry.
I could make an assembly program,possibly. I have been tempted to do it, but I have never gotten around to it. If you want something specific, I could try to whip something up. I work with hex so I can easily come up with the opcode… Here are a few general ideas I have
1)
Just a simple, straight forward storing of a list to real vars. It would do something like this:
Input:
Ans is the list to convert
{2,1,0,66,7:Asm(prgmL2R
Output:
Values are stored to real variables
2→A
1→B
0→C
66→D
7→E
2)
Inputs:
L1 is the list to convert
Ans contains the real var names to store to
{0,1,2,3,4,5→L1
"ADCBEK":Asm(prgmL2R
Outputs:
Values are stored to real vars in the order that they appear in the string:
0→A
1→D
2→C
3→B
4→E
5→K
3)
Inputs:
Ans is the list to convert
Str1 contains the real var names to store to
"ADCBEK→Str1
{0,1,2,3,4,5:Asm(prgmL2R
Outputs:
Values are stored to real vars in the order that they appear in the string:
0→A
1→D
2→C
3→B
4→E
5→K
Z80 Assembly>English>TI-BASIC>Python>French>C>0
If we did something like this, would it be possible to do "{L₁:Asm(prgmL2R"?
Projects: BexIDE (hold), Hadean.NET, Legend of Zelda: Link to the Future
I just made this program:
Type this into a new program (I called it "A")
AsmPrgm
EFD74AFE01C0
1AFE1B38023E1B
EB232347
3E41
C5F5E5F5
EFC541F1
327984
D73003EF0F43
E1010900EDB0
F13CC110E4
C9
If your data is in L1, do this:
L1:Asm(prgmA
If L1={0,1,2,3}, then C should be 2, A should be 0, et cetera.
Z80 Assembly>English>TI-BASIC>Python>French>C>0
Okay, here is the next version. This one you store something like "ADBC→Str1 and then use a list to store to those variables.
AsmPrgm
EFC5413EAA327984
D7300F
3E40061B21EC86
3C772310FB
11EA861313D5
EFD74AFE01C0
1AFE1B38023E1B
EB232347
D11A13D5
C5E5F5
EFC541F1
327984
D73003EF0F43
E1010900EDB0
C110E3
D1C9
As an example,:
:"ADCB→Str1
:{0,1,2,3
:Asm(prgmA
The output would be:
0→A
3→B
2→C
1→D
Z80 Assembly>English>TI-BASIC>Python>French>C>0
Do you like it? :D Do you have any other ideas?
Z80 Assembly>English>TI-BASIC>Python>French>C>0
If TIBD had a "like" button, I would like this haha. This is very cool. It'd make everything a lot easier!
Projects: BexIDE (hold), Hadean.NET, Legend of Zelda: Link to the Future
I am going to upload it on TICalc for sure. I am glad I finally got around to doing this because it can really save time…
Z80 Assembly>English>TI-BASIC>Python>French>C>0