Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Lun 09 Avr 2007, 19:11
Introduction
Voici un petit programme pour tester vos reflex qui marche aussi pour la ti82 que pour la stat
Le prinicipe est simple : Dés que "GO" apparait appuyez sur "Enter".
Le programme
Code
Lbl 0
For(A,1,100)
Output(4,7,"PRET!") (* Le ! se trouve dans MATH *)
If getkey=105
Goto T
End
ClrHome
For(B,1,rand501)
If getkey=105
Goto T
End
Goto U
Lbl T
Disp "TRICHEUR"
Pause
Goto D
Lbl U
For(C,1,10000
Output(4,8,"GO")
If getkey=105
Goto Z
End
Lbl Z
ClrHome
If 41<C
then
Disp "FAUT REAGIR PEPE","TON SCORE EST","SEULEMENT DE"
Goto P
End
If 29<C and 39 [ > ou égal à ] C
Disp "MOUAIF..."
If 24<C and 29 [ > ou égal à ] C
Disp "PAS MAL"
If 20<C and 24 [ > ou égal à ] C
Disp "BRAVO!"
If 20[ > ou égal à ] C
Disp "INCROYABLE!!!"
Disp "VOTRE SCORE EST","DE"
Lbl P
Disp C
Pause
ClrHome
