Bonjour, j'aimerai de l'aide en fait j'ai crée un jeu mais j'aimerai ajouter un compteur de point poir que avant de lancer le jeu y est marquer mon "HIGH SCORE" avant de comencer la partie mais je ne sais malheureusement pas comment faire cela..
Voici mon code en espérent que quelqu'un va pouvoir m'aider
Merci
:Lbl 1
:ClrHome
:For(A,1,8
:Output(A,5,"*"
:End
:For(A,1,8
:Output(A,12,"*"
:End
:8→E:1→F
:10→G:2→H
:9→X
:Output(8,X,"^"
:Output(F,E,"*"
:Output(H,G,"*"
:0→S
:Repeat ((F= and (E=X)) or ((H= and (G=X))
:getKey→K
:f K≠0
:Then
: Output(8,X," "
: X+(K=26)-(K=24)→X
: If X>11
: 6→X
: If X<6
: 11→X
: Output(8,X,"^"
: End
: Output(F,E," "
: Output(H,G," "
: F+1→F
: H+1→H
: If F>8
: Then
: S+1→S
: randInt(1,2)→F
: randInt(6,11)→E
: End
: If H>8
: Then
: S+1→S
: randInt(1,2)→H
: randInt(6,11)→G
: End
: Output(F,E,"*"
: Output(H,G,"*"
:End
:Output(1,1,S
:Pause
:Menu("REJOUER ?","OUI",1,"NON",2
:Lbl 2
:ClrHome
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 17 Oct 2013, 0:12
Le plus simple est de créer une liste personnalisée au début en lui donnant une dimension.
1->dim(lHIGH // dimensionne la liste lHIGH // à faire au début
Puis on peut vérifier la présence de sauvegarde ancienne en regardant que la valeur soit non-nulle, ou avec une autre valeur non-nulle si l'information peut être nulle.
---------------------- 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)
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
Posté le : Jeu 17 Oct 2013, 18:27
Quant c'est comme ça évites de quadruple poster, fais prévisualiser pour tester, mais si tu poste et que ce n'est pas comme tu veux ce n'est pas grave insiste pas.
Qu'as tu testé?
Poste nous le code de ta solution et on t'expliqueras pourquoi il ne fonctionne pas.
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 17 Oct 2013, 19:02
Utilise le menu liste ou le catalogue pour saisir le L de petite taille qui désigne les listes personnalisées et que je note "l" dans les code.
Le nom commence par une lettre. Les autres sont alphanumériques. 5 caractères maximum.
Les listes personnalisées pouvant être nommées, il y a peu de chances d'entrer en conflit avec un autre programme ou des manipulations si le nom est bien choisi.
Dans ton cas tu n'as même pas besoin de vérifier l'existence d'un résultat puisque zéro est une valeur par défaut.
Si tu l'avais voulu, il aurait suffit d'un test de vérité.
Code
If lHIGH(1 // terme non-nul
Then
Disp "OLD
Else
Disp "NEW
End
Code
:1->dim(lHIGH // crée ou dimensionne une liste lHIGH de 1 terme
:Lbl 1
:ClrHome
:For(A,1,8
:Output(A,5,"*
:End
:For(A,1,8
:Output(A,12,"*
:End
:8->E
:1->F
:10->G
:2->H
:9->X
:Output(8,X,"^
:Output(F,E,"*
:Output(H,G,"*
:0->S
:Repeat F=8 and E=X or H=8 and G=X // pas de parenthèses, and est prioritaire
:getKey->K
:If K // pas d'inégalité à zéro car tout non-nul est vrai
:Then
:Output(8,X," "
:X+(K=26)-(K=24->X
:If X>11
:6->X
:If X<6
:11->X
:Output(8,X,"^"
:End
:Output(F,E," "
:Output(H,G," "
:F+1->F
:H+1->H
:If F>8
:Then
:S+1->S
:randInt(1,2)->F
:randInt(6,11)->E
:End
:If H>8
:Then
:S+1->S
:randInt(1,2)->H
:randInt(6,11)->G
:End
:Output(F,E,"*"
:Output(H,G,"*"
:End
---------------------- 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)
Merci, j'ai tout taper mais je ne trouve pas le "l" sur la ti-82 stats.fr (une partie du code est sur ti-83 je sais mais j'ai oublier de le corriger sur le code pourais tu m'aider et tes explications tres bien merci)
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 17 Oct 2013, 22:19
Attention j'avais oublié le "(1" du stockage. Je l'ai maintenant ajouté.
S->lHIGH(1
Je pense maintenant à signaler qu'on peut aussi affecter la liste au lieu de son premier terme.
{S->lHIGH
J'ajoute aussi la lecture de la liste pour affichage du record. Cela ne sert à rien sinon.
---------------------- 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)