Snake ti 83plus

Fermé
despe - 24 oct. 2009 à 16:06
 ivannru - 19 janv. 2011 à 17:42
Salut
jai un probleme avec un jeux snake que je modifi sur la ti_83plus (en basic)jaimerais 2 chose:

-pouvoir aficher le meilleurs scores qui est sauvegarder indefiniment
-faire que le snake se teleporte en apuyant sur une touche ou quand il passe quelque part
jespaire que c'est possible
je suis un peu nul en programation alors...
merci

8 réponses

homer__simpsons
12 nov. 2010 à 20:54
La réponse est longue mais ce n'est qu'un résumé donc lis la bien!!!

c'est simple pour le meilleur score tu fait:
X est le meilleur score
Y est le score fait
voila le prgm sur l'écran graphique:

:If Y>X // si score fait meilleur que meilleur score
:Then // alors
:Y->X // score fait stocké dans meilleurs score
:Texte(0,0,"Meilleur score:" // Ecrire meilleur score en 0;0
:Texte(6,5,X // Ecrire le meilleur score
:End // Fin du If

Pour l'écran basique:


:If Y>X // si score fait meilleur que meilleur score
:Then // alors
:Y->X // score fait stocké dans meilleurs score
:Output(0,0,"Meilleur score:" // Ecrire meilleur score en 0;0
:Output(6,5,X // Ecrire le meilleur score
:End // Fin du If

excuse moi pour la réponse tardive!!

Pour que le snake se téléporte en appuyant sur une touche tu fait:
X numero de touche après getkey


:If X=105 // Si la touche appuyé est entrer (105)
:Then // Alors
:EntAléat(0,62->A // entier aléatoire entre 0 et 62
:EntAléat(0,94->B // entier aléatoire entre 0 et 94
:Pxl-on(B,A // Dessiner la tête du serpent là
:End // Fin du If

Pour que le snake se téléporte en arrivant sur un point tu fait:
X numéro des ordonnées de la tête du snake
Y numéro des abscisses de la tête du snake

:If X=2 et Y=2 // Si la tête du snake arrive en 2,2
:Then // Alors
:EntAléat(0,62->A // entier aléatoire entre 0 et 62
:EntAléat(0,94->B // entier aléatoire entre 0 et 94
:Pxl-on(B,A // Dessiner la tête du serpent là
:End // Fin du If


Tu trouveras GetKey ou code touhe dans l'édit d'un prgm tu fait "prgm",">","7"
Pour EntAléat tu fait "math","<","5"
pour If dans l'édit d'un prgm tu fait "prgm","entrer"
Pour Then dans l'édit d'un prgm tu fait "prgm","2"
Pour pxl-on tu fait "2nd","Dessin",">","4"
Pour output dans l'édit d'un prgm tu fait "prgm","6"
Pour -> tu fait "STO->"

Et voilà!!!
Les variables que j'ai utilisé ne doivent pas être les mêmes que ton jeu pense à les changers!!!
2
help svp
1
up
1
svp
1

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
homer__simpsons
12 nov. 2010 à 21:04
Aussi

Un petit prgm te permet de savoir le code de chaque touche pour GetKey ou CodeTouch
je l'ai inventé!!!

:Pause // pour éviter que le programme ce ferme directement
:Repeat K=105 // Repéter jusqu'a ce que K=105
:Repeat K?0 // Répeter jusqu'a ce que K?0
:getKey->K // Entrer touche (code de la touche dans K)
:End // Fin du répéter jusqu'a ce que K?0
:Disp K // Dire code de la touche
:End // Fin du Repéter jusqu'a ce que K=105

Si tu as compris il faut faire entrer pour quitter
K est assimilé au GetKey car c'est le début de Key met tu peux la changer à ton aise
Un Getkey où l'on appuie pas sur une touche sera compter comme 0 soit si tu retire: Repeat K?0 le code de la touche défilera!!!
tu trouveras:
Pause dans l'édit d'un prgm tu fait "prgm","8"
Repeat dans l'édit d'un prgm tu fait "prgm","6"
End dans l'édit d'un prgm tu fait "prgm","7"

J'espere avoir était suffisament claire!!!
1
snoussix Messages postés 427 Date d'inscription mercredi 24 février 2010 Statut Membre Dernière intervention 22 juin 2012 558
12 nov. 2010 à 21:32
c'est tout a fait possible et simple pour le premier et dur pour le second mais faisable selon ce que tu veux ( bien sur on reste dans le cadre du basic )
mais seul petit probléme ce sera dur de t'aider si tu n'arrives pas a lire le code source de ton programme... je ne peux méme pas t'expliquer comment faire si je ne sais pas si ton programme affiche le meilleur score atteint ou pas ....
0
sur la calculettte ou est la touche "rep" ???
0
la touche jaune : 2nde
puis la touche enter en bas a droite
0