Slalom |
Auteur |
Message |
MoonWalk
Autorisation : Membre
Nb de messages : 57
Inscrit le : Ven 11 Mar 2011, 20:55
|
Posté le : Jeu 15 Sep 2011, 18:21
|
|
|
Voici un petit programme que j'ai créé hier pendant mon cours de maths... J'ai mis environ 45 minutes pour le créer et j'ai donc eu les 10 minutes restantes du cours pour le tester. Et je n'en suis pas déçu !
Par contre, j'aimerais ajouter une sorte de classement qui enregistre le ou les trois meilleurs scores. Mais je ne sais pas comment faire, je sais juste qu'il faut utiliser des listes...
Bref, voici le programme (environ 300 octets) Flèche haut et bas pour se déplacer, il faut passer entre les portes (d'où son nom "slalom", un jeu de ski ^^)
Code | 0->S
10->U
4->V
Lbl 0
EffEcr
1->A
1->B
entAleat(3,8->X
X-2->Y
Output(X,A,"*
Output(Y,B,"*
Output(V,U,"=
Output(1,1,S
Lbl 1
CodeTouche->K
If B et A=16
Goto 0
S+1->S
B+1->B
A+1->A
Output(X,A-1," "
Output(Y,B-1," "
Output(X,A,"*
Output(Y,B,"*
If K=25
V-1->V
Output(V+1,U," "
Output(V,U,"=
If K=34
V+1->V
Output(V-1,U," "
Output(V,U,"=
If V[différent de]X-1 et A=10
Goto 3
Goto 1
Lbl 3
EffEcr
Output(3,4,"GAME OVER
Output(6,3,"SCORE :
Output(6,11,S
Pause
EffEcr |
|
|
|
|
azerty1
Autorisation : Membre
Nb de messages : 468
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Jeu 15 Sep 2011, 19:38
|
|
|
Je n'ai pas testé, mais pour les meilleurs scores:
Le meilleur score sera stocké dans un emplacement d'une liste L1(1) par exemple, donc à la fin de la partie, tu n'as qu'a testé si le score obtenu, est plus élevé que le score stocké dans ta liste, et le remplacer si c'est le cas:
Code | 25->L1(1)
If S>L1(1)
S->L1(1) |
Désolé, si je ne suis pas très clair...
---------------------- Ti-Connect 64bits
PROTECT
Tuto Skin Perso Wabbitemu |
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Jeu 15 Sep 2011, 20:29
|
|
|
Perso, je suggèrerait plutôt de rajouter avant la première ligne :
Code | 3 -> dim(ListeSLALO //dim est dans liste/droite |
Et à la fin :
Code | :If S>max(ListeSLALO
:Then
: // ici toutes les instruction en cas de score parmis les 3 premiers (affiche
: //le fait que l'on ait batut un des 3 records
:End
:S -> ListeSLALO(4
:TriCroi(ListeSLALO
:3 -> sim(ListeSLALO |
NB: "Liste" est à remplacer par le petit L du meu liste/droite.
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
azerty1
Autorisation : Membre
Nb de messages : 468
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Jeu 15 Sep 2011, 20:41
|
|
|
Et n'oublies pas de créer ta liste SLALO avant [stats] [Edit...] ...
---------------------- Ti-Connect 64bits
PROTECT
Tuto Skin Perso Wabbitemu |
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Jeu 15 Sep 2011, 21:05
|
|
|
pas la peine, c'est pour éparnier ce travail que j'ai rajouté la ligne à mettre au début.
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
MoonWalk
Autorisation : Membre
Nb de messages : 57
Inscrit le : Ven 11 Mar 2011, 20:55
|
Posté le : Jeu 15 Sep 2011, 21:13
|
|
|
Houlà... ! Je n'suis pas sur d'avoir bien compris... Je regarderais ça
Sinon, à part ça, que pensez vous du programme ?
|
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Jeu 15 Sep 2011, 21:21
|
|
|
Je ne l'ai pas testé, mais en tout cas il a l'air bien optimisé (enfin sauf les guillemets fermants nécéssaire à la détection des espaces) et à une taille très réduite.
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
azerty1
Autorisation : Membre
Nb de messages : 468
Inscrit le : Dim 12 Déc 2010, 20:44
|
Posté le : Jeu 15 Sep 2011, 21:52
|
|
|
(Désolé Sandro, j'avais zappé que tu l'avais définie au début )
---------------------- Ti-Connect 64bits
PROTECT
Tuto Skin Perso Wabbitemu |
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Ven 16 Sep 2011, 18:12
|
|
|
Je te pardonne, les étourderies, ça arrive à tout le monde (en maths, c'est ça qui représente les 4/5 des points que je perd).
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
Persalteas
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
|
Posté le : Sam 17 Sep 2011, 14:54
|
|
|
Qu'il est magnanime !!
|
|
|
|
nicolas
Invité
|
Posté le : Sam 08 Oct 2011, 20:19
|
|
|
est-il normal qu il n y est pas de score ???
|
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Dim 09 Oct 2011, 11:42
|
|
|
Il ne devrait s'afficher que quand l'on pert.
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
MoonWalk
Autorisation : Membre
Nb de messages : 57
Inscrit le : Ven 11 Mar 2011, 20:55
|
Posté le : Dim 09 Oct 2011, 12:03
|
|
|
Non, quand on joue, il s'affiche en haut à gauche de l'écran, et aussi quand on perd
|
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Dim 09 Oct 2011, 12:58
|
|
|
Ha oui, mince, j'avais raté le Output qui affiche S au plein milieu du code, je n'avais que vue celui à la fin.
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
Lepticed
Autorisation : Membre
Nb de messages : 3
Inscrit le : Dim 09 Oct 2011, 15:06
|
Posté le : Dim 09 Oct 2011, 15:08
|
|
|
Salut, y aurait-t-il un moyen de ralentir un peu les "skis"?
Cordialement, Lepticed
|
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Dim 09 Oct 2011, 17:52
|
|
|
Rajoute
Code | For(Z,1,xxx //remplace xxx par un nombre de ton choix : plus c'est End grand, plus ça ralentit |
Juste après le CodeTouche -> K
Sandro
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
Lepticed
Autorisation : Membre
Nb de messages : 3
Inscrit le : Dim 09 Oct 2011, 15:06
|
Posté le : Dim 09 Oct 2011, 18:12
|
|
|
J'ai aussi un autre problème, le score n'augmente pas, ce qui est assez embêtant.
Lepticed
|
|
|
|
sandro
Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
|
Posté le : Dim 09 Oct 2011, 18:19
|
|
|
C'est vrai, on drait qu'il manque une ligne : rajoute
juste avant le goto 0
Sandro
PS : si ça ne te dérange pas, ce serrait simpas que le temps que t'es sur l'ordi, tu ouvre une page internet avec ce lien http://espace-ti.forumactif.com/ (un forum sur les TI également) : en essaye de batre le record de personnes qui y sont (invités et membres confondus).
---------------------- mort à l'inutile, place à la mémoire libre et aux programmes |
|
|
|
Lepticed
Autorisation : Membre
Nb de messages : 3
Inscrit le : Dim 09 Oct 2011, 15:06
|
Posté le : Dim 09 Oct 2011, 18:32
|
|
|
C'est bon, ça marche.
Lepticed
|
|
|
|
MoonWalk
Autorisation : Membre
Nb de messages : 57
Inscrit le : Ven 11 Mar 2011, 20:55
|
Posté le : Mar 11 Oct 2011, 18:53
|
|
|
Ha oui ! Mes sincères excuses pour avoir oublier de recopier S+1->S
Merci Sandro ^^
|
|
|
|