Poster un nouveau sujet Poster une réponse Page: 1,      >>
DEMINEUR SP
Auteur Message
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Lun 24 Déc 2007, 12:35   Citer 

J’avais déjà tout pleins de projets en cours, mais aucun près d’être terminé. Je me suis donc dit, quel dommage, je n’ai rien à offrir pour noël !
Donc voici un démineur assez particulier car sortant de ma ligne de production habituel, c'est-à-dire un code court (867 octets) pour un programme de travaillant pas dans la finesse, tout en restant efficace winkle.gif .

En attendant un vrai programme complet à reliure, voici néanmoins un démineur simple mais court et facile (à priori) à recopier^^


http://www.badongo.com/file/7012833




Code
ClrHome
Disp "   DEMINEUR SP","----------------","
Output(8,1,"(C)COC5  2007
Input "NBR MINE ",N
N -> X
{7,15 -> dim([A]
Fill(0,[A]
ClrHome
min(150,max(1,N -> N
0 -> D
Output(4,9,"/
Output(4,10,N
Repeat N=D
D+1 -> D
Output(4,8-int(log(D)),D
Repeat 9-[A](A,B
1+round(6rand,0 -> A
1+round(14rand,0 -> B
End
9 -> [A](A,B
For(I, -1,1
For(J, -1,1
If A+I and B+J and A+I-8 and B+J-16:Then
If 9ø[A](A+I,B+J
1+[A](A+I,B+J -> [A](A+I,B+J
End:End:End:End
[A] -> [B]
For(I,1,7
Output(I,1,"***************
End
8 -> B:4 -> A
Lbl A
Repeat K=22
Repeat K : getKey -> K : End
Output(A,16," "
Output(8,B," "
min(7,max(1,A+(K=34)-(K=25 -> A
min(15,max(1,B+(K=26)-(K=24 -> B
Output(A,16,"O
Output(8,B,"O
If K=21 and 8-[B](A,B:Then
[A](A,B
If Ans:Output(A,B,Ans
If not(Ans:Output(A,B,"
If Ans=9:Then
ClrHome
Disp "PERDU !
Pause
Lbl 1
For(I,1,7
For(J,1,15
[A](I,J -> A
If not(A:Output(I,J," "
If A>0 and A<9:Output(I,J,A
If A=9:Output(I,J,"X
End
End
{1,1 -> dim([A]
Ans -> dim([B]
Return
End
End
If K=31:Then
Output(A,B,"+
N-([B](A,B)=9 and [A](A,B)=9 -> N
8 -> [B](A,B
If not(N
Then
ClrHome
Disp "GAGNE !
Pause
{1,2 -> dim([E]
If X÷[E](1,2
Then
Disp "RECORD ACTUEL :
Else
Disp "NOUVEAU RECORDS:
X -> [E](1,2
End
Disp [E](1,2
{1,1 -> dim([A]
Ans -> dim([B]
Stop
End
End
If K=32:Then
Output(A,B,"*
N+([A](A,B)=9 and [B](A,B)=8 -> N
[A](A,B -> [B](A,B
End
End
Menu("ETES-VOUS SUR ?","NON",A,"OUI",1



 Adresse email Haut de page Bas de page 
 
mad67



Autorisation : Membre
Nb de messages : 613
Inscrit le : Sam 23 Jui 2007, 14:05
Posté le : Lun 24 Déc 2007, 18:29   Citer 

ben moi je croi que c'est vista qui va arriver o nouvel an par contre faut que je le teste mais il a l'air bien laugh.gif

 Adresse email Haut de page Bas de page 
 
Jcotnys



Autorisation : Membre
Nb de messages : 178
Inscrit le : Lun 20 Mar 2006, 13:28
Posté le : Mar 13 Mai 2008, 22:03   Citer 

salut salut cupsmiley.gif cupsmiley.gif bon désolé je ramène mon grain de sel laugh.gif laugh.gif
juste pour ajouter ca a ton code coc5 (je pense que ca doit etre un oubli xD)

Code

......
Output(A,16,"O
Output(8,B,"O
Output(A+1,16,"esp
Output(A-1,16,"esp


PB :Output(A-1,16,"esp ->la calculette me met: ERR:DOMAIN d'ou cette condition :If (A-1) inf à 0:2->A
mais il faudrait enlever la première ligne des mines d'ou question : c quoi le bon code ?? ahh.gif ahh.gif
encore désolé...crazy.gif crazy.gif et très bon jeu par contre c vraiment cho à finir laugh.gif

----------------------
le travail c la santé winkle.gif
 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Mer 14 Mai 2008, 16:42   Citer 

Le code que tu montre n'existe pas... Et n'a pas lieu d'être eyeonly.gif



Code
Output(A,16,"
Output(8,B,"
min(7,max(1,A+(K=34)-(K=25 -> A
min(15,max(1,B+(K=26)-(K=24 -> B
Output(A,16,"O
Output(8,B,"O



Ce code efface d'abord les "O" enregistre le changement de position (selon K, qui à la valeur de getkey), puis replace les "O"

Note: pour améliorer le confort, il est mieux de mettre


Code
Repeat K : GetKey->K : End


A la place de :


Code
Getkey -> K



 Adresse email Haut de page Bas de page 
 
mad67



Autorisation : Membre
Nb de messages : 613
Inscrit le : Sam 23 Jui 2007, 14:05
Posté le : Jeu 15 Mai 2008, 18:04   Citer 

vlan dans la face lol
j'ai essayé c'est génial!

 Adresse email Haut de page Bas de page 
 
Jcotnys



Autorisation : Membre
Nb de messages : 178
Inscrit le : Lun 20 Mar 2006, 13:28
Posté le : Jeu 15 Mai 2008, 20:52   Citer 

ok ok mais je l'ai testé et pas moyen c'est la touche 34 :quand on fait descendre le "O" , ben ya plusieurs "O" crazy.gif crazy.gif crazy.gif crazy.gif crazy.gif
j'ai vérifié et mon code est bon, comprends pa... moodforlove.gif moodforlove.gif et ca me donne ca:

Code

***************O
***************O
***************O
***************O
***************O
***************
       O


pour 24 et 26 c bon mais pa pour 34 et pour 25 faut rajouter :

Code

Output(8,B,"O
Output(A+1,16,"esp


sinon ca fait pareil que pour 34...
PS: c'est pas une critique c'est juste une remarque sur ce jeu
voila encore désolé ... eyeonly.gif eyeonly.gif (ou alors c'est peut etre ma caltos qui bug crazy.gif )

Citer : mad67

vlan dans la face lol
j'ai essayé c'est génial!


et ta pas eu de bug ahh.gif ahh.gif toi qui t'y croit à fond crazy.gif crazy.gif

----------------------
le travail c la santé winkle.gif
 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Jeu 15 Mai 2008, 21:24   Citer 

J'ai vérifié mon code, et il marche. Je pense que ton erreur de recopiage se situe ici :

Code

Output(A,16,"


si on ne fait pas attention on ne marque pas l'espace. Rajoute un espace et tu verras. (j'ai modifié mon code pour éviter cette erreur aux recopieurs, tan pis pour les 2 octets !)

 Adresse email Haut de page Bas de page 
 
Jcotnys



Autorisation : Membre
Nb de messages : 178
Inscrit le : Lun 20 Mar 2006, 13:28
Posté le : Sam 17 Mai 2008, 21:54   Citer 

crazy.gif crazy.gif crazy.gif crazy.gif crazy.gif uai c'est ca c'etait mon erreur alor que j'avais mis un espace à

Code

Output(8,B,"esp


mais pa pour

Code
Output(A,16,"


pff...vraiment désolé, jsui étourdi parfois (kel c** crazy.gif crazy.gif ...)
mais la fin j'ai pas pu la tester parcske c vraiment cho chaque foi je tombe sur une bombe.. cupsmiley.gif cupsmiley.gif et sinon un trés bon démineur minied.gif minied.gif

----------------------
le travail c la santé winkle.gif
 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Jeu 22 Mai 2008, 8:10   Citer 

Jcotnys, fait un effort pour ton orthographe car le langage SMS n'est pas autorisé sur ce forum.

Sangohan38

 Adresse email Haut de page Bas de page 
 
pasdepsedo



Autorisation : Membre
Nb de messages : 5
Inscrit le : Mar 26 Mai 2009, 17:45
Posté le : Mar 26 Mai 2009, 17:49   Citer 

voilà j'ai recopié le code sur ma ti 82.
tout se passe bien sauf que lorsque je découvre une case, il y a soit du vide soit une mine (et pas les chiffres autour des mines...).
j'ai du faire une erreur de recopiage mais je n'arrive pas a voir où...
désolé pour la remontée du sujet...

 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Mar 26 Mai 2009, 18:04   Citer 

Pas de problème c'est normal, je prends en charge ce programme jusqu'au boût^^

Regarde vers le milieu de cette partie du programme si tu as bien écris : (vers le If Ans : Output(..., Ans )


Code
Repeat K=22
Repeat K : getKey -> K : End
Output(A,16," "
Output(8,B," "
min(7,max(1,A+(K=34)-(K=25 -> A
min(15,max(1,B+(K=26)-(K=24 -> B
Output(A,16,"O
Output(8,B,"O
If K=21 and 8-[B](A,B:Then
[A](A,B
If Ans:Output(A,B,Ans
If not(Ans:Output(A,B,"
If Ans=9:Then
ClrHome
Disp "PERDU !
Pause



 Adresse email Haut de page Bas de page 
 
pasdepsedo



Autorisation : Membre
Nb de messages : 5
Inscrit le : Mar 26 Mai 2009, 17:45
Posté le : Mar 26 Mai 2009, 19:44   Citer 

j'ai revérifié et ca ne marche toujours pas...

 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Mar 26 Mai 2009, 19:48   Citer 

Dans ce cas le problème peut venir de par ici :

Code
1+round(14rand,0 -> B
End
9 -> [A](A,B
For(I, -1,1
For(J, -1,1
If A+I and B+J and A+I-8 and B+J-16:Then
If 9ø[A](A+I,B+J
1+[A](A+I,B+J -> [A](A+I,B+J     <<<<<<<<<<<<<<<<< Ici plus particulièrement
End:End:End:End
[A] -> [B]
For(I,1,7
Output(I,1,"***************



 Adresse email Haut de page Bas de page 
 
pasdepsedo



Autorisation : Membre
Nb de messages : 5
Inscrit le : Mar 26 Mai 2009, 17:45
Posté le : Mar 26 Mai 2009, 20:04   Citer 

le symbole "ø" c'est bien la combinaison de touches alpha+3 ?

 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Mar 26 Mai 2009, 20:24   Citer 

non j'ai voulu mettre =/= je vois pas pourquoi ça affiche ça.

 Adresse email Haut de page Bas de page 
 
pasdepsedo



Autorisation : Membre
Nb de messages : 5
Inscrit le : Mar 26 Mai 2009, 17:45
Posté le : Mar 26 Mai 2009, 20:36   Citer 

et bien voilà c'était ca...
merci

super jeu et ca prend pas beaucoup de place...

 Adresse email Haut de page Bas de page 
 
fabrice
Invité
Posté le : Jeu 24 Sep 2009, 23:40   Citer 

Bonsoir,
J'ai rentré le programme, mais lorsque je rentre un nombre N de mines, la calculatrice afiche erreur syntaxe et envois le curseur sur
:{7,15->dim([A]
D'où vient l'erreur ?
Et faut-il faire la difference entre / et le signe diviser ?
Merci

  Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Ven 25 Sep 2009, 16:07   Citer 

As-tu bien tapé [A] ?

Ce signe désgine une matrice, et il ne faut pas inscrire "[" + "A" + "]" mais [A] en un seul bloque (dans le menu des matrices).

 Adresse email Haut de page Bas de page 
 
Rézus



Autorisation : Membre
Nb de messages : 835
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Ven 25 Sep 2009, 19:45   Citer 

Ton programme est très bien mais j'ai l'impression que tu t'es un peu compliqué la vie ^^.

 Adresse email Haut de page Bas de page 
 
fabrice
Invité
Posté le : Ven 25 Sep 2009, 19:59   Citer 

Effectivement, mes [A] n'étaient pas en un seul bloc
Mais maintenant, apres avoir rentré le nombre de mines apparait "erreur:division par 0" et me renvoit à If 9/[A](A+I,B+J

  Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Ven 25 Sep 2009, 23:27   Citer 

Rézus : Au contraire, j'ai fais l'un des programmes de démineur le plus court tout en restant agréable à jouer. Il est simplissime par rapport à l'autre version graphique que j'ai fais.

Sinon pour l'erreur c'est normal, la ligne que tu cites est mal tapé, vérifie car c'est surement un signe d'égalité, d'inégalité, ou du genre, mais pas une division.

Pour l'explication technique je t'affirme ça car cette ligne test si 9/[A](A+I,B+J est égal à 0 ou non. Ors une division dont le nominateur est 9 sera toujours égal à un nombre différent de 0...

 Adresse email Haut de page Bas de page 
 
Johann
Invité
Posté le : Dim 18 Oct 2009, 13:40   Citer 

excusez moi, "=/=" veut dire "différnt de" soit "=" barré?
merci beer.gif

  Haut de page Bas de page 
 
Rézus



Autorisation : Membre
Nb de messages : 835
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Dim 18 Oct 2009, 14:42   Citer 

C'est la même chose ^^

 Adresse email Haut de page Bas de page 
 
WoKeRnOZ



Autorisation : Membre
Nb de messages : 57
Inscrit le : Ven 13 Nov 2009, 22:24
Posté le : Mar 24 Nov 2009, 16:14   Citer 

J'ai tenté de faire un demineur aujourd'hui..
Tout fonctionne, sauf pour l'affichage.. J'veux dire:
Quand on est pres d'une mine par exemple, j'arrive pas a metttre 1 ou 2 ou autre chose...
Obligé d'utiliser les matrices?
Ou on peut contourner par un autre moyen?

----------------------
Calculatrice Ti-82 stats fr(sans cable)
Et Ti-82 basique (sans cable non plus :o)

Programmeur novice à la recherche du programme parfait (h)
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Mar 24 Nov 2009, 17:56   Citer 

Si tu utilisait les listes?

Sangohan38

 Adresse email Haut de page Bas de page 
 
WoKeRnOZ



Autorisation : Membre
Nb de messages : 57
Inscrit le : Ven 13 Nov 2009, 22:24
Posté le : Mer 25 Nov 2009, 12:47   Citer 

Euuuh merci mais..
Tu pourrais m'expliquer stp?
Comment tu veux que je les utilise?
J'veux bien le faire, mais c'qui me manque, c'est la methode :/

----------------------
Calculatrice Ti-82 stats fr(sans cable)
Et Ti-82 basique (sans cable non plus :o)

Programmeur novice à la recherche du programme parfait (h)
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 765
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Mer 25 Nov 2009, 14:54   Citer 

Les matrices c'est le mieux. Tu peux essayer de bidouiller avec partdec et partent. en gros pour cette deuxième technique tu fous toute ta ligne dans une variable et tu la divise de 10^N, puis tu multiplies la partdec par 10 pour ne plus que garder la partent. mais tu seras obligé de rajouter des for et d'autres trucs qui rendront le programme assez lourd. Bien sur une matrice ça bouffe beaucoup de place, mais bon c'est efficace. Et je ne vois pas en quoi utiliser les listes présente un quelconque avantage.

ah et bonjour tous. beer.gif

 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Jeu 26 Nov 2009, 19:42   Citer 

L'avantage c'est qu'une liste c'est pas lourds (800 octets pour une liste à 99 lignes contre 1000 octets pour une matrice 5*5) et quand tu l'utilise, tu as juste besoin d'indiquer la ligne alors que pour une matrice, il faut indiquer la ligne et la colonne soit deux octets en plus à chaque fois.
Et le gain de vitesse est négligeable vu que la matrice est lourde et ton programme aussi.

Sangohan38

 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 765
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Jeu 26 Nov 2009, 23:03   Citer 

Une liste 5x5 pèse 233 octets chez moi :/

 Adresse email Haut de page Bas de page 
 
Rézus



Autorisation : Membre
Nb de messages : 835
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Sam 28 Nov 2009, 19:33   Citer 

Une matrice tu veux dire lol.
Pour moi,une matrice 5*5 pèse 237 octets et une liste de 25 membres 237 octets itou,donc pas de différence si ce n'est que la liste nécessite un plus grand nombre de calculs...

 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Sam 28 Nov 2009, 23:30   Citer 

Mais aussi moins de coordonnées à données donc plus d'octets au final.

Sangohan38

 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 765
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Dim 29 Nov 2009, 15:20   Citer 

Non mais ça se compense, et une matrice c'est beaucoup plus pratique niveau calcul dans le cas d'un démineur.

 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Lun 07 Déc 2009, 0:12   Citer 

Un démineur est déjà un peu lent à la base, alors avec le système de liste ce serait injouable.

Et en aucun cas un problème d'affichage ne peut être lié à l'utilisation de matrice.

 Adresse email Haut de page Bas de page 
 
val91
Invité
Posté le : Dim 13 Déc 2009, 20:53   Citer 

bonsoir a tous,
je voudrai savoir quelles sont les touches à utiliser pour ce démineur car j'arrive a déplacer les 0 avec les flèches, ainsi qu'à mettre des "+" avec la touche "alpha", mais n'arrive pas a mettre de chiffres sur la grille.
merci

  Haut de page Bas de page 
 
sypotu
Avatar

Autorisation : Membre
Nb de messages : 651
Inscrit le : Dim 13 Sep 2009, 8:27
Posté le : Dim 13 Déc 2009, 22:45   Citer 

bonsoir
c'est la touche 2nde winkle.gif

----------------------
Ti-83+.fr
Passe en 1ère S


Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p
 Adresse email Haut de page Bas de page 
 
val91
Invité
Posté le : Lun 14 Déc 2009, 18:32   Citer 

Bah, non, j'ai essayé, et sa marche pas... ou si mais ça a marché que 2 fois sans que je m'en rende compte, et ça a marché que une fois dans les deux parties, quand je rappuyais sa marchai pas.

  Haut de page Bas de page 
 
sypotu
Avatar

Autorisation : Membre
Nb de messages : 651
Inscrit le : Dim 13 Sep 2009, 8:27
Posté le : Lun 14 Déc 2009, 20:39   Citer 

relit toi tu as du faire une erreur...

----------------------
Ti-83+.fr
Passe en 1ère S


Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p
 Adresse email Haut de page Bas de page 
 
valrom



Autorisation : Membre
Nb de messages : 38
Inscrit le : Mar 11 Jan 2011, 22:09
Posté le : Mer 16 Déc 2009, 11:42   Citer 

En fait il me manquais un espace. mais maintenant ma ti 82 ne détecte pas les mines, soit, quand je clique, il y a un blanc qui apparait, soit il y a un 10, 11, 12, 13 ou 14 qui apparait (je suppose que c'est quand je fait exploser une mine).

Ah oui, et aussi, je ne peut ni perdre une partie, ni la gagner.

Pourquoi ???

 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Mer 13 Jan 2010, 16:22   Citer 

Excuse la réponse tardive.

Donc en fait vu toutes ces erreurs le plus simple serait de tout retaper.
Néamoins, regarde au niveau des matrices ([A](X,Y) par exemple) l'erreur se trouve plus surement par là, si il n'y en a qu'une.

 Adresse email Haut de page Bas de page 
 
valrom



Autorisation : Membre
Nb de messages : 38
Inscrit le : Mar 11 Jan 2011, 22:09
Posté le : Sam 23 Jan 2010, 11:56   Citer 

merci mais j'ai supprimé le programme parce qu'il prenait beaucoup de place et que je pouvait pas l'utiliser... et puis j'ai la flème de tout recopier minied.gif mais bon je vais quand meme essayéhappy.gif

 Adresse email Haut de page Bas de page 
 
jojo
Invité
Posté le : Ven 12 Mar 2010, 20:01   Citer 

j'ai un problème
tout fonctionne normalement sauf que quand je fais"seconde" a un endroit ou il n'y a pas de bombe la croix ne s'efface pas
merci de me répondre
sinon le programme est super bigmouth.gif bigmouth.gif bigmouth.gif bigmouth.gif

  Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Jeu 13 Mai 2010, 20:34   Citer 

Il faut enlever la croix avant (avec [alpha] )

 Adresse email Haut de page Bas de page 
 
adele
Invité
Posté le : Mer 03 Nov 2010, 16:06   Citer 

Bonjour
j ai ecrit le programme et lorsque je fait le jeu et que j appuie sur la touche seconde il ne se passe rien alors qu il devrait me montrer les chiffres sauf quand je tombe sur une bombe il me di perdu

  Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Mer 03 Nov 2010, 20:25   Citer 

Regarde à partir de cette ligne si tu n'as pas fait d'erreur:


Code
If K=21 and 8-[B](A,B:Then



Sangohan38

 Adresse email Haut de page Bas de page 
 
adele
Invité
Posté le : Jeu 04 Nov 2010, 15:18   Citer 

Non j'ai verifie tout est bon
Par contre il me renvoie a la ligne
Repeat K:codeTouche(fleche)K

  Haut de page Bas de page 
 
adele
Invité
Posté le : Mar 09 Nov 2010, 19:54   Citer 

je me n sort pas !!!!
pourtant g tout verifier

  Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Mer 24 Nov 2010, 1:30   Citer 

Bonjour adele.

Quand tu dis "il me renvoie", tu parles bien d'un arrêt du programme suite à une erreur (pense à dire quelle erreur il t'indique) ?
Et la calculatrice te renverrait donc à cette ligne là ?

Supprime la parenthèse à droite de la flèche.

Ce qui doit te donner :

Code
Repeat K:codeTouche(->K



 Adresse email Haut de page Bas de page 
 
godzlove



Autorisation : Membre
Nb de messages : 44
Inscrit le : Sam 16 Oct 2010, 10:29
Posté le : Mer 24 Nov 2010, 19:46   Citer 

j'ai un petit problème : je fais 2nde sur des * et il ne se passe rien, c'est parceque il n'y a ni mines ni chiffre, mais dans ce cas là, sa devrait pas afficher un blanc ? ou alors c'est pas la bonne touche ? crazy.gif sinon ou est l'erreur ? (j'ai pris soin de bien revérifier)

 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 879
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Jeu 25 Nov 2010, 14:19   Citer 

Ce programme est sur ma calculatrice et fonctionne correctement, un blanc est affiché en lieu et place d'un * quand on presse [2nd].

Il y a eu donc une erreur lors du recopiage.


Hmm...



Si t'y connais un petit peu en Ti-Basic ? Il faudrait que tu me passes le morceau de code qui entoure la pression sur [2nd].
Si tu ne vois pas, c'est autour du code

Code

If K=21



 Adresse email Haut de page Bas de page 
 
godzlove



Autorisation : Membre
Nb de messages : 44
Inscrit le : Sam 16 Oct 2010, 10:29
Posté le : Jeu 25 Nov 2010, 19:46   Citer 

oui je me débrouille,en recopiant le code, j'ai constaté que sur la ligne de commande qui doit afficher un blanc j'avais mis :


Code
If no(Ans
Output(A,B,"



l'erreur venait du fait que je n'avais pas refermé les guillemets je ne sais pas pourquoi mais sa ne marchait pas, peu être du fait que j'ai une ti-82 stats.fr...

je l'ai corrigé comme ceci :


Code
If no(Ans
Output(A,B," "



PS : un ptit prob : qd on perd, ne serait il pas meiux à l'aide d'un goto de ramener au choix final : etes vous sur....

Donc sa marche, merci, très beau jeu !

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse Page: 1,      >>





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