Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 689
Réponses : 5
Type : discussion
Etat : réponses autorisées

Chrono--Youkef

youkef le 18/10/2011 à 16:03
Bonjour, Je me suis a faire un petit chrono laugh.gif

Code
EffEcr
0->F
0->E
0->D
0->C
0->B
0->A
Lbl 9
Output(3,5,"CHRONO")
Output(4,4,F)
Output(4,5,E)
Output(4,6,":")
Output(4,7,D)
Output(4,8,C)
Output(4,9,":")
Output(4,10,B)
Output(4,11,A)
0->I
While I<56
I+1->I
End
A+1->A
If A=10
Then
B+1->B
0->A
End
If B=6
Then
C+1->C
0->B
End
If C=10
Then
D+1->D
0->C
End
If D=10
Then
E+1->E
0->D
End
If E=10
Then
F+1->F
0->E
End
Goto 9


Je vous le laisse et vous me dites ce que vous en pensez par contre dites le mois si on peut l'améliorer! merci d'avance happy.gif
made2kill le 18/10/2011 à 20:20
Ce chrono ne compte pas vraiment les secondes, leur durée ici dépend de la ram libre.
Mais sinon c'est pas mal winkle.gif
sandro le 18/10/2011 à 22:17
Pas mal, par contre, il peut être simplifié de la manière suivante :
Code
EffEcr
Output(4,7,"00:00
0 -> T
While getkey=45           //touche annul
T+1 -> T
For(A,1,N         //remplacer N par une valeur adaptée
End
Output(4,11,T-60ent(T/60
Output(4,8,ent(T/60
End


Sandro

PS : il serrait peut-être aussi intéréssant de pouvoir l'arreter sans avoir à appuyer sur On
figg le 16/11/2011 à 14:31
ou est la fonction getkey ? j'ai cherché partout dans ma calculette mais..rien... moodforlove.gif
Maximinus le 16/11/2011 à 15:02
Si tu as une Ti-82 stats, ca doit être code touche. Tu la trouves ans programme -> E/S et c'est la 7.
figg le 16/11/2011 à 15:27
ah oui en effet, merci bigmouth.gif