Autorisation : Membre
Nb de messages : 12
Inscrit le : Ven 05 Oct 2012, 17:35
Posté le : Ven 05 Oct 2012, 17:56
bonjour, je suis nouveau ici et j'aimerai partager avec vous un de mes petit programmes que j'ai fait pendant un cour de math
c'est une petite horloge pour ti 82 stats-fr mais l'inconvénient c'est qu'il faut mettre l'heure avant et le laisser tourner pendant le cour pour voir l'heure sans sortir le portable
c'est un de mes premiers programme donc soyez indulgent dites moi se que je dois faire pour qu'il soit plus performent, merci
Code
effecr
input "kel heure c'est: ",H
input "kel minute: ",M
input "kel seconde: ",S
effecr
0->A
0->F
pause
repeat H=10
output(4,9,S
output(4,3,H
output(4,5,":
output(4,6,"M
output(4,8,":
0->A
while A<59
A+1->A
end
S+1->S
output(4,9,S
if S=60
then
M+1->M
0->S
output(4,6,M
output(4,9,S
output(4,10,"
end
if M=60
then
H+1->H
0->M
output(4,4,H
output(4,6,M
output(4,7,"
end
end
Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09
Posté le : Ven 05 Oct 2012, 18:01
Je suis vraiment navré de devoir briser ton rêve ainsi mais tu vis dans un monde cruel: l'horloge en Ti basic n'existe pas
Ton programme marche, c'est sûr mais sa vitesse dépend de ta mémoire libre: si tu met un autre programme à coté (disons 9ko) alors ton programme sera ralentit par la seul présence de l'autre.
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 05 Oct 2012, 21:12
Ou plutôt l'horloge n'existe pas dans une ti82/82stat/82statfr/83basique.
Tu peux effectuer le remplacement suivant
Code
0->A
while A<59
A+1->A
end
For(A,1,60 // modifie 60 pour augmenter ou diminuer la temporisation
End
Tu peux imbriquer des boucles les unes dans les autres pour gérer chaque variable.
Mais cela apporte des complications lorsqu'on veut donner une valeur initiale.
Code
effecr
input "kel heure c'est: ",H
input "kel minute: ",M
input "kel seconde: ",S
effecr
0->F
pause
For(H,H,1,24 // ne fonctionne qu'en TI-Basic à cause des deux H
// dans d'autres languages, la présence de la variable en argument plante
For(M,M,59
For(S,S,59
output(4,9,S
output(4,3,H
output(4,5,":
output(4,6,"M
output(4,8,":
For(A,0,59 // modifie le 59 pour modifier la durée de la seconde
end
output(4,9,S
end
output(4,10," "
effvar Send // j'ai collé effvar S et end pour économiser de la mémoire
output(4,7," "
effvar Mend
end
Tu peux utiliser le menu angle de la calcultrice pour manipuler les degrés,minutes et seconde d'arc. (base 60 comme les heures)
Mais je ne me souviens plus du fonctionnement exact.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Ven 05 Oct 2012, 21:38
Linkakro a raison, une horloge n'est pas possible sur une ti82.
En effet la vitesse d’exécution du prgm variera en fonction de ta mémoire libre et de tes piles.
D'autres avant moi sur ce forum ont pu créer de belles images graphique donnant l'heure et les minutes comme sur une horloge avec les menus "Cercle" et "Angle" (Linkakro).
Moi je voulais créer un chrono. En voulant remédier à ce problème sur ces model j'ai eu l'idée d'écrire un petit bout de code en début de prgm qui étalonnerai la valeur à incrémenter à chaque boucle, et ce, en fonction de l'état de la mémoire et d'état des piles de chaque calto.
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 05 Oct 2012, 22:18
Effectivement j'oubliais ton étalon.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Sam 06 Oct 2012, 11:46
Oui bon après se n'est pas parfait non plus...
Mais rappelle-toi, plus on étalonner sur des temps long plus on avait quelque chose de précis. Avec seulement 15 sec on arrivait à moins d'une seconde de décalage pour dix minutes. Après faut voir se qu'on veux en faire.
Tu aurai besoin de quoi Homer38 ?
Autorisation : Membre
Nb de messages : 12
Inscrit le : Ven 05 Oct 2012, 17:35
Posté le : Mar 09 Oct 2012, 17:53
oh rien de speciale je voulais juste m'amuser ^^
je vais essayer de faire de vrai programmes
par contre j'ai une question qui n'a rien a voir avec le post: pour quoiquand je met 2 lbl a la suite sa me prend en compte que le second? exemple:
Code
lbl A
"instruction"
lb B
"instruction"
dans snake j'ai voulu faire un troisieme niveau que j'ai placer apres le second et sa a marcher quand on le selectionnait mais quand on voulait jouer au niveau 2 sa mettait le troisieme
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)