Pas mal, malheureusement, la vitesse dépend des piles de ta calculatrice
Comme je suis de bonne humeur, je t'aide à l'optimiser, (même si je ne suis pas sûr que ce soit ce que tu veuilles faire
)
pour ça, tu as besoin de connaître quelques nouvelles fonctions ,à commencer par EffVar ([prgm]+[alpha]+[tan])
Elle permet de supprimer la variable qui le suit de la mémoire, dès qu'on appelle cette variable à nouveau, son contenu est à 0!
En plus on peut faire suivre la fonction directement d'une instruction, sans rajouter les deux points
tu peux ainsi faire:
- Code:
EffVar AEffVar B
J'ai aussi vu que tu utilises beaucoup de goto dans tes programmes, pas uniquement celui la
Dans la plupart des cas, tu peux les remplacer par une boucle While et Repeat, tu sembles déjà les connaître alors je ne vais pas expliquer plus
code optimisé:
- Code:
DelVar ADelVar BEffEcr
Output(1,6,"MINUTES
Output(2,6,"SECONDES
Fixe 0
Repeat K/=105
codeTouche->K
Output(1,1,B
Output(2,1,A
69!
69!
69!
A+.3703703704->A
If A=60
EffVar AB+1->B
If K=95
Pause
If K=85
DelVar ADelVar B
Output(1,1," //2 espaces
Output(2,1," //2espaces
End
J'espère ne pas trop avoir changé le code d'origine, il devrait aller un peu plus vite car il n'y a pas de Disp dans la boucle principale, les Disp sont gourmands en temps.
Si quelque-chose bug, c'est entièrement de ma faute, je ne l'ai pas encore testé !
J'ai rajouté la fonction Pause et remis le Reset(tu l'avais peut-être oublié avec le Lbl 0).
Si tu ne comprends pas quelque-chose, n'hésite pas à demander, tu peux aussi te référer à ce topic pour optimiser:
https://tout82.forumactif.org/t50-candide-ou-l-optimisationBienvenue sur le forum