Poster un nouveau sujet Poster une réponse <<   Page: , , , ..., , 8, , ,      >>
POC3 (jeu de pong)
Auteur Message
bazz
Invité
Posté le : Dim 18 Sep 2011, 12:21   Citer 

bonjour , moi j'adore ce jeu et il marche très bien godgrace.gif
Je change souvent de balle en remplacant le * par 0 ou des trucs comme sa eyeonly.gif
J'aimerai savoir si on pouvait changer de balle a chaque fois qu'elle est frappée eyeonly.gif
par exemple : je frappe une balle qui est un P puis quand l' I.A la renvoit sa devient un O puis quand je la renvois un n ... etc
Et si ( le must du must ) on pourrait aussi donner un nom d'utilisateur quand on commence une partie et que c'est les lettres de notre nom qui deviennent les balles
exemple:
commencer
nom d'utilisateur = basile
la premiere balle est un B puis elle devient un A puis un S ...jusqu'a E puis on recommence a B
Si vous arrivez a faire sa se serait top svp
et merci pour ce super jeu happy.gif

  Haut de page Bas de page 
 
sandro



Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Dim 18 Sep 2011, 13:07   Citer 

Ca devrait marcher si tu rajoute les 3 premières lignes et que tu modifie au niveau des deux lignes que j'ai un peut séparé des autres vers le milieu

Sandro


