Ti80.Online

Pour plus de programmes...
http://www.ti80.online.fr
ti80@citeweb.net
-----------------------------------

Un compte rebours...avant la fin des cours, pourquoi pas ? ;-)



:CLRHOME
:00=>A
:55=>B (Nombre de minutes. Au choix bien sr !)
:DISP "COMPTE A","REBOURS"
:PAUSE
:Lbl 1
:69!
:69!
:35!
:CLRHOME
:DISP "",B," MINUTES",A,"SECONDES"
:A-1=>A
:IF A<0
:THEN
:59=>A
:B-1=>B
:IF B<0 (Si le nombre de minutes est strictement infrieur 0,
il revient 55, ou ce que vous voulez...)

:55=>B
:END
:GOTO 1