Programme sous TI 83+
TI83programeur
Messages postés
3
Statut
Membre
-
homer__simpsons -
homer__simpsons -
Bonjour, Je debute dans la programmation et je commence par ma calculette,la TI83+
Je suis en train de me programmer un snake et je voudrais avoir un conseil:
Lorsque je fais ce code pour un deplacement vers le bas:
Lbl25
Repeat K!=25
getkey->K
Clearscreen
A-1->A
If A=0
A+7=A// pour que le curseur passe de l'autre coté de l'ecran
output(A,B,"O"
output(Z,Y,"X" // avec Z et Y deux nombres aleatoires pour le X a manger par le O
End
Je suis obligé de retaper a chaque fois sur la fleche du bas pour qu'il avance.
J'ai essayé d'enlever le Getkey mais alors aucun moyen de sortir de la boucle.
Merci d'avance
PS : Je n'ai pas mi le debut du code qui est correct et trop long a ecrire.
Lbl 25 est le mini programme pour faire descendre mon O
Je suis en train de me programmer un snake et je voudrais avoir un conseil:
Lorsque je fais ce code pour un deplacement vers le bas:
Lbl25
Repeat K!=25
getkey->K
Clearscreen
A-1->A
If A=0
A+7=A// pour que le curseur passe de l'autre coté de l'ecran
output(A,B,"O"
output(Z,Y,"X" // avec Z et Y deux nombres aleatoires pour le X a manger par le O
End
Je suis obligé de retaper a chaque fois sur la fleche du bas pour qu'il avance.
J'ai essayé d'enlever le Getkey mais alors aucun moyen de sortir de la boucle.
Merci d'avance
PS : Je n'ai pas mi le debut du code qui est correct et trop long a ecrire.
Lbl 25 est le mini programme pour faire descendre mon O
A voir également:
- Programme sous TI 83+
- Programme demarrage windows - Guide
- Comment mettre en veille un programme sous windows 10 - Guide
- Programme word gratuit - Guide
- Message programmé iphone - Guide
- Division euclidienne ti 83 - Forum calculatrices
2 réponses
snoussix
Messages postés
495
Statut
Membre
ben c'est un peu dur ce que tu demande et je ne pourrais te donner une réponse précise mais si tu t'y connais un peu en programmation tu sauras que si tu ne touche aucune touche le getkey enregistre 0 donc tu lui dis que si le getkey enregistre 0 de refaire ce qu'il a déja fait (descendre par exemple :) ) un lbl goto ferait l'affairre selon moi :)
Desolé pour la reponse tardive...
J'ai programmé un snake et voici ce que j'utilise pour le faire bouger
:Repeat 0 //Repeter a l'infini
:Getkey
:If Rep:Rep->z //Si Getkey est different de 0 donc que l'utilisateur a
Appuyé sur une touche: alors on enregistre sa dans Z
:B-(Z=24)+(Z=26)->B
:A-(Z=25)+(Z=34)->A
:End
Le plus intriguant doit etre ca:
:B-(Z=24)+(Z=26)->B
:A-(Z=25)+(Z=34)->A
Ceci est pour allebeger mon code ca revient a ecrire:
If Z=24
Then
B-1->B
End
If Z=26
Then
B+1->B
End
If Z=25
Then
A-1->A
End
If Z=34
Then
A+1->B
End
Soit deux ligne au lieu de 16
j'espere avoir ete utile!
J'ai programmé un snake et voici ce que j'utilise pour le faire bouger
:Repeat 0 //Repeter a l'infini
:Getkey
:If Rep:Rep->z //Si Getkey est different de 0 donc que l'utilisateur a
Appuyé sur une touche: alors on enregistre sa dans Z
:B-(Z=24)+(Z=26)->B
:A-(Z=25)+(Z=34)->A
:End
Le plus intriguant doit etre ca:
:B-(Z=24)+(Z=26)->B
:A-(Z=25)+(Z=34)->A
Ceci est pour allebeger mon code ca revient a ecrire:
If Z=24
Then
B-1->B
End
If Z=26
Then
B+1->B
End
If Z=25
Then
A-1->A
End
If Z=34
Then
A+1->B
End
Soit deux ligne au lieu de 16
j'espere avoir ete utile!