- Benchmarking all TI-84 Plus CE OS Version [5.0.0-5.6.0]
- 25 Sep 2017 07:49:06 pm
- Last edited by TheLastMillennial on 03 Nov 2020 04:45:33 pm; edited 5 times in total
A few days ago I watched a video about benchmarking every iOS. This gave me an idea, benchmark all CE OSes! I came up with a few small programs to benchmark, I used this program to time everything.
Here are my results. Green=fastest time, red= slowest time.
ABENCH (runs every benchmark and stores the results into a list)
Code:
T01RAND (random integer test)
Code:
T02GRAPH (Horizontal line test)
Code:
T03GRAPH (vertical line test)
Code:
T04SUM (summation test)
Code:
T05LIST (creating list test)
Code:
T06LIST (sorting list of only 0s)
Code:
T07LIST (sorting list of only 7s)
Code:
RAYTRSPR ( this is a 3D modeling test using raycasting) (I didn't make this program, this was made by TheScienceElf, you can view his video here.)
Code:
If you spot any errors in my testing, or want me to benchmark some other aspect of the CE, please post below!
Here are my results. Green=fastest time, red= slowest time.
ABENCH (runs every benchmark and stores the results into a list)
Code:
SetUpEditor L₆
9→dim(L₆
prgmT01RAND
Ans→L₆(1
prgmT02GRAPH
Ans→L₆(2
prgmT03GRAPH
Ans→L₆(3
prgmT04SUM
Ans→L₆(4
prgmT05LIST
Ans→L₆(5
prgmT06LIST
Ans→L₆(6
prgmT07LIST
Ans→L₆(7
L₆
T01RAND (random integer test)
Code:
0→B
For(A,1,5
Asm(prgmTIMER
rand(100
Asm(prgmTIMER
Ans+B→B
End
B/5
T02GRAPH (Horizontal line test)
Code:
0→W
For(A,1,5
Asm(prgmTIMER
ClrDraw
For(B,Ymax,Ymin,Y
Horizontal B
End
Asm(prgmTIMER
Ans+W→W
End
W/5
T03GRAPH (vertical line test)
Code:
0→W
For(A,1,5
Asm(prgmTIMER
ClrDraw
For(B,Xmax,Xmin,X
Vertical B
End
Asm(prgmTIMER
Ans+W→W
End
W/5
T04SUM (summation test)
Code:
0→W
For(A,1,5
Asm(prgmTIMER
Σ(X²,X,0,1000
Asm(prgmTIMER
Ans+W→W
End
W/5
T05LIST (creating list test)
Code:
0→W
For(A,1,5
DelVar L₁
Asm(prgmTIMER
999→dim(L₁
Asm(prgmTIMER
Ans+W→W
End
W/5
T06LIST (sorting list of only 0s)
Code:
0→W
For(A,1,5
DelVar L₁
100→dim(L₁
Asm(prgmTIMER
SortA(L₁
Asm(prgmTIMER
Ans+W→W
End
W/5
T07LIST (sorting list of only 7s)
Code:
0→W
For(A,1,5
DelVar L₁
100→dim(L₁
Fill(7,L₁
Asm(prgmTIMER
SortA(L₁
Asm(prgmTIMER
Ans+W→W
End
W/5
RAYTRSPR ( this is a 3D modeling test using raycasting) (I didn't make this program, this was made by TheScienceElf, you can view his video here.)
Code:
Asm(prgmTIMER
ClrDraw:1→G
{12,24,23,22,21,20}→L₁
For(Y,0,162,2G)
(81-Y)/164→B
For(X,0,262,2G)
(X-131)/164→A
A²+B²+1→E:2B-12→F
34.75→H:F²-4EH→D
1/B→T
AT→U:T→V
remainder(abs(int(U)+int(V)),2)→C
12→L:12→M
12-(T>0)(C+1)→C
If D≥0:Then
(F-√(D))/(2E)→T
AT→I:BT-1→J:6-T→K
J/1.5→M
If M>0:Then
int(10M)→M
L₁(1+int(M/2))→L
L₁(1+int(M/2+.5))→M
Else:12→M
End
{I,J,K}/1.5→L₃
{A,B,1}→L₂
2sum(L₃L₂)→S
SL₃-L₂→L₄
L₄(1)→P:L₄(2)→Q:L₄(3)→R
(J+2)/Q→T
If T>0:Then
PT+I→U:RT+6-K→V
11-remainder(abs(int(U)+int(V)),2)→C
Else:12→C:End
Else:If T>0:Then
1→E:4→F
U²+V²-12V+37.75→H
F²-4EH→D
12(D≥0)+C(D<0)→L
L→M
End:End
Pxl-On(Y,X,C)
Pxl-On(Y+1,X,L)
Pxl-On(Y,X+1,M)
Pxl-On(Y+1,X+1,C)
End:End
Asm(prgmTIMER
Ans
If you spot any errors in my testing, or want me to benchmark some other aspect of the CE, please post below!