[TI 83+] Dodge
2 participants
Page 1 sur 1
[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
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
Dernière édition par le Mer 11 Oct 2006 - 19:49, édité 1 fois
Re: [TI 83+] Dodge
Déjà édite ton message pour annuler le smiley !!!!
Duche- Modérateur
- Nombre de messages : 2210
Age : 39
Localisation : Louvain-la-Neuve (Belgique)
Profession / Etudes : Développeur en optimisation
Points : 8265
Date d'inscription : 16/01/2006
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|
Jeu 2 Juil 2015 - 15:16 par louaraychi
» Devoir maison sur équilibre et réaction chimique
Dim 1 Fév 2015 - 17:19 par sararose
» Ma présentation
Sam 25 Oct 2014 - 23:29 par Rith
» projet scientique sur la LUMIERE
Ven 26 Sep 2014 - 20:33 par benjamin-010
» La trajectoire de la Terre
Mar 5 Aoû 2014 - 22:19 par Alban
» Equilibrer une réaction redox
Dim 8 Juin 2014 - 21:18 par Courtney ♥
» les effets sur les lignes de transport de l’électricité
Ven 30 Mai 2014 - 17:14 par leila14
» lignes de transport de l'électricité
Ven 30 Mai 2014 - 17:07 par leila14
» Gravitation
Ven 16 Mai 2014 - 20:16 par fatimaa
» Maquette suspension de moto 2D
Jeu 17 Avr 2014 - 17:20 par Sti2d