Rechercher
Connexion
Chatbox externe
Derniers sujets
Partenaires
TI-Planet | Espace-TI : Forum |
Faire un don à Tout-82...
Où va cet argent ?
Membres donateurs:- Persalteas (10€)
- Wistaro (5€)
- jo2geek (22€)
Les posteurs les plus actifs du mois
Aucun utilisateur |
Racer
5 participants
Page 1 sur 1
Racer
Salut a tous et a toutes pour mon premier post sur ce forum je vais vous présenter un programme que j'ai fait a la fin de mon brevet de français (et oui je me faisais chier)
le but est simple c'est de faire le meilleur score possible en évitant les obstacles.
Voila le programme est très simple mais marche parfaitement je n'es pour l'instant décelé aucun bug mon programme pèse 277 octets pour le moment mais je pense l'améliorer donc il risque d’être plus lourds ensuite
pour info le -> représente la touche STO qui est situé au dessus de ON
et le # correspond au signe inégale que l'on trouve en faisait Scnd+Math/test +2
le but est simple c'est de faire le meilleur score possible en évitant les obstacles.
- Code:
:ClrHome
:0->S
:15->H
:4->X
:4->Y
:Lbl 1
:If Y=3
:Goto 2
:If Y=6
:Goto 2
:ClrHome
:H-1->H
:Getkey->K
:If K=25
:Y-1->Y
:If K=34
:Y+1->24
:If K=24
:X-1->X
:Output(Y,X,")
:Output(Z,H,"*
:OutPut(3,1,"----------------
:Output(6,1,"----------------
:If H=1
:Goto 9
:If H=X and Y#Z
:Goto 1
:If H#X
:Goto 1
:If H=X and Y=Z
:Goto 2
:Lbl 2
:ClrHome
:Output(3,4,"PERDU
:Output(4,1,"SCORE:
:Output(4,9,S
:Stop
Voila le programme est très simple mais marche parfaitement je n'es pour l'instant décelé aucun bug mon programme pèse 277 octets pour le moment mais je pense l'améliorer donc il risque d’être plus lourds ensuite
pour info le -> représente la touche STO qui est situé au dessus de ON
et le # correspond au signe inégale que l'on trouve en faisait Scnd+Math/test +2
LPehix- Invité
Re: Racer
Cela se présente bien.
Ceci n'a aucune utilité. Le label 2 et la suite seront lus peu importe la condition si la lecture parvient jusque là.
:If H=X and Y#Z
:Goto 1
:If H#X
:Goto 1
Il suffit d'écrire
:If Y#Z or H#X
:Goto 1
Tu devrais utiliser une boucle et placer comme condition de sortie la collision plutôt que tester toutes les conditions de poursuite du jeu.
Par ailleurs utiliser une boucle plutôt que des Goto est souvent préférable pour la rigueur et les bugs.
Ceci n'a aucune utilité. Le label 2 et la suite seront lus peu importe la condition si la lecture parvient jusque là.
- Code:
:If H=X and Y=Z
:Goto 2
:Lbl 2
:If H=X and Y#Z
:Goto 1
:If H#X
:Goto 1
Il suffit d'écrire
:If Y#Z or H#X
:Goto 1
- Code:
Je ne trouve pas de label 9.
:If H=1
:Goto 9
Tu devrais utiliser une boucle et placer comme condition de sortie la collision plutôt que tester toutes les conditions de poursuite du jeu.
Par ailleurs utiliser une boucle plutôt que des Goto est souvent préférable pour la rigueur et les bugs.
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
Autre chose:
Cette suite aussi:
A l'avenir tout topic qui présente ton programme ou un autre (celui que t'as aimé) se postent dans la catégorie "programmes des internautes" et non ti82stats. Ici c'est plus pour les topics sur un modèle en particulier.
En tout cas, bravo pour ton programme, je ne l'ai pas testé, mais j'essaierais plus tard!!!
Continue comme ça
- Code:
0->S
- Code:
DelVar S
Cette suite aussi:
- Code:
:Lbl 1
:If Y=3
:Goto 2
:If Y=6
:Goto 2
:ClrHome // celui la est plus utile que le premier, donc tu peux effacer le premier.
:H-1->H
:Getkey->K
:If K=25
:Y-1->Y
:If K=34
:Y+1->24 //t'es sur que t'as aucun bug??? Je mettrais plutôt Y, non?
:If K=24
:X-1->X
- Code:
Lbl 1
If Y=3 or Y=6
Goto 2
ClrHome
H-1->H
Getkey
If Rép=24
X-1->X
If Rép=25
Y-1->Y
If Rép=34
Y+1->Y
A l'avenir tout topic qui présente ton programme ou un autre (celui que t'as aimé) se postent dans la catégorie "programmes des internautes" et non ti82stats. Ici c'est plus pour les topics sur un modèle en particulier.
En tout cas, bravo pour ton programme, je ne l'ai pas testé, mais j'essaierais plus tard!!!
Continue comme ça
rpgcreator- Connaisseur
- Messages : 252
Points Concours : 27
Productivité : 6
Date d'inscription : 16/09/2013
Localisation : Vernouillet 28
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
Je conteste. Les calculs de X et Y modifient Rép/Ans. Donc si la première condition K=Rép=24 est vraie alors la prochaine condition ne sera plus K=Rép=25 mais X-1=Rép=25. Heureusement les coordonnées du TI-Basic dans l'écran principal sont inférieures à 16 donc ne peuvent valider les conditions 25/26/34 si une précédente 24 est vraie. Mais cette hypothèse basée sur cet écran précis ne me plaît pas.rpgcreator a écrit:
Ça se simplifie en utilisant Rép/Ans au lieu de K. Et comme linkakro disait les conditions se simplifient.
- Code:
Lbl 1
If Y=3 or Y=6
Goto 2
ClrHome
H-1->H
Getkey
If Rép=24
X-1->X
If Rép=25
Y-1->Y
If Rép=34
Y+1->Y
Où se trouve la condition 26 de la touche droite ???
Avec un DelVar, faites seulement attention à ce qui vient derrière.
Lorsque le jeu aura plusieurs lignes d'obstacles le vrai défi commencera au vu de toutes les solutions.
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
On a droit à la calto maintenant au brevet de français?LPehix a écrit: Salut a tous et a toutes pour mon premier post sur ce forum je vais vous présenter un programme que j'ai fait a la fin de mon brevet de français (et oui je me faisais chier)
m@thieu41- ----------------------
- Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
Sa me penser à l'un de mes programmes, http://tiplanet.org/forum/archives_voir.php?id=16549
Sinon beau travail ;-)
Sinon beau travail ;-)
Re: Racer
Bonjour
j'ai essayé ton programme mais pas réussi à le faire fonctionner correctement
tu as du faire des fautes de frappe en recopiant
:Y+1->24 // Y+1->Y ?
:Output(Y,X,") //es-tu sûr ? il y a un espace après le " je suppose
:Output(Z,H,"* // le Z tu le sors d'où ? jamais utilisé ailleurs dans le programme ..
Le Stop à la fin n'est pas utile car le programme s’arrête quoiqu'il en soit
mais c'est bien continue ! tu arrives dans la partie debuggage
j'ai essayé ton programme mais pas réussi à le faire fonctionner correctement
tu as du faire des fautes de frappe en recopiant
:Y+1->24 // Y+1->Y ?
:Output(Y,X,") //es-tu sûr ? il y a un espace après le " je suppose
:Output(Z,H,"* // le Z tu le sors d'où ? jamais utilisé ailleurs dans le programme ..
Le Stop à la fin n'est pas utile car le programme s’arrête quoiqu'il en soit
mais c'est bien continue ! tu arrives dans la partie debuggage
ça marche pour une ti82stats fr ?Wistaro a écrit:Sa me penser à l'un de mes programmes, http://tiplanet.org/forum/archives_voir.php?id=16549
Sinon beau travail ;-)
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
Oui il fonctionne sur ti82stats. Je crois qu'il l'avait posté sur le tout82ancien. Le bandeau d'information mentionne la catégorie 82stats. Le chemin d'hébergement n'est pas la seule information.jo2geek a écrit:ça marche pour une ti82stats fr ?Wistaro a écrit:Sa me penser à l'un de mes programmes, http://tiplanet.org/forum/archives_voir.php?id=16549
Sinon beau travail ;-)
Je confirme les encouragements, mais je souligne qu'il y a encore beaucoup chemin à faire.
Linkakro- ----------------------
- Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
jo2geek a écrit:Bonjour
j'ai essayé ton programme mais pas réussi à le faire fonctionner correctement
tu as du faire des fautes de frappe en recopiant
:Y+1->24 // Y+1->Y ?
:Output(Y,X,") //es-tu sûr ? il y a un espace après le " je suppose
:Output(Z,H,"* // le Z tu le sors d'où ? jamais utilisé ailleurs dans le programme ..
Le Stop à la fin n'est pas utile car le programme s’arrête quoiqu'il en soit
mais c'est bien continue ! tu arrives dans la partie debuggageça marche pour une ti82stats fr ?Wistaro a écrit:Sa me penser à l'un de mes programmes, http://tiplanet.org/forum/archives_voir.php?id=16549
Sinon beau travail ;-)
Il ne s'agit pas d'une erreur de recopiage, étant donné que j'ai extrait le programme de ma calculatrice par cable USB.
Je me permet de fournir un lien vers le topic original: http://www.tout82.org/t108-prgm-ti-road?highlight=ti+road
Re: Racer
je crois que là on mélange les 2 programmes...
l'erreur de recopiage n'est pas le tien Wistaro
l'erreur de recopiage n'est pas le tien Wistaro
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
Les deux programmes?jo2geek a écrit:je crois que là on mélange les 2 programmes...
l'erreur de recopiage n'est pas le tien Wistaro
Re: Racer
Il parlait de celui de LPehix, pas du tiens
m@thieu41- ----------------------
- Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
exactementm@thieu41 a écrit:Il parlait de celui de LPehix, pas du tiens
jo2geek- Connaisseur
- Messages : 116
Points Concours : 81
Productivité : 9
Date d'inscription : 27/01/2014
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
Et c'est normal, car on ne peut rien affecter a une valeur. Je n'ai pas le temps de tester le programme... :'(
Mais... Depuis quand on a une graphique en 3eme ??????? WTF
Waaaoouuuh trop de la bombe x) !!!!!m@thieu41 a écrit:On a droit à la calto maintenant au brevet de français?LPehix a écrit: Salut a tous et a toutes pour mon premier post sur ce forum je vais vous présenter un programme que j'ai fait a la fin de mon brevet de français (et oui je me faisais chier)
Mais... Depuis quand on a une graphique en 3eme ??????? WTF
rpgcreator- Connaisseur
- Messages : 252
Points Concours : 27
Productivité : 6
Date d'inscription : 16/09/2013
Localisation : Vernouillet 28
Calculatrice(s) :- TI-82 Stats.fr
. :
Re: Racer
C'est génial x) On s'est tous fait avoir avec la petite casio verte fx92 2D+, alors qu'eux ont une graphique !
Re: Racer
Nan mais je pense que c'est des cas particuliers
C'est les casio/ti collèges qui sont conseillées normalement.
C'est les casio/ti collèges qui sont conseillées normalement.
m@thieu41- ----------------------
- Messages : 939
Points Concours : 65
Productivité : 47
Date d'inscription : 02/06/2013
Localisation : Nice, France
Calculatrice(s) :- TI-82 Stats.fr
. :
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|
Dim 16 Oct 2022 - 21:11 par Wistaro
» Bonne année 2018!
Ven 2 Nov 2018 - 19:42 par Ti64CLi++
» Lancement du TI-Concours 2017 !
Sam 20 Mai 2017 - 0:27 par Paulo1026
» Chaînes Youtube des membres
Ven 19 Mai 2017 - 22:41 par Wistaro
» cacul du taux d'intêret
Ven 24 Mar 2017 - 21:50 par m@thieu41
» [Projet] Un mario by tout82
Dim 29 Jan 2017 - 14:09 par Wistaro
» Cherche documentation assembleur TI82stat
Mer 25 Jan 2017 - 12:29 par Ti64CLi++
» Probleme Ti-82 Stats fr
Jeu 12 Jan 2017 - 13:56 par Ti64CLi++
» ROM 82 stats.fr
Jeu 15 Déc 2016 - 10:24 par Ti64CLi++