I have been receiving an error when running the program below at the first menu. I checked all the labels and variables and I cannot figure out what is throwing the error.
Using TI-84 + CSE OS 4.2 and Doors 8.
Main program:
StoreGDB 0
Goto Z
Lbl Y
Menu("▫▫▫▫▫▫▫▫▫▫▫Open▫▫▫▫▫▫▫▫▫▫▫","New",0,Str1,A,Str2,B,Str3,C,Str4,D,Str5,E)
Lbl Z
{Q,R,S,T,U→NAME
Archive ⌊NAME
SetUpEditor NAME
If not(dim(⌊NAME
{0,0,0,0,0→NAME
⌊NAME(1→Q:⌊NAME(2→R:⌊NAME(3→S:⌊NAME(4→T:⌊NAME(5→U
Goto Y
Lbl A:RecallGDB 1
Lbl B:RecallGDB 2
Lbl C:RecallGDB 3
Lbl D:RecallGDB 4
Lbl E:RecallGDB 5
Lbl 0
BackgroundOff
AxesOff
GridOff
FnOff
ClrDraw
132→A
83→B
10→P
Repeat K=45
Repeat K
Pxl-Off(B,A
getKey→K
Pxl-On(B,A,P
End
If K=24 and A>0
A-1→A
If K=26 and A<264
A+1→A
If K=25 and B>0
B-1→B
If K=34 and B<164
B+1→B
If K=105
P+1→P
If P=25
10→P
End
Menu("SAVE?","Y",1,"N",2
Lbl 1
Input "Name",Str6
sub(Str6+" ",1,10→Str6
Input "Slot Number",S
If S=1
Then
Str6→Str1
1→⌊NAME(1
StoreGDB 1
End
If S=2
Then
Str6→Str2
2→⌊NAME(2
StoreGDB 2
End
If S=3
Then
Str6→Str3
3→⌊NAME(3
StoreGDB 3
End
If S=4
Then
Str6→Str4
4→⌊NAME(4
StoreGDB 4
End
If S=5
Then
Str6→Str5
5→⌊NAME(5
StoreGDB 5
End
Lbl 2
If Q+R+S+T+U=0
Then
"[...]"→Str1:Ans→Str2:Ans→Str3:Ans→Str4:Ans→Str5
End
ClrHome
Asm(prgmTOGLARCH
UnArchive prgmCLEANUP
Asm(prgmTOGLARCH
prgmCLEANUP
Asm(prgmTOGLARCH
Archive prgmCLEANUP
Asm(prgmTOGLARCH
prgmTOGLARCH
Asm84CPrgm
FD7E08EE02FD7708C9
prgmCLEANUP
Menu("SETTINGS","Radian",1,"Degree",2)
Lbl 1
Radian
Goto A
Lbl 2
Degree
Goto A
Lbl A
DelVar Y₁DelVar Y₂DelVar Y₃DelVar Y₄DelVar Y₅DelVar Y₆DelVar Y₇DelVar Y₈DelVar Y₉DelVar Y₀
ClrDraw
ClrAllLists
Normal
Float
Func
Thin
Simul
a+b
Full
nd
DEC
RectGC
GridLine
AxesOn
ZStandard
ZSquare
RecallGDB 0
Return
Thanks in advance!