Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 14896
Réponses : 106
Type : discussion
Etat : réponses autorisées

Fall ( 531 octets) - Page 1 / 3

FulliZing le 03/04/2007 à 14:52
Bonjour,

Le principe du jeux étant de ratrappé les "0" qui tombent. On commence avec 3 vies, on en gagne 1 tout les 10 points mais la vitesse augmente aussi.
Prévisualisation :
Code
----------------------------|
SCORE: |   0                |
123    |   0                |
VIES:  |   0                |
3      |                    |
       |                    |
       |    ==              |
----------------------------|

Code :
Le jeux a été tester, donc il fonctionne,si ce n'est pas le cas j'ai fait une erreur dans le recopiage.

Code
0->S:3->V:11->X:80->F:1->Y:1->G
Lbl 0
EffEcr
Disp "SCORE:"
Disp ""
Disp "VIES:"
1->Z
For(P,1,8)
Output(Z,7,"]
Z+1->Z:End
Lbl 2
entAleat(8,16->Z
S+1->S
G+1->G
Ig G=10:Then
0->G:V+1->V
F-10->F
End
Output(2,1,S)
Output(4,2,V)
Lbl 1
Output(8,X,"==
Output(Y,Z,"0
For(Q,1,F)
End
Y+1->Y
Output(Y-1,Z," ")
If Y=8:Goto 3
codeTouche->T
If T[différent de]0
Output(8,X,"  ")            <== 2 espaces
If T=24:X-1->X
If T=26:X+1->X
If T=24 et X=7:16->X
If T=26 et X=16:8->X
Goto 1
Lbl 3
1->Y
If X=Z ou X+1=Z:Goto 2
Lbl 4
Output(4,11,"PERDU
Pause
V-1->V
If V=-1:Then
Output(3,11,"Game
Output(4.11,"Over
Pause:Stop
End
S-1->S
Goto 0


Si vous avez des améliorations/critiques/autres/ect... n'hésitez pas

Voilà

++

EDIT: J'ai amélioré le jeu, sa taille est maintenant de 427 octets. J'ai fais des boucles pour les "Output" qui se répétaient.
dark_htf le 03/04/2007 à 18:01
C'est normal si le zéro ne s'efface pas quand il tombe ? (j'ai peut-être mal tapé le code aussi)
Et dans le code tu pourrai économiser pas mal d'octets en suprimant les ") en fin de syntaxe des Output(
Et aussi au début au lieu de metre plusieurs fois Disp mais une virgule
( Disp "SCORE","","VIES")
Voila, sinon très bon jeu j'ai apprécié ^^

Dark_htf eyeonly.gif
FulliZing le 03/04/2007 à 18:11
oui c'est normal que le zero ne s'efface pas happy.gif
puis pour les octets, tu peux les économiser en faisant le necessaire au copiage winkle.gif

merci

++
dark_htf le 03/04/2007 à 18:34
Le jeu serait mieux si le zéro s'effacait happy.gif
Dark_htf eyeonly.gif
FulliZing le 03/04/2007 à 18:43
ok je vais arranger ça winkle.gif

Edit : rajoute "Output(Y-1,Z," ") juste après "Y+1->Y", je l'ai mis dans le code du début

enjoy happy.gif
FulliZing le 05/04/2007 à 14:45
J'ai amélioré le jeu, regardez la fin de mon 1er message


++
elozimak le 05/04/2007 à 20:36
Tu peux aussi effacer les 0 en mettant un "clrhome" en debut de lbl ex :
Code
lbl 1
clrhome
ton code...
FulliZing le 05/04/2007 à 20:53
non, sinon ça va effacer tout l'écran or je ne reaffiche pas Score: Vies:.
De toute façon le zero s'efface dejà.

++
mad67 le 06/04/2007 à 10:14
sinon
Code
lbl1
output4,4," "
ton code ...

et c'est tout le zero s'efface mais pas l'ecran!
FulliZing le 06/04/2007 à 11:19
je sais, je l'ai déjà mis ya 2 jours happy.gif

++
pppp38140 le 08/09/2008 à 21:28
Bonjour voila j'ai un petit probleme j'ai tapé toute les ligne mais ma
calculatrice (la TI 82 ) na pas la commande entAleat donc j'aimerais
savoir si quelqu'un pourrais me donner l'equivalent pour ma calculatrice
merci et a ++ happy.gif
webmaster le 08/09/2008 à 22:03
Bonsoir,
Code
entAleat(8,16->Z

Devient pour la TI-82 :
Code
:Int(Rand*9)+8 -> Z


@+ Le Webmaster beer.gif
pppp38140 le 09/09/2008 à 17:20
ok merci bien sa marche parfaitement clown.gif
Sangohan38 le 09/09/2008 à 19:41
Ou plus simplement
Code
IntRand9+8->16


Sangohan38
Didouille le 10/09/2008 à 18:29
bonjour j'ai une ti-82 (pas une 82-stats) et j'aimerai savoir comment on tape le symbole ":" c'est a dire les deux petits points.Je n'ai pas le catalogue comme sur la 82 stats.
Merci d'avance
Crea1234 le 10/09/2008 à 18:58
Bonjour, j'ai une TI-82 stats.fr et je ne trouve pas la touche > (je viens de l'acquérir)
Didouille le 10/09/2008 à 19:14
Désolé, c'est encore moi je n'arrive pas à trouve Ig (ligne15) et codetouche (ligne 29) cry.gif
Crea1234 le 10/09/2008 à 19:15
C'est encore moi aussi^^ je ne trouve pas comment écrire Lbl quelqu'un peut t'il m'éclairer svp ?
webmaster le 10/09/2008 à 19:25
Didouille a écrit :
bonjour j'ai une ti-82 (pas une 82-stats) et j'aimerai savoir comment on tape le symbole ":" c'est a dire les deux petits points.Je n'ai pas le catalogue comme sur la 82 stats.
Merci d'avance


Lorsque tu reviens à la ligne dans l'éditeur de programmes, ils apparaissent automatiquement....

@+ Le Webmaster beer.gif
webmaster le 10/09/2008 à 19:27
Crea1234 a écrit :
Bonjour, j'ai une TI-82 stats.fr et je ne trouve pas la touche > (je viens de l'acquérir)


Rubrique [Supérieur] https://tout82.pages-perso.free.fr/lexique.pdf

@+ Le Webmaster beer.gif
Crea1234 le 10/09/2008 à 19:36
J'ai trouvé mais j'ai pas encore trouvé pour faire -> (j'utilise la touche sto qui produit une flèche mais je sais pas si c'est ça )
webmaster le 10/09/2008 à 19:45
Si si, c'est bien ca...

@+ Le Webmaster beer.gif
Crea1234 le 10/09/2008 à 19:48
Merci beaucoup pour toutes ces réponses.

Mais je vais t'enmerder avec une autre question^^
Je ne trouve pas Ig

Merci d'avance.
Didouille le 10/09/2008 à 19:49
merci beaucoup pour les deux petits points mais je cherche toujours comment on met codetouche (ou getkey) et IG(ligne 15 )
Crea1234 le 10/09/2008 à 20:11
J'ai cherché partout et je ne trouve toujours pas comment écrire Ig cry.gif
Eightech le 11/09/2008 à 12:29
webmaster a écrit :
Didouille a écrit :
bonjour j'ai une ti-82 (pas une 82-stats) et j'aimerai savoir comment on tape le symbole ":" c'est a dire les deux petits points.Je n'ai pas le catalogue comme sur la 82 stats.
Merci d'avance


Lorsque tu reviens à la ligne dans l'éditeur de programmes, ils apparaissent automatiquement....

@+ Le Webmaster beer.gif


Oui, tu peux faire comme ça pour plus de lisibilité.

Pour faire comme dans le code de ce jeu, appuie sur [2nd] => [.] (le point à coté de 0 winkle.gif

Pour le Ig ligne 15, c'est une faute d'orthographe, c'est If winkle.gif

Pour Lbl, c'est [PRGM] => [9]

Pour codeTouche, c'est seulement dans la TI française, dans la TI 82 normal (qui est anglaise) l'équivalent est getKey qui se trouve dans [PRGM] => flèche à droite (pour aller dans le menu I/O) et 7.

Pour la touche > il faut appuyer sur [2nd] => [math] => [3] (je t'ai donné plus de détails dans le topic que tu as posté à ce propos winkle.gif )

Voila ! happy.gif
Crea1234 le 11/09/2008 à 17:19
Merci beaucoup mais :

"If T=24 et X=7:16->X
If T=26 et X=16:8->X"

à quoi correspond le " et " ?

merci d'avance
pppp38140 le 11/09/2008 à 18:27
c'est "and" l'équivalemt de "et"
Eightech le 11/09/2008 à 18:59
Crea1234 a écrit :
Merci beaucoup mais :

"If T=24 et X=7:16->X
If T=26 et X=16:8->X"

à quoi correspond le " et " ?

merci d'avance


Oui, tu le trouve en faisant : [2nd] => [math] => flèche à droite pour atterir dans le menu logique => choisir "et"

Tu peux aussi y trouver ou, ouExc et non. Tu devrais te servir de ou aussi dans ce programme je crois winkle.gif
Crea1234 le 11/09/2008 à 19:13
D'acord, merci, j'ai installé le jeu mais ma calculatrice m'indique une erreur à cet endroit :

Output(8,X,"==
Output(Y,Z,"0

vers le 0
Eightech le 11/09/2008 à 20:19
Crea1234 a écrit :
D'acord, merci, j'ai installé le jeu mais ma calculatrice m'indique une erreur à cet endroit :

Output(8,X,"==
Output(Y,Z,"0

vers le 0


Est-ce que tu as bien tapé le code ? Si oui, il ne devrait pas en avoir...

EN fait si, j'ai remarqué un problème, quand tu fais sortir la moitié du plateau d'un coté du terrain (et que donc y a une moitié de chaque coté) et que tu fais demi tour, ça lance l'erreur, surement parce que la variable de déplacement ne concerne que la plaque de gauche, ce qui fait que seul la moitié de la plaque sort quand on le sort de l'écran du coté droit et du coup ça plante. Ce problème doit facilement être facilement réglable winkle.gif d'ailleurs si je trouve une solution je la posterais happy.gif
Crea1234 le 11/09/2008 à 20:20
D'accord merci, sinon je suis sûr d'avoir bien tapé le code
Eightech le 11/09/2008 à 23:36
Crea1234 a écrit :
D'accord merci, sinon je suis sûr d'avoir bien tapé le code


DOnc, hormis le bug que j'ai expliqué la haut, tu n'as pas de problème ?
Crea1234 le 12/09/2008 à 07:14
Et ben, je peux pas lancer le jeu ca me dit qu'il y a une erreur à cet endroit^^ et j'ai vérifié plusieurs fois, j'ai bien tapé.
Crea1234 le 12/09/2008 à 07:16
(Je précise : erreur domaine )
Sangohan38 le 12/09/2008 à 15:40
Explique exactement la ligne où l'erreur se produit pour que l'on puisse t'aider.

Sangohan38
Crea1234 le 12/09/2008 à 17:05
J'ai déjâ précisé^^

c'est

Output(8,X,"==
Output(Y,Z,"0

vers le zéro

Merci d'avance.
ratuss le 13/09/2008 à 14:08
Salut,

ben moi je dirais... vérifie ton code minied.gif
Eightech le 13/09/2008 à 16:32
Moi aussi happy.gif

Je l'ai recopié, et ça marche winkle.gif

Quand au bug, voici la version que je propose contre celui-ci :

Code

0->S:3->V:11->X:80->F:1->Y:1->G
Lbl 0
EffEcr
Disp "SCORE:"
Disp ""
Disp "VIES:"
1->Z
For(P,1,8)
Output(Z,7,"]
Z+1->Z:End
Lbl 2
entAleat(8,16->Z
S+1->S
G+1->G
Ig G=10:Then
0->G:V+1->V
F-10->F
End
Output(2,1,S)
Output(4,2,V)
Lbl 1
Output(8,X,"==
Output(Y,Z,"0
For(Q,1,F)
End
Y+1->Y
Output(Y-1,Z," ")
If Y=8:Goto 3
codeTouche->T
If T[différent de]0
Output(8,X,"  ")            <== 2 espaces
If T=24:X-1->X
If T=26:X+1->X
If T=24 et X=7:15->X
If T=26 et X=16:8->X
Goto 1
Lbl 3
1->Y
If X=Z ou X+1=Z:Goto 2
Lbl 4
Output(4,11,"PERDU
Pause
V-1->V
If V=-1:Then
Output(3,11,"Game
Output(4.11,"Over
Pause:Stop
End
S-1->S
Goto 0


juste une ligne a changé, est celle-là :
Code
If T=24 et X=7:16->X


devient ça :


Code
If T=24 et X=7:15->X


Voila, celui là il n'y a pas de bug winkle.gif
Crea1234 le 13/09/2008 à 21:29
Je ne comprends pas, j'ai bien revérifié le code plusieurs fois et ça me montre toujours une erreur notgood.gif

Je l'ai même retapé.

(Je précise que j'ai une TI-82 Stats.fr
Eightech le 14/09/2008 à 00:14
J'ai moi même une Ti 82 stats fr.

Je viens de reverifier le code, et voila les différences que j'ai pu remarquer :

J'ai remplacer ça :


Code

Output(Z,7,"]


Par ça :

Code

Output(Z,7,")


Et ce Ig :

Code

Ig G=10:Then


Est une faute d'orthographe de l'auteur, en fait c'est If :

Code
If G=10:Then


Voila, désolé mais il n'y a rien d 'autre je crois sad.gif
Sangohan38 le 14/09/2008 à 13:27
Ce que tu as changer ne change pour ainsi dire rien au programme car au lieu d'afficher un ], ça affichera un ).
De plus, tout le monde a vu que le Ig est une erreure de frappe et donc, il est impossible de l'avoir en voulant recopier le programme.

Sangohan38
Eightech le 14/09/2008 à 18:55
Sangohan38 a écrit :
Ce que tu as changer ne change pour ainsi dire rien au programme car au lieu d'afficher un ], ça affichera un ).
De plus, tout le monde a vu que le Ig est une erreure de frappe et donc, il est impossible de l'avoir en voulant recopier le programme.

Sangohan38


Oui, je sais pour le ") (mais je trouve ça plus beau ^^) d'ailleurs je préviens juste que le point d'exclamation rend encore plus beau ^^

Et pour le Ig, désolé mais je ne vois pas d'autres erreurs possibles ^^
Sangohan38 le 14/09/2008 à 19:23
Moi non plus, ce que je voulais dire c'est qu'en soit, c'est pas une erreur du code.

Sangohan38
couscous le 23/09/2008 à 19:54
Bonjours,
Jai fais une erreur de frappe vers le debut du code je voudrais savoir si il est possible de rajoute des ligne entre les autre deja ecrite ?
Et si oui comment ?
MErci
bertonux le 26/09/2008 à 17:50
tres bonne question moi aussi je me la pause mais j'ai pas trouver une reponce peut etre
j'ai une erreur sur
Output(Y-1,Z," ") c'est apres y+i sto Y(j'ai pas trouver la fleche sur le clavier)
mais je n'arive pas a trouver laquel
j'ai verifier et retaper le code
Sangohan38 le 26/09/2008 à 20:14
Pour entrer une ligne, il suffit d'appuyer sur 2nd et ensuite sur DEL.
Avant de poster, regardez si les questions ne sont pas déjà posées.

Sangohan38
bertonux le 27/09/2008 à 10:34
et pour mon erreur
Sangohan38 le 27/09/2008 à 18:22
A mon avis, c'est la valeur de Y-1 qui est inférieur à 1.
Revérifie le programme car il marche normalement.

Sangohan38
bertonux le 03/10/2008 à 17:28
ok je vais tout recommencer meme si c'est pas necessaire comme sa je verait bien