| Pongs |
| Auteur |
Message |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Dim 27 Oct 2013, 11:59
|
|
 |
| Citer | | EDIT: n'hésite pas à me relancer, je risque fort d'oublier |
[Action] : Silennus s'approche par derrière de linkakro et.... le relance !
Voilà,voilà....
----------------------
Objectif : Game designer ! |
 |
  |
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mer 30 Oct 2013, 0:39
|
|
|
J'ai testé le premier superficiellement et pas encore testé le deuxième.
Le Else permet d'économiser des tests.
Le 3 dans rand3 représente la probabilité 1/3 de changer de direction au rebond. Vous pouvez utiliser une variable de niveau.
Une prochaine étape de mise à jour pourrait être les rebonds perpendiculaires aux bords.
Les déplacements décimaux pourront aussi être appliqués plus tard.
--- edit 7/11/2013
Syntaxe de Ti82 à la base.
Catalogue des fonctions bilingue dans ma signature.
J'ajoute quelques commentaires pour aider à traduire.
Ceux qui contiennent "randInt(" et "entAléat(" sont des fonctions de Ti82stats(fr)
---
Aléas de rebonds, correction des rebonds sur les coins inférieurs de l'écran (version Solo) et haut des raquettes (version Duo).
Solo.
| Code | :ClrHome
:0->W
:0->S
:1+int rand13->A // 1+int(rand13->A // 1+ent(NbrAléat13->A
// randInt(1,13->A // entAléat(1,13->A
:A+1->C
:7->D
:-1->E
:1-2int rand2->F
:Lbl 0
:If D=8:Goto 1
:ClrHome
:Output(8,A,"----
:Output(D,C,"O
:getKey->K
:If K=24 and A>1
:A-1->A
:If K=26 and A<13
:A+1->A
:If K=105
:Pause
:C+F->C
:D+E->D
### ci-dessous jusqu'aux prochains ### c'est la version normale sans rebond surprise
:If C=1 or C=16
:-F->F
:If D=1
:1->E
:If D=7 and (C=A or C-A-1 or C-A-2 or C-A-3
:Then
:-1->E
:S+1->S
:End
### ci-dessous c'est la version avec des rebonds surprises ajoutés
// vous pouvez remplacer :not int rand6
// par une de ces expressions
// not(int(rand6 // non(ent(NbrAléat6
// not(randInt(0,5 // non(entAléat(0,5
:(C-1 and C-16 or D-1 and D-7) and not int rand6->B
:If C=1 or C=16
:Then
:-F->F
:If B
:-E->E
:End
:If D=1
:Then
:1->E
:If B
:-F->F
:End
:If D=7 and (C=A or C-A-1 or C-A-2 or C-A-3
:Then
:-1->E
:If B
:-F->F
:S+1->S
:End
###
:Goto 0
:Lbl 1
:Output(8,1,"SCORE:"
:Output(8,7,S
:Pause
:ClrHome
:Output(1,1,"PAR SANGOHAN38
:Output(3,5,"SILENNUS
:Output(5,1,"ET LINKAKRO |
edit 27/09/2014: attention aux 4->C/4->B que j'avais confondu avant, et que j'ai corrigé maintenant.
edit 27/09/2014: modifié les rebonds, car quelques techniques étaient fausses (abandon de la variable Ans/Rép et une seule condition évite les erreurs de rebond surprise dans les coins)
Duo.
| Code | :1-2int rand2->Z // 1-2randInt(0,1->Z
:1-2int rand2->D
:8->X
:2+int 6rand->Y // 2+int(6rand // 2+ent(6NbrAléat->Y
// randInt(2,7->Y // entAléat(2,7
:Y->A // 4->A si vous voulez ne pas aligner à la balle
:Y->C // 4->C idem
:Lbl 0
:ClrHome
:Output(A,1,"!
:Output(A+1,1,"!
:Output(C,16,"!
:Output(C+1,16,"!
:Output(Y,X,"O
:getKey->K
:If K=105
:Pause
:If K=25 and C-1
:C-1->C
:If K=21 and A-1
:A-1->A
:If K=41 and A-7
:A+1->A
:If K=34 and C-7
:C+1->C
:X+Z->X
:Y+D->Y
:If X=1
:Goto 1
:If X=16
:Goto 2
### ci-dessous jusqu'aux prochains ### c'est la version normale sans rebond surprise
:If Y=1 or Y=8
:-D->D
:If X=2 and (A=Y or A+1=Y) or X=15 and (C=Y or C+1=Y
:-Z->Z
### ci-dessous c'est la version avec des rebonds surprises ajoutés
// vous pouvez remplacer :not int rand6
// par une de ces expressions
// not(int(rand6 // non(ent(NbrAléat6
// not(randInt(0,5 // non(entAléat(0,5
:(Y-1 and Y-8 or X-2 and X-15) and not int rand6->B
:If Y=1 or Y=8
:Then
:-D->D
:If B
:-Z->Z
:End
:If X=2 and (A=Y or A+1=Y) or X=15 and (C=Y or C+1=Y
:Then
:-Z->Z
:If B
:-D->D
:End
###
:Goto 0
: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
:ClrHome
:Output(1,1,"PAR SANGOHAN38
:Output(3,5,"SILENNUS
:Output(5,1,"ET LINKAKRO |
EDIT 7/11/2013 : je corrige immédiatement les crédits dans lesquels j'avais ecrit Ratuss au lieu de Sangohan38 !
EDIT 17/11/2013 : ajout de commentaires sur les fonctions randInt et entAléat ainsi que le commentaire qui désigne l'alignement des raquettes à la balle.
----------------------
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 31 Oct 2013, 14:42
|
|
|
Arretez moi si je me trompe mais :
int = ent
rand = NbrAléat
Non ?
----------------------
Objectif : Game designer ! |
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Jeu 31 Oct 2013, 14:45
|
|
|
Et
ClrHome = EffEcr
----------------------
Objectif : Game designer ! |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 31 Oct 2013, 15:59
|
|
|
Oui. Voir catalogue de ma signature pour toute traduction.
(sauf que pour être parfaitement exact int=partEnt et iPart=ent contrairement à la logique, preuve dans mon article dédié)
----------------------
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 : Mer 06 Nov 2013, 18:51
|
|
|
La ligne "not int rand3" s'apparente à "non ent Nbraléat3" ou pas ?
J'ai essayé de trouver ton dico de trad' mais j'ai pas trouver...
----------------------
Objectif : Game designer ! |
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mer 06 Nov 2013, 20:42
|
|
|
Oui c'est ça.
Petit problème au niveau int/iPart/ent/partEnt: http://tout82.free.fr/forum/sujet.php?sujet=2317
int=partEnt (même si ici ça revient au même).
Donc tu peux aussi mettre:
non(partEnt(NbrAléat3
(avec les parenthèses automatiques).
Le catalogue de traduction est disponible sur ce sujet:
http://tout82.free.fr/forum/sujet.php?sujet=2833
Lien direct:
http://www.mediafire.com/download/ts4zli2bum3zuvm/Catalogue+du+TI+Basic+z80.rtf
----------------------
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 : Jeu 07 Nov 2013, 20:01
|
|
|
Merci à toi !
----------------------
Objectif : Game designer ! |
| |
|
| |
Silennus
Autorisation : Membre
Nb de messages : 23
Inscrit le : Mer 09 Oct 2013, 15:12
|
Posté le : Jeu 07 Nov 2013, 20:47
|
|
|
Je viens de finir de taper le second et voici mes observations : il marche correctement, la balle va un peu vite (je trouve), les raquettes apparaissent n'importe où (sur la verticale). je pense qu'il faudrait rectifier ce dernier point !
----------------------
Objectif : Game designer ! |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 07 Nov 2013, 21:30
|
|
|
Ma signature qui pointe la même chose actuellement que m@thieu41 ne suffisait pas ? Tant pis maintenant c'est en évidence.
Le manuel de la ti82statfr contient les noms anglais en plus du français.
La ti82 est similaire à la ti82stat, la majeure différence est l'abscence de certaines parenthèses et fonctions.
J'ai utilisé une syntaxe de Ti82 pour respecter la tradition des programmes de la génération de Sangohan38.
J'ai justement écrit les formules en essayant que n'importe quel modèle soit compatible sans modifier des parenthèses autres que celles incluses aux fonctions.
Je regarde mon code en essayant de trouver si j'ai écrit une bêtise, mais je ne sais pas bien ce que tu signales.
Je corrige aussi les crédits.
----------------------
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 : Ven 08 Nov 2013, 20:58
|
|
|
Pour être plus clair : Je signale le fais que les raquettes apparaissent tjrs en face et chacune de son coté mais peuvent être tout en haut comme tout en bas comme au milieu. Cela est t'il plus clair ?
Pour ton explication sur les trad' et le reste j'ai compris mais si je n'ai pas trouvé hier ce que je ne trouve pas beaucoup de choses en général ! Même mais parents s'en plaignent !
----------------------
Objectif : Game designer ! |
| |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Sam 09 Nov 2013, 13:02
|
|
|
C'est voulu en fait...
Si tu ne veux pas ça, change:
Par:
----------------------
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 : Dim 17 Nov 2013, 11:25
|
|
|
Merci à toi !
----------------------
Objectif : Game designer ! |
| |
|
| |
BladerChris
Invité
|
Posté le : Sam 30 Aoû 2014, 12:05
|
|
|
Je fais mon upper de topic mais il y a un problème à la ligne 12 du premier pong et il n'est toujours pas résolu.
Quelqu'un pourrait il voir?
Merci
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Sam 30 Aoû 2014, 14:33
|
|
|
| Code | | ligne 12 :Output(8,A,"---- |
J'imagine qu'un message erreur:domaine (valeur de la variable A invalide) se produit lorsque la balle arrive dans un coin inférieur, comme on en a déjà parlé dans la discussion.
La correction de ce problème précis consistait à éviter le conflit entre les conditions de rebond latéraux et les conditions de rebond sur la raquette. En effet l'un empêchait l'autre, et la variable A prenait une valeur qui dessinerait hors de l'écran.
Si c'est bien ton problème, alors tu as plutôt intérêt à copier ma version page 18 ou ma version page 21 car les conditions de rebonds (latéral vs raquette) ont été modifiées notamment pour éviter ce conflit.
Si ce n'est pas ton problème, alors une description plus développée aidera à le trouver : type d'erreur s'il y en a une ou le phénomène sinon, et l'emplacement du curseur au long de la ligne.
----------------------
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 |
| |
|
| |
NoviceT82
Invité
|
Posté le : Mer 03 Sep 2014, 16:26
|
|
|
Bonjour, je sais pas si des modérateurs continue de jetez un oeil ici mais je rencontre un problème :
La balle rebondue peut importe que l'on la touche avec la raquette ou non :/
Je ne sais pas si c'est fait exprès mais j'aimerais régler ceci pourriez-vous m'aider ?
Merci d'avance !
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mer 03 Sep 2014, 18:05
|
|
|
(Aider les visiteurs n'est pas le rôle d'un modérateur, mais accessoirement j'en suis un. Et je passe encore chaque jour.)
Le rebond de la raquette dans le tout premier jeu solo est géré par ces lignes.
| Code | // la longue ligne de test doit être fausse.
:If D=7 and C=A or D=7 and C=A+1 or D=7 and C=A+2 or D=7 and C=A+3
:Goto 2 |
| Code | :Goto 0 // ceci est indispensable
:Lbl 2 // la suite commande la montée, cela sert au rebond
:-1->E
:S+1->S
:Goto 0 |
La ligne de test peut être factorisée comme dans les autres programmes que j'ai posté dans le même sujet.
| Code | | :If D=7 and (C=A or C=A+1 or C=A+2 or C=A+3 |
----------------------
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 |
| |
|
| |
NoviceT82(Monjenx)
Invité
|
Posté le : Jeu 04 Sep 2014, 17:39
|
|
|
D'accord merci beaucoup 
Mais je conte m'inscrire dans tout les cas de toute façon car je vois que le site est à jour est encore utiliser et bien utile
|
| |
|
| |
Monjenx
Autorisation : Membre
Nb de messages : 24
Inscrit le : Jeu 04 Sep 2014, 17:40
|
Posté le : Jeu 04 Sep 2014, 17:41
|
|
|
Voilà qui est fait
Et franchement merci pour ta réponse sa ma permis de régler mon problème !
|
| |
|
| |
Monjenx
Autorisation : Membre
Nb de messages : 24
Inscrit le : Jeu 04 Sep 2014, 17:40
|
Posté le : Jeu 04 Sep 2014, 17:49
|
|
|
J'ai une dernière Question :
Comment faire la différence entre le - "tiret" et le - "signe moins / négatif" ?
Est-ce que la calculette s'n fiche ou est-ce qu'elle prend en compte que le "négatif" ou le "tiret" généralement et pour ce code ?
|
| |
|
| |