Code
Input "NOM:",Str1
1->G
Lenght(Str1 -> H

1->Y
2->dim( [Liste <2nd puis 1>]
{1,9->dim([F]
Lbl M
ClrHome
Menu("POC3 COC5(C)2007","COMMENCER",C,"CONTINUER",3,"NIVEAU A.I",4,"QUITTER",5
Lbl 5:Stop
Lbl 4
10P->A
ClrHome
Disp "NIVEAU A.I",""," DEBUTANT"," FACILE"," MOYEN"," DIFFICILE"," HARDCORE
1->F
Repeat K=105
getKey->K
A->C
min(5,max(1,A+(K=34)-(K=25->A
If F:A->C
0->F
Output(C+2,1," "
Output(A+2,1,"*
End
A/10->P
Goto M
Lbl C
{3,3-> [Liste <2nd puis 1>]
Lbl D
If P>.5 or P<.1:.3->P
6->F:7->A:7->E:8->B
7->G:7->H:0->C:0->D
2->Y
Goto 0
Lbl 3
If not([F](1,1
Goto M
[F](1,1->A
[F](1,7->D
[F](1,2->B
[F](1,8->C
[F](1,3->E
Ans->G
[F](1,4->F
Ans->H
[F](1,9->P
{ [F](1,5),[F](1,6-> [Liste <2nd puis 1>]
1->Y
Lbl 0
A->Q
B->S
Repeat K=22
Repeat not(Y
Output(Q,S," "
B+(B=17)+not(B->B


Output(A,B,Sub(Str1,G,1
G+1-(H-1)(G=H) -> G

Output(1,H,"   "
Output(1,F,"===
getKey->K
If Y-1:Then
(Ans=26)-(Ans=24->M
Output(8,E,"   "
min(14,max(1,E+M->E
Output(8,E,"===
B+C(A-1->O
F->H
If O>16:32-O->O
If O<1:2-O->O
3rand2P(O-F-1+(A<4)2rand
If P>.3 and A=2 and F=B-1:9E-9F
min(14,max(1,F+(Ans>1-2P)-(Ans<2P-1->F
End
If Y=2
Output(4,4,"APPUYEZ SUR     UNE TOUCHE
If Y:Then
If K and K-24 and K-26:0->Y
If Y=2:min(E+2,max(E,B->B
ClrHome
Output(1,16, [Liste <2nd puis 1>] (2
Output(8,1, [Liste <2nd puis 1>] (1
End
End
If K=21:Pause
A->Q
B->S
A+D->A:B+C->B
If A=9 or not(A
Then
1+not(A
-1+ [Liste <2nd puis 1>] (Ans-> [Liste <2nd puis 1>] (Ans
ClrHome
If Ans
Goto D
If  [Liste <2nd puis 1>] (2:Disp "VOUS AVEZ PERDU!
If  [Liste <2nd puis 1>] (1:Disp "VOUS AVEZ","GAGNE !
Stop
End
C-2C(B+C>16 or B+C<1->C
A>6->V
A<3->W
If V and E [INFERIEUR OU EGAL] B and E [SUPERIEUR OU EGAL ]B-2 or W and F [INFERIEUR OU EGAL] B and F [SUPERIEUR OU EGAL] B-2:Then
(B-(F+1)W-(E+1)V)(1+(A=8 or A=1->C
W-V->D
End
End
Menu("SAUVEGARDER ?","OUI",O,"NON",N
Lbl O
[[A,B,E,F, [Liste <2nd puis 1>] (1), [Liste <2nd puis 1>] (2),D,C,P->[F]
Lbl N
ClrHome
Output(1,9,"



----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
bazz
Invité
Posté le : Dim 18 Sep 2011, 15:33   Citer 

ou se situe la touche lenght svp cry.gif

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 18 Sep 2011, 15:50   Citer 

length est dans le catalogue. Elle se traduit par longueur.

Super, j'avais la flemme de le faire.

G+1-(H-1)(G=H) -> G
ne marche pas correctement.

Initialise G à 0 au lieu de 1 puis applique une de ces corrections.
G+1-H(G=H -> G
G+1-Hint(G/H -> G

----------------------
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
 Adresse email Haut de page Bas de page 
 
sandro



Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Dim 18 Sep 2011, 19:00   Citer 

Merci pour ta rectification

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
bazz
Invité
Posté le : Dim 18 Sep 2011, 20:36   Citer 

ils me mettent erreur argument quand je demarre le jeu meme quand je change sa :
G+1-(H-1)(G=H) -> G
par sa :
G+1-H(G=H -> G
aider moi svp

  Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
sandro



Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Dim 18 Sep 2011, 20:40   Citer 

Alors essaye en remplaçant G+1-(H-1)(G=H) -> G par G+1 -> G:If G=H:1 -> G

Sandro

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
C#Master
Invité
Posté le : Mer 21 Sep 2011, 20:50   Citer 

Salut les mecs bigmouth.gif

J'ai une erreur syntaxe au niveau de la 3ème ligne (dim([F]), vous savez d'ou ça vient ? frozen.gif

  Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Mer 21 Sep 2011, 20:54   Citer 

Je pense que tu as du mettre [F] de la forme [+F+] or c'est la matrice F qu'il faut mettre c'est-à-dire dans le menu MATRIX.

Sangohan38

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 24 Sep 2011, 19:36   Citer 


Citer : bazz
ils me mettent erreur argument quand je demarre le jeu meme quand je change sa :
G+1-(H-1)(G=H) -> G
par sa :
G+1-H(G=H -> G
aider moi svp

Une erreur argument ne vient pas de ça. Dis nous à quel endroit s'arrête le programme.

----------------------
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
 Adresse email Haut de page Bas de page 
 
Macro
Invité
Posté le : Ven 07 Oct 2011, 19:29   Citer 

Salut à tous, j'ai recopié tout le programme, mais ça ne marqhe pas à cet endroit :

Menu("POC2 COC5(C)2007","COMMENCER",C,"CONTINUER",3,"QUITTER",5

C'est le C qui marche pas ... ^^' Pouvez-vous m'aider svp ? ahh.gif

  Haut de page Bas de page 
 
Macro
Invité
Posté le : Ven 07 Oct 2011, 19:31   Citer 

C'est re moi, et pour l'erreur, ça me met "ERR:TYPE DONNEE"

Et pas type syntaxe ... crazy.gif frozen.gif

PS : pas trouvé l'option éditer, dsl ...

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 07 Oct 2011, 19:44   Citer 

Les menus peuvent provoquer des erreurs syntaxe,argument,type,étiquette.
Tu as commis une erreur soit de guillemets, soit de virgule quelque part sur la ligne avant C.

ps : les invités ne peuvent éditer les messages.

----------------------
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
 Adresse email Haut de page Bas de page 
 
Macro
Invité
Posté le : Ven 07 Oct 2011, 21:59   Citer 

Bon, l'erreur s'est pas reproduite, j'ai réécris la ligne ^^
Mais autre beug ...

Cette fois à la ligne :

Output(Q,S," "

Là ça me beug sur la deuxième virgule ... Et là c'est re une erreur de syntaxe ... --' J'ai beau réécrire la ligne, rien ne change ...

  Haut de page Bas de page 
 
programmathss
Invité
Posté le : Ven 07 Oct 2011, 22:51   Citer 

Marco C. ?? ^^

Le Q est compris entre 1 et 8 entier et le S entre 1 et 16 entier ?

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 07 Oct 2011, 22:59   Citer 

Si c'est une erreur de syntaxe, ce n'est pas la peine de chercher la cause d'une erreur domaine.

Output( saisi depuis le menu prgm+droite+6
puis [Q]+[,]+[S]+[,]+["]+[_]+["]
Output doit être sur une ligne vierge ou avoir ":" au début.

----------------------
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
 Adresse email Haut de page Bas de page 
 
Macro
Invité
Posté le : Ven 07 Oct 2011, 23:39   Citer 

Maintenant le beug c'est sur la parenthèse de cette ligne (en gras)

min(14,max(1,F+(Ans>1-2P)-(Ans<2P-1->F

  Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
sandro



Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Sam 08 Oct 2011, 11:19   Citer 

Bizard, j'ai executer sur ma TI82stats.fr, ça ne pose aucun problème : c'est quoi le type d'erreur affiché? Utilise tu bien les virgules au dessus de la touche [7] ?

Sandro

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
nico
Invité
Posté le : Dim 09 Oct 2011, 11:00   Citer 

je ne sais pas si c est normal, mais quand je joue la balle se deplace aussi vite que la plateforme ce qui faite que quand la balle est à l opposé c est impossible de l avoir. normal?

  Haut de page Bas de page 
 
sandro



Autorisation : Membre
Nb de messages : 1387
Inscrit le : Ven 25 Mar 2011, 22:58
Posté le : Dim 09 Oct 2011, 11:43   Citer 

Jen sais rien, je n'y ai jamais joué.

Sandro

----------------------
mort à l'inutile, place à la mémoire libre et aux programmes
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse <<   Page: , , , ..., , 8, , ,      >>





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink