Poster un nouveau sujet Poster une réponse
Oyez oyez les gens, je fais appel à votre imagination.
Auteur Message
made2kill



Autorisation : Membre
Nb de messages : 80
Inscrit le : Jeu 24 Fév 2011, 19:12
Posté le : Mer 30 Mar 2011, 8:53   Citer 

Bonjour, je viens de programmer un jeu nommé toboggan.

Le principe est simple, tu rentres le niveau de difficulté, et tu attends que le petit "X" dévale jusqu'à arriver sur un obstacle.

Voici:


Code
ClrDraw
ClrHome
0üXmin
62üXmax
0üYmin
94üYmax
13üA
0üB
randüC
28üD
25üE
0üF
Disp "NIVEAU DE DIF:","(1-9)
Input G
G/10üG
Line(0,85,58,0
Line(0,60,40,0
StorePic 1
Lbl A
Text(0,72,F
Text(A,B,"X
While 1
A+3üA
B+5üB
69!:69!:69!
If A=58 and B=75
Goto 1
If C[INFERIEUR A]G
Text(D,E,"[degré](2nde + angle + 1)
If A=D and B=E and C[INFERIEUR A]G
Goto 2
F+1üF
Text(A-3,B-5,"   "
Goto A
If A[DIFFERENT DE]58 or B[DIFFERENT DE]75
Text(A-3,B-5,"   "
Goto A
Lbl 1
ClrDraw
RecallPic 1
13üA
0üB
randüC
Goto A
Lbl 2
ClrDraw
ClrHome
Disp "TERMINE !","SCORE:
Output(3,1,F



Voilà, un petit jeu sans prétention.

Quelqu'un aurait donc une idée pour le rendre... intéréssant?

Etant donné que vous mettez juste un nombre et attendez que le X rencontre un obstacle.

De plus, à partir de 37, j'ai une erreur mémoire.

Aidez-moi! beer.gif

----------------------
Aussi connu sous le nom de f/x=x².
 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 : Mer 30 Mar 2011, 13:57   Citer 

C'est normal que tu ai une erreur mémoire car tu utilise un While1 sans utiliser le moindre End. Je ne comprend même pas pourquoi il est là.

Ce jeu sera plus intéressant quand tu donneras la possibilité de sauter par dessus l'obstacle (le contourner serait trop banal). Ainsi les réflexes pourraient être mis à l'épreuve (si les obstacles surgissent au fur et à mesure).

----------------------
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





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