Forum

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

Fall ( 531 octets) - Page 1 / 6

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] http://tout82.free.fr/lexique.pdf

@+ Le Webmaster beer.gif
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.