Benchmark Test #1 for Accuracy, Randomness, and Speed.

Code for TI-99/4, TI-99/4A, TI CC-40, TI-74

20 FOR N=1 TO 100
25 A=N
30 FOR I=1 TO 10
35 A=SQR(A)
40 R=R+RND
50 NEXT I
60 FOR I=1 TO 10
65 A=A^2
70 R=R+RND
80 NEXT I
90 S=S+A
95 NEXT N
100 PRINT ABS(1010-S/5)
110 PRINT ABS(1000-R)


Code for TI-81,TI-82,TI-83,TI-83 plus,TI-84 Plus,TI-86
Does not run on TI-89/TI-92 series *
Does not run on TI-85 ♰


* Will not run due to 'Circular Definition' error. Problem arises from the fact 
  that many TI-product can not use the code logic of this test.  TI states this
  is a feature for code run-time safety.
  
♰ Error 15 Memory  - Code runs for a bit without error, then stops with error
  during accumulation.

:For n,1,100,1
:n->a
:For i,1,10,1
:sqr(a)->a
:r+rand(1)->r
:end
:For i,1,10,1
:a^2->a
:r+rand(1)->r
:end
:s+a->s
:end
:Disp ABS(1010-S/5)
:Disp ABS(100-r)


Benchmark Test #2 number storage and display

Code for TI-99/4, TI-99/4A, TI CC-40, TI-74

10 TEST=.1234567891123456789
20 PRINT TEST
RUN
LIST


Code for TI-95

0000   .1234567891123456789 STO A
0022   RCL A
0024   HLT
[RUN]
[LEARN]


Benchmark Test #3 Loop Nesting Speed.

Code for TI-99/4, TI-99/4A, TI CC-40, TI-74

10 FOR A=1 TO 5
20 FOR B=1 TO 5
30 For C=1 TO 5
40 PRINT A:B:C
50 NEXT C
60 NEXT B
70 NEXt A
100 PRINT "DONE"

Code for most TI hand-helds

:For A,1,5,1
:For B,1,5,1
:For C,1,5,1
:Disp A,B,C
:End
:End
:End
:Disp "DONE"

Code for TI-85

:For(A,1,5,1)
:For(B,1,5,1)
:For(C,1,5,1)
:Disp A,B,C
:End
:End
:End



Benchmark Test #4 The simple 1 to 9999 FOR Loop speed test

Code for TI-95

0000   1 STO A
0003   LBL AA
0006   INC A
0008   9999 IF> A GTL AA      Note: IF 9999 greater than A Goto Label AA
0017   `DONE`
0021   HALT


Code for TI-99/4, TI-99/4A, TI CC-40, and TI-74

100 FOR A=1 to 9999
110 NEXT A
120 PRINT "DONE"

Code for most TI hand-helds

:For A,1,9999,1
:End
:Disp "DONE"