[TI 83+] Dodge

La Lbl2, c'est de la protection et donc facultatif, moi je l'ai mis parce que mon prof regarde nos programmes avant l'exam... Pour enlever cette protection, ne retranscrivez pas de :Lbl2 à :Goto 2. Si vous désirez la préserver, le bouton à appuyer au démarrage du programme est PRGM

Si vous désirer manipuler ce codes, c'est à votre guise, mais aussi à vos risques et périls. Si jamais vous avez de besoin d'aide, contactez-moi, je me ferai (peut-être) un plaisir de vous expliquer le code (P.S. Je ne connais pas toutes les commandes... par exemple, le Repeat, je ne connais pas)

Hypothèse :
=/ veut dire n'égal pas, se situe dans 2ND + MATH ou bien dans votre catalogue, vers la toute fin
-> veut dire stocké (STO->), ce bouton se situe juste en haut de ON

:Lbl2
:ClrHome
:getKey->t
:If T=43
:Goto 1
:If T=/43
:Goto 2
:Lbl 1
:ClrHome
:For(I,1,10
:Disp "
:End
:1->A:1->B:1->C:1->D:1->E:8->P:1->S
:Repeat P :lsup: A and P :linf: A+1
:S+1->S
:getKey->X
:If X=24 and P=/1 or X=26 and P=/16
:X-25+P->P
:Output(4,P,"Y
:If X=45
:Stop
:B->A:C->B:D->C:E->D
:1+round(ran15,0->D
:Output(8,D,"{}
:Disp "
:End
:Output(8,11,S
:Output(8,1,"TON SCORE:"
:Pause
:Goto 1

Voilà un jolie programme que j'apprécie beaucoup...

Merci de me signaler les bugs (donc erreur d'éxécution/retranscription)!

Mon high score : 127

Déjà édite ton message pour annuler le smiley !!!!