| Pongs |
| Auteur |
Message |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Lun 14 Oct 2013, 20:50
|
|
 |
Vérifie ces lignes:
| Code | :If K=25 and C-1>0:C-1->C
:If K=21 and A-1>0:A-1->A
:If K=41 and A+2<9:A+1->A
:If K=34 and C+2<9:C+1->C |
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne  |
 |
  |
| |
Porygon
Autorisation : Membre
Nb de messages : 10
Inscrit le : Lun 14 Oct 2013, 18:51
|
Posté le : Lun 14 Oct 2013, 21:03
|
|
|
Bon la touche "Math" et "Haut" marche
Merci encore !!
|
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Lun 14 Oct 2013, 21:05
|
|
|
La touche 2nde est gérée par cette ligne ci:
| Code | | :If K=21 and A-1>0:A-1->A |
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
Porygon
Autorisation : Membre
Nb de messages : 10
Inscrit le : Lun 14 Oct 2013, 18:51
|
Posté le : Lun 14 Oct 2013, 21:14
|
|
|
Pardon justement la touche 2nde marche c'est la touche "Math" et "Bas" qui marche pas 
|
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Lun 14 Oct 2013, 21:20
|
|
|
Ce sont les lignes:
| Code | :If K=41 and A+2<9:A+1->A
:If K=34 and C+2<9:C+1->C |
Je pense que tu as du mettre ">" au lieu de "<"
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
Porygon
Autorisation : Membre
Nb de messages : 10
Inscrit le : Lun 14 Oct 2013, 18:51
|
Posté le : Lun 14 Oct 2013, 21:27
|
|
|
Y'a juste la "MATH" qui marche pas 
En tout cas Marco beaucouuuuuuup !!!
|
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Lun 14 Oct 2013, 21:37
|
|
|
Math c'est:
| Code | | :If K=41 and A+2<9:A+1->A |
Je décompose:
Tu as bien mis "K=41"?
Tu as bien mis "A+2"?
Tu as bien mis "<9"?
Tu as bien mis ":A+1->1"
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
Porygon
Autorisation : Membre
Nb de messages : 10
Inscrit le : Lun 14 Oct 2013, 18:51
|
Posté le : Mar 15 Oct 2013, 10:11
|
|
|
Merci sa marche et une dernière qustion ^^ Pour le ping 1 joueur est-il possible de ralentir la balle car elle vas plus vite que la plateforme se déplace !
En tout cas merci beaucoups !!
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mar 15 Oct 2013, 17:35
|
|
|
Ca risque de ralentir pas mal le jeu...
D'abord au lieu de:
tu mets
| Code | | :Output(partEnt(D),partEnt(C),"O |
Ensuite:
Sachant que la valeur actuelle est 1, et que la vitesse de la balle diminue avec cette valeur, tu choisis un nombre (genre si tu veux qu'elle aille 2 fois moins vite tu prend 0.5, si tu veux qu'elle aille 1.5 fois moins vite tu prend 0.67).
Et tu le remplace ici (j'ai choisis 0.5 mais tu prend ce que tu veux. Par contre respecte bien le signe (positif ou negatif).
et aussi ici:
| Code | :If C=1:.5->F
:If C=16:-.5->F |
et enfin:
Ca devrait marcher.
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
Porygon
Autorisation : Membre
Nb de messages : 10
Inscrit le : Lun 14 Oct 2013, 18:51
|
Posté le : Mar 15 Oct 2013, 18:28
|
|
|
Ok merci tu gère trop
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mar 15 Oct 2013, 18:43
|
|
|
De rien
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Mar 15 Oct 2013, 18:47
|
|
|
Dsl, je n'ai pas pu avoir accez à internet et donc j'ai pas pu répondre/voir vos messages. Pour les commandes :
If X=1:Goto 1
If X=16:Goto 2
J'ai vérifié et elle sont bien tapés. Voici les probs que j'ai en ce moment sur pong : Quand la part sup. de la raquette adverse est touché il est déclaré perdant (et donc moi gagnant) et quand c'est la mienne qui est touché ( tjrs la part sup.), c'est comme si le jeu s'arretait mais que tout restait en place, d'ailleurs la barre pour écrire s'affiche comme si j'étais à "l'écran d’accueil" alors que les raquettes et la balle sont tjrs là.
----------------------
Objectif : Game designer ! |
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mar 15 Oct 2013, 19:42
|
|
|
Il y a un problème dans ces conditions pour le rebond avec la raquette:
Change cette ligne:
| Code | | If X=2 et C=Y ou X=15 et C+1=Y:(-)1->Z |
Par celle ci:
| Code | If (X=2 ou X=15) et (C=Y ou C+1=Y
(-)1->Z |
De plus, vérifie que tu as bien mis:
| Code | Lbl 1
Output(4,5,"WINNER-> [La flèche correspond ici à [Moins][Plus grand que] et non à sto->]Output(5,5,"<--LOSER
Goto Q |
Et aussi qu'il n'y a pas autre part d'autre "Lbl 1" (à la fin du prgm par e
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Mer 16 Oct 2013, 14:49
|
|
|
Il n'y a plus de problème concenrant ma raquette et je t'en remercie mais le problème persiste tjrs pour la raquette de l'adversaire. Sinon j'ai un truc à demander qui ne releve pas d'un bug (ou du moins pas directement) : Le jeu n'affiche les crédits que si c'est moi qui perd (ce qui n'arrive pas puisque je n'ai pas besoin de bouger la raquette et que l'adversaire perd à tout les coups) et j'aimerais qu'il affiche les crédits à chaque que l'un de nous perde.
----------------------
Objectif : Game designer ! |
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mer 16 Oct 2013, 15:07
|
|
|
Voici la partie qui gère tes différents pb:
| Code | If X=1:Goto 1 //Quand on a perdu on va au lbl 1
If X=16: Goto 2 //Quand on a gagné on va au lbl 2
If Y=1:1->O
If Y=8:(-)1->O
If X=2 et C=Y ou X=15 et C+1=Y:(-)1->Z
Goto 0
EffEcr
Lbl 1
Output(4,5,"WINNER->
Output(5,5,"<--LOSER
Goto C //Remplace ceci pour aller ensuite au Lbl C
Lbl 2
Output(4,5,"<-WINNER
Output(5,5,"Loser-->
Lbl C //Le Lbl C contient les crédits maintenant
Pause
EffEcr
Output(3,5,"PONG 1.1
Output(4,7,"PAR:
Output(5,5,"SILENNUS
Output(6,5,"08/10/13 |
Donc si tu perds ça veut dire que X=16.
Donc ça veut dire que je me suis trompé
| Code | If (X=2 ou X=15) et (C=Y ou C+1=Y
(-)1->Z |
En fait c'est complètement faux: je fait tout par rapport à la raquette de l'adversaire...
Correction:
| Code | If X=2 et (A=Y ou A+1=Y) ou X=15 et (C=Y ou C+1=Y
(-)1->Z |
Ca devrait marcher non?
----------------------
Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 17 Oct 2013, 1:05
|
|
|
Utiliser des tests d'égalité sur des variables qu'on somme avec des décimaux n'est pas judicieux, mais cela marche dans ce contexte puisque l'intervalle est étroit.
(ce serait bien de le mentionner objectivement dans le message à propos du ralentissement de la balle devant celle de la raquette)
Il serait bien plus simple d'étoffer les programmes de Sangohan38 page 1 ou mes deux améliorés page 18, que de trafiquer le programme manifestement bancal de Silennus.
Mais Silennus peut bien recevoir des aides pour s'améliorer.
m@thieu41 : Tes corrections semblent justes
Silennus : et enlève le Lbl Q que tu as probablement placé à la fin (ambiguïté de la fin je pense) malgré le sous-entendu de m@thieu41 (citation 1 ci-dessous, parmi celles ci qui retracent une partie de l'histoire).
| Citer : m@thieu41 | Pour ton erreur étiquette:
Ca veut dire que à un moment donné, dans ton code tu met
Goto XX
avec XX un ou deux caractères (chiffre ou lettre)
Mais que tu ne mets pas le Lbl XX qui correspond.
Résultat, la calto lit "Goto XX" et cherche le Lbl XX pour y aller. Mais là elle ne trouve pas, donc elle renvoi "Err Etiquette".
Du coup vérifie tes occurrences de Goto/Lbl dans ton code.
Il y a un autre problème du type:
tu mets Goto Q, mais il n'y a pas de Lbl Q... (rajoute le à la fin du prgm) |
| Citer : Silennus | | Pour le prob d'étiquette signalé plus haut, ça a été réglé. |
| Citer : Silennus | | quand c'est la mienne qui est touché ( tjrs la part sup.), c'est comme si le jeu s'arretait mais que tout restait en place, d'ailleurs la barre pour écrire s'affiche comme si j'étais à "l'écran d’accueil" alors que les raquettes et la balle sont tjrs là. |
| Citer : m@thieu41 | Lbl 1
Output(4,5,"WINNER->
Output(5,5,"<--LOSER
Goto C //Remplace ceci pour aller ensuite au Lbl C
Lbl 2
Output(4,5,"<-WINNER
Output(5,5,"Loser-->
Lbl C //Le Lbl C contient les crédits maintenant
Pause
EffEcr |
Et il n'y a pas seulement les Goto/Lbl mais aussi les menus à vérifier.
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Jeu 17 Oct 2013, 20:12
|
|
|
Effectivement, ça marche pour les crédits mais, il y à a nouveau l'erreur concernant les part. sup. des 2 raquettes, je suis perdant si la mienne est touché et inversement quand c'est celle de l'adversaire !
----------------------
Objectif : Game designer ! |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 17 Oct 2013, 20:57
|
|
|
Je ne parviens pas à cerner le problème avec les changements un à un. Réaliser une version entière sera plus efficace. Et je l'ai fait pendant une part des discussions précédentes.
Ci-après j'ai repris directement le premier code posté par Silennus page 18.
Des conditions manquaient depuis le début pour les rebonds sur raquettes et les variables d'ordonnée étaient inversées.
J'ai allégé la syntaxe car les ( - ) sont pénibles.
J'ai utilisé des retours à la ligne pour aérer. Tu devrais faire pareil sur TI.
Je m'énerve et remplace les aléatoires des raquettes par mon propre code. Ainsi que D à la place de O qui pose toujours des problèmes à ceux qui confondent avec zéro.
Il y avait une affectation de -1 à Z sur les deux raquettes, alors ququ'il faut changer le signe pour l'une. Donc il faut opposer Z.
| Code | :1-2ent(NbrAléat2->Z // 1-2*{0,1}={1,-1}
:1-2ent(NbrAléat2->D
:4->A
:4->C
:8->X
:4->Y
:Lbl 0
:EffEcr
:Output(A,1,"]
:Output(A+1,1,"]
:Output(C,16,"[
:Output(C+1,16,"[
:Output(Y,X,"°
:codeTouche->K
:If K=105
:Then
:Output(4,6,"PAUSE!
:Pause
:End
:If K=25 et C-1
:C-1->C
:If K=21 et A-1
:A-1->A
:If K=41 et A-7
:A+1->A
:If K=34 et C-7
:C+1->C
:X+Z->X
:Y+D->Y
:If X=1
:Goto 1
:If X=16
:Goto 2
:If Y=1
:1->D
:If Y=8
:-1->D
:If X=2 et (A=Y ou A+1=Y) ou X=15 et (C=Y ou C+1=Y
:-Z->Z
:Goto 0
:EffEcr
:Lbl 1
:Output(4,5,"WINNER-> //"->"= "-" + ">" mais pas "sto->"
:Output(5,5,"<--LOSER
:Goto C
:Lbl 2
:Output(4,5,"<-WINNER
:Output(5,5,"LOSER-->
:Lbl C
:Pause
:EffEcr
:Output(1,1,"PAR SILENNUS
:Output(2,1,"D'APRES RATUSS |
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Sam 19 Oct 2013, 11:59
|
|
|
Je te remercie tout marche à merveille ! Juste une dernière chose : Est-il normal que la balle arrive tjrs au même endroit de chaque coté après qu'elle est rebondi sur ma raquette ou celle de l'adversaire ? Schéma :
| Code |
!---------------!
! ! // Si la balle touche en premier en 1,
!]°1 [! // Elle ira ensuite en 2.
!] 3°[! //Si la balle touche en premier en 3,
!°4 2°! //Elle ira ensuite en 4.
!---------------!
|
----------------------
Objectif : Game designer ! |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Sam 19 Oct 2013, 16:37
|
|
|
Ce genre de cycle est normal avec trop peu d'aléatoire et seulement 4 directions.
Toutefois il devrait déjà y en avoir.
Je ne pense pas que tu initialises la fonction aléatoire... mais cela expliquerait aussi un cycle systématique.
0->NbrAléat donne le même effet sur les aléas que le réglage d'usine.
Regarde ce que j'ai posté page 18 pour voir quelques aléas supplémentaires sur les positions initiales.
Je compte ajouter des aléas sur les rebonds pour satisfaire ta demande initiale.
Je ferai un mix de ta réédition et de la mienne.
EDIT: n'hésite pas à me relancer, je risque fort d'oublier
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
