Poster un nouveau sujet Poster une réponse
Un flappy bird personnalisable
Auteur Message
Paolo972



Autorisation : Membre
Nb de messages : 14
Inscrit le : Dim 11 Jan 2015, 17:13
Posté le : Dim 11 Jan 2015, 18:34   Citer 

Salut à tous, j'ai créé ce programme il y a un petit moment mais je me suis dit que je pourrais le partager si cela intéresse des gens.
Sinon j'aimerais bien que l'on me dise ce qui pourrait être amélioré.
Si vous trouvez que mon programme est bien ou lent.

Je n'ai pas utilisé l'écran graphique parce que cela aurait été trop lent



Code

:Lbl 0
:Menu("Flappy bird..","*JOUER*",2,"HIGH SCORE..",3,"OPTION...",4

:Lbl 2
:4->Y:0->D
:EffEcr
:entAleat(3,6)->A
:
:15->B
:While 1
:EffEcr
:If Y>0 et Y<9
:Output(Y,4,Chaine1
:Output(A-2,B,Chaine2
:Output(1,1,D
:B-1->B
:If B=2
:Then
:D+1->D
:15->B
:entAleat(3,6)->A
:End
:If B=3 et (Y<A-1 ou Y<A+1)
:Goto 1
:codetouche->K
:If K=105
:J->C
:
:IF C>0
:then
:C-1->C
:Y->R
:R-.5->R
:R-.5->Y
:ELse
:Y+1->Y
:End
:End
:Lbl 1
:EffEcr
:If D>L6(1)
:Then
:Input"TON NOM: ",CHAINE8
:Disp "NOUVEAU"
:L6(2->L6(3
:L6(1->L6(2
:D->L6(1
:ENd
:If D>L6(2) et D<L6(1
:THen
:L6(2->L6(3
:D->L6(2
:End
:iF D>L6(3) et D<L6(2
:D->L6(3
:Disp "Score :",D
::Pause
:Goto 0
:Lbl 3
:EffEcr
:Disp "1er:"+Chaine8,L6(1
:Disp "2eme:",L6(2
:Disp "3eme:",L6(3
:Pause
:Goto 0
:Lbl 4
:Menu("Option: ","Caractere : "+Chaine1,5,"Reset score",6,"MURS : :"+CHaine2,7,"Jump : ",8,"RETOUR..",0

:Lbl 5
:EffEcr
:Ínput "Caractere : ",Chaine1
:Goto 4
:Lbl 6
:3->dim(L6
:Remplir(0,L6
:Goto 0
:Lbl 7
:EffEcr
:Disp "Caractere des"
:Input "MURS : ",Chaine2
:Goto 4
:Lbl 8
:EffEcr
:Disp "Jump DEFAUT: 3"
:Input "NEW VALUE: ",J
:Goto 4








Si vous le recopier :
avant de le lancer il faut eviter que les variable de stockage des parametres soit vide donc dans l'ecran de calcul de la ti faite :

3->J

puis

3->dim(L6

puis

"0"->chaine1
"0"->chaine2
"0"->CHaine8

sinon vous aurez des erreurs.

Dites-moi ce que vous en pensez, je vais bientot ajouter mes autre jeux tel que SNAKE, Morpion, Un pseudo jeu "Mario" avec un carte plus grande que l'ecran, ET un generateur de phrase aleatoire.[img]URL d'une image[/img]

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 11 Jan 2015, 21:52   Citer 

Tu devrais placer dans le menu une option pour initialiser les variables indispensables.
Le programme peut initialiser la taille de la liste L6 à chaque exécution.

----------------------
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 
 
Poster un nouveau sujet Poster une réponse





  Page générée en 6 requêtes