Here is a Lifepoint Calculator for the TI-86. I have been wanting one for so long that I have gone through numerous websites on trying to figure out how to translate the TI-83 version into the TI-86 version. Unfortunately, I have gotten no luck… BUT, I have somehow been able to program it with my free time. It uses -CW-‘s TI-83 Plus’s source code, but I have re-written some of it. Special thanks to B.Monkey, who originally made this source code. I hope you like this newer version for the TI-86, but this version’s only a conversion from the TI-83 version. E-mail me at
py7133@aol.com if you have any problems.(This program takes up about 634 bytes of memory.)
Note: The ® sign means use the [STO] command.
Note 2: You can find the <, >, £ , and ³ signs under the [2nd] [2] commands.
8000® A
8000® B
1® C
Lbl LP
ClLCD
Disp "Player 1 Lifepoints",A
Disp ""
Disp "Player 2 Lifepoints",B
Disp ""
If A£ 0
Then
Disp "Player 1 Loses"
Pause
0® B
0® C
ClLCD
Stop
End
If B£ 0
Then
Disp "Player 2 Loses"
Pause
0® A
0® C
ClLCD
Stop
End
If C==1
Disp "Duel!"
0® C
Pause
Lbl MM
ClLCD
Menu(1,"P1",P1,2,"P2",P2,3,"LP",LP)
Lbl P1
ClLCD
Menu(1,"-LP",D1,2,"+LP",R1)
Lbl P2
ClLCD
Menu(1,"-LP",D2,2"+LP",R2)
Lbl D1
ClLCD
Disp "Player 1"
Input "Damage?",C
If C<0
Then
Goto D1
Else
A-C® A
Goto LP
Lbl R1
ClLCD
Disp "Player 1"
Input "Restore?",C
If C<0
Then
Goto R1
Else
A+C® A
Goto LP
Lbl D2
ClLCD
Disp "Player 2"
Input "Damage?",C
If C<0
Then
Goto D2
Else
B-C® B
Goto LP
Lbl R2
ClLCD
Disp "Player 2"
Input "Restore?",C
If C<0
Then
Goto R2
Else
B+C® B
Goto LP