Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 9071
Réponses : 42
Type : discussion
Etat : réponses autorisées
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.

Pong

mad67 le 05/07/2007 à 08:47
voici mon pong et son lien: http://www.badongo.com/file/3651713
Code
ClrHome
Output(4,4,"MADIAN CORP"
Output(5,4,"PRESENTE"
For(T,0,800
End
ClrHome
Output(4,4,"PONG"
For(T,0,800
End
ClrHome
Menu("PONG","NEW GAME",1,"LOAD GAME",2
Lbl 1
0->Z
0->Y
0->X
Goto 2
Lbl 2
8->A
6->B
1->C
6->D
7->E
8->F
ú ( ) 1->G
1->H
Goto 3
Lbl 3
X+1->X
Output(A,B,"----
Output(C,D,"----
Output(E,F,"
E+G->E
F+H->F
Output(E,F,".
getKey->K
If K=24 and Bø1
Then
Output(A,B,"   
B-1->B
Output(A,B,"----
End
If K=26 and B+3ø16
Then
Output(A,B,"   
B+1->B
Output(A,B,"----
End
randInt(1,20)->Á
If D<F and D+3ø16 and Áø1
Then
Output(C,D,"   
D+1->D
Output(C,D,"----
End
If D>F and Dø1 and Áø1
Then
Output(C,D,"   
D-1->D
Output(C,D,"----
End
If F=16
ú ( ) 1->H
If F=1
1->H
If E=7 and B÷ ( ) F and B+3ù ( ) F or E=6 and G=2 and B÷ ( ) F and B+3ù ( ) F
ú ( ) 1->G
If E=2 and D÷ ( ) F and D+3ù ( ) F
1->G
If E=2 and D÷ ( ) F and D+3ù ( ) F and Áù ( ) 5
2->G
If E=1:Goto 5
If E=8:Goto 6
Goto 3
Lbl 5
Y+1->Y
Goto 7
Lbl 6
Z+1->Z
Goto 7
Lbl 7
ClrHome
Output(1,1,"TOI:
Output(1,6,Y
Output(2,1,"ORDI:"
Output(2,6,Z
For(T,0,800
End
ClrHome
Goto 2
bobleponge le 16/09/2007 à 13:53
Salut , comment fait tu pour faire ù , ÷ et A avec accent ?

Merci d'avance
Sangohan38 le 16/09/2007 à 13:58
ù est le signe de la négativité c'est à dire (- ).
Le A avec accent est le signe theta c'est à dire le rond barré.
Ensuite, le rond barré est le signe différent disponible dans MATHS.

Sangohan38
bobleponge le 16/09/2007 à 14:04
Merci
bobleponge le 16/09/2007 à 14:05
Désolé pour le flood mais le ÷ je le fais comment stp ?
Sangohan38 le 16/09/2007 à 14:28
C'est le signe diviser: /

Sangohan38
le noob de la TI ^^ le 21/09/2007 à 17:24
Bonjour les gens, j'ai un TI-82 Stats fr. j'ai recopier le jeu sa marche super bien sauf qu'il y a une ligne qui fais que le jeu marche pas : Output(E,F,".

Voila quand je met le point a la fin je vois la "balle" mais il me dit erreur sur le point. Quand je l'enleve il y a plus la balle dans le jeu mais il me dit erreur quand meme je ne voit pas du tout ce que je doit faire merci !!
ratuss le 21/09/2007 à 18:41
Salut,

Je te conseil de vérifier ton code, en particulier ces lignes ci :


Code
E+G->E
F+H->F


...

Code
If F=16
ú ( ) 1->H
If F=1
1->H
If E=7 and B÷ ( ) F and B+3ù ( ) F or E=6 and G=2 and B÷ ( ) F and B+3ù ( ) F
ú ( ) 1->G
If E=2 and D÷ ( ) F and D+3ù ( ) F
1->G
If E=2 and D÷ ( ) F and D+3ù ( ) F and Áù ( ) 5
2->G
If E=1:Goto 5
If E=8:Goto 6


voila a+
Stupid le 21/09/2007 à 21:09
'as pa soublier des espaces?
mad67 le 22/09/2007 à 11:01
nan c bon le code est bien.
le noob de la TI ^^ le 22/09/2007 à 12:16
Moue sa va sa marche a part une erreur pour quittersinon c'est bon parcontre le jeu j'lai pas bien compris ^^ c'est vrai la balle va de partout, le truc con dirige on c'est meme pas pourquoi on le dirige tu touche pas la calculette et tu gagne tous seul ^^ donc voila sa serai bien si y'avais une explication xD
unknow le 22/09/2007 à 17:04
mad revoit ton code laugh.gif
mad67 le 23/09/2007 à 12:56
oui c vrai donc en gros tu dois taper sur les fleches l'ordi lui possede la capacité de smatcher mais pas toi pour quitter je n'ai pas voulu car je le voulais rapide. mais celui de sango est plus complet en effet.
unknow le 23/09/2007 à 20:15
mad67 a écrit :
oui c vrai donc en gros tu dois taper sur les fleches l'ordi lui possede la capacité de smatcher mais pas toi pour quitter je n'ai pas voulu car je le voulais rapide. mais celui de sango est plus complet en effet.


crazy.gif
mad67 le 24/09/2007 à 18:57
j'ai revu ma copie et j en ai creer un mieux
Tobias le 25/09/2007 à 17:23
euh ... j'ai la TI-82 Stats.fr et ... je ne trouve pas les "and" et "or"
HELP winkle.gif
Tobias le 25/09/2007 à 17:39
Dsl pour le flood mais ... je ne trouve aps non plus le randInt moodforlove.gif

**Je suis un boulet ... XD**
ratuss le 25/09/2007 à 18:46
Salut,


[2nde]+[math]+[droite]

[math]+[gauche]


+ beer.gif


EDIT : => cf les annexes du manuel + https://tout82.pages-perso.fre[...]t.php?sujet=104
mad67 le 25/09/2007 à 18:50
dis donc on dirait que cette version plait aux inviter alors l'autre ...
unknow le 25/09/2007 à 21:09
t'enmer*** ^^/
Tobias le 26/09/2007 à 08:05
Merci j'ai trouvé les 2 touches mais ... en fait ... ça me donne un truc assez bizaroïde ... genre ça :

Citation
------------
. . .
. . . . .
. . .. .. .
. . . .
. . . . . .
----------------

euh ... je doute que ce soit normal en fait ... moodforlove.gif
Désolé mais ... HELP XD
mad67 le 26/09/2007 à 13:35
normalement sa devrait faire sa
Code
        ----   
             
            .


           ----

ta mis les espaces?
Sangohan38 le 27/09/2007 à 08:37
Les espaces sont situés lorsque tu tape les output (ou disp).
Cela donne quelque chose du genre Output(Y,X," --- " et en Disp: Disp" --- ","" ...
Sinon, si ce n'était pas sa, tu à du oublier un clrhome.
Tout ceci ne sont que des supprosition car je n'ai pas regardé le code.

Sangohan38
Pendragon le 27/09/2007 à 13:20
En effet j'avais pas vu les espaces happy.gif
MAis j'ai pas fini de vous embeter et je commence vraiment à passer pour un boulet ... cry.gif
Le jeu commence normalement (la calcu n'est d'ailleurs aps très forte ahh.gif ) mais après 2 points marqués ... que la barre soit la ou pas pour rattraper la balle ... la balle rebondit quand même ... crazy.gif
Je commence à désépérer moodforlove.gif minied.gif
Sangohan38 le 28/09/2007 à 20:07
Tu est sur que tu n'as pas oublié de recopier les conditions de défaites.
Quelque chose du genre:
Code
If A /= (X or X+1):Goto Z


Sangohan38
Pendragon le 02/10/2007 à 09:06
j'ai retapé le code entièrement et ...je perd une fois et ça recommece à rebondir même si je suis aps dessous crazy.gif
Je crois que je vais arreter de vous embeter après ... moodforlove.gif
didikong le 02/10/2007 à 14:15
Salut Il pourrait y pourrait y avoir un recapitulage complet du code? bigmouth.gif
parceque la crazy.gif
mad67 le 03/10/2007 à 13:13
le code est parfait j'ai utilisé ti graphic link
moi c autre choses le 08/02/2009 à 20:55
moi les barres ne partent pas
et ca joue tout seul
Wazza' le 18/10/2009 à 20:10
Bonjour,
Moi j'ai un pb au niveau de cette ligne :
Code
RandInt(1,20)->à

L'erreur est au niveau de la parenthèse.
Si qqn peut m'aider, merci =)
peoplepc le 10/11/2009 à 21:07
J'ai le meme probleme au niveau de cette ligne, si on pouvait avoir une
reponse urgente...Merci.
Et au fait on les place a quel endroit les conditions de defaite??
sypotu le 10/11/2009 à 22:31
quel est le type d'erreur ?
vous avez écrit le bon RandInt ? c'est une seule instruction
Sangohan38 le 11/11/2009 à 13:15
Sinon essayez de marquer IntRand(20+1->[theta]

Sangohan38
Utilisateur le 30/01/2010 à 19:02
J'ai le même problème que Pendragon précédemment sauf que j'ai réussi à règler les "barres" mais c'est la balle qui laisse des points.

Comment y remédier ?
Steven le 26/09/2010 à 02:01
Bonjour, moi tout fonctionne normalement sauf que lorsque je lance le jeu le point part mais l'ordinateur ne joue pas, alors que moi je peux bouger (en gros je fais que de gagner il bouge pas)
linkakro le 26/09/2010 à 12:27
Utilisateur, soit les variables sont fausses, soit tu as oublié des espaces.
Code
Output(E,F,"
E+G->E
F+H->F
Output(E,F,".

Code
Lbl 1
0->Z
0->Y
0->X
Goto 2
Lbl 2
8->A
6->B
1->C
6->D
7->E
8->F
ú ( ) 1->G
1->H

Steven, les conditions, les sorties ou le randint doivent avoir un problème.
Code
randInt(1,20)->Á
If D<F and D+3ø16 and Áø1
Then
Output(C,D,"   
D+1->D
Output(C,D,"----
End
If D>F and Dø1 and Áø1
Then
Output(C,D,"   
D-1->D
Output(C,D,"----
End
Max44 le 26/09/2010 à 21:55
Bonjour,
J'ai le même problème que Wazza' et peoplepc !
Pouvez-vous m'aider !
Merci happy.gif
Rézus le 26/09/2010 à 21:59
Et il t'affiches quel message d'erreur ?
Max44 le 26/09/2010 à 22:17
Ah c'est bon j'ai trouvé ! happy.gif
Le "RandInt(" est aussi en un seul mot en version française mais maintenant quand je tente de jouer, la balle laisse pleins de points ( ça me fait une vingtaine de balles sur l'écran !) et les "barres" ( la mienne et celle de l'ordi) lorsqu'on va vers la droite ou la gauche au lieu de bouger elle se multiplie ( j'ai donc toute la barre du bas et du haut complète !)
Le message d'erreur est : ERR:ARRêT
et il me montre une ligne du programme différente à chaque fois !
Là j'ai : If D>F et D(différent)1 et (tétra)(différent)1
Merci de vos réponses !
Rézus le 26/09/2010 à 22:37
Aux lignes où c'est marqué Output(quelque chose,autre chose,"
il faut mettre un espace après les guillemets.
Max44 le 26/09/2010 à 22:56
Youpi !! happy.gif Merci Beaucoup Rézus !
La balle ne laisse plus de point derrière elle !
Pour les barres, quand je vais vers la droite ça ne laisse pas de pointillés mais quand je vais vers la gauche, ça laisse une trainée de pointillés, et c'est pareil pour le coté ordi !
autre problème, la balle rebondit au-dessus des barres, même si il n'y a rien elle rebondit ! Elle ne peut pas toucher les barres ...
Merci de m'aider ! winkle.gif
Skorz le 13/10/2011 à 21:34
Bonjour/Bonsoir, alors voilà, j'ai la TI82 Stats.fr, je voudrais mettre pong car c'est le Jeu de base, mais je voudrait savoir comment on fait ClrHome ? je le trouve pas, merci de répondre bigmouth.gif
sandro le 13/10/2011 à 21:50
tu appuye sur [prgm] puis [droite] puis [8] (en français c'est EffEcr).

Sandro
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.