Trouver le code

Ici, on fait dans le petit, le LCD qui déchire sa race, on y cause même calculatrices quand on est en manque !

Modérateur : Politburo

Répondre
Avatar de l’utilisateur
spacemax
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 85
Inscription : 05 nov. 2011 13:45
Localisation : Alpes de Haute Provence
Contact :

Trouver le code

Message par spacemax » 09 oct. 2015 23:56

Bon, c'est bien beau de parler des idées, alors comme je le disais dans le post de la gazette 6, j'aime bien les petits jeux sur nos pockets. Je propose un jeu classique, ou il faut trouver un code de 3 chiffres composé des nombres de 0 à 5 sur casio FX-8500G mais ça le fait aussi sur les autres. On a 9 chances.

Mcl : 0->J :
Lbl 0 : Int (Rand#x6)->A[J] : Lsz J : J<=3 =>Goto 0 : 9->N : 3->I :
Lbl 1 : ?->A : Lsz I : I<=5=>Goto 1 : 0->K : 0->L : 0->I :
Lbl 2 : 0->T : 2->J :
Lbl 3 : Lsz J :A ≠ A[J] =>Goto 5 : 1-> T : I ≠ J-3 =>Goto 4 : K+1->K : Goto 6 :
Lbl 4 : L+1->L : Goto 6 :
Lbl 5 : J<5=>Goto 3 :
Lbl 6 : -1->A[J] : Lsz I : I<=2=>Goto 2 : "Bien place" ▴ K ▴ "Mal place" ▴ L ▴ K ≠ 3 => Goto 7 : "Gagne" ▴ 0->J : Goto 0
Lbl 7 : Dsz N : Goto 1 : "Perdu" ▴ A[0] ▴ A[1] ▴ A[2] ▴

J'espère que je me suis pas trompé en recopiant. En tout cas, ça détend !!!
Don't forget the spirit of the game...

Canon X-07 / Casio fx-850P / TI74 / Casio fx-8500G / Psion 3 / Psion 3a / Psion II XP / Psion II Lz / Psion Revo / Fx-4000p / Dell Axim x50V / Spiga Sagem / Casio fx-3900p / Casio fc-200 / Sharp 1403

Avatar de l’utilisateur
spacemax
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 85
Inscription : 05 nov. 2011 13:45
Localisation : Alpes de Haute Provence
Contact :

Re: Trouver le code

Message par spacemax » 10 oct. 2015 17:28

Je me suis aperçu d'une coquille...mais je le dis pas !
Don't forget the spirit of the game...

Canon X-07 / Casio fx-850P / TI74 / Casio fx-8500G / Psion 3 / Psion 3a / Psion II XP / Psion II Lz / Psion Revo / Fx-4000p / Dell Axim x50V / Spiga Sagem / Casio fx-3900p / Casio fc-200 / Sharp 1403

Avatar de l’utilisateur
ledudu
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 5600
Inscription : 26 mars 2009 14:07
Localisation : Ile de France
Contact :

Re: Trouver le code

Message par ledudu » 10 oct. 2015 22:29

Tu définies la variable T pour ne pas compter deux fois une chiffre mal placé mais tu ne fais pas le contrôle...

Avatar de l’utilisateur
spacemax
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 85
Inscription : 05 nov. 2011 13:45
Localisation : Alpes de Haute Provence
Contact :

Re: Trouver le code

Message par spacemax » 11 oct. 2015 00:31

1) oui, la variable T n'est pas utilisée pour controle
2) la variable L compte les chiffres mal placés mais n'est pas contrôlée, la variable K compte les bien placés
exemple tirage 3 2 1
Saisie (1,2,1)
Comparaison :
3 - 1 : j+1
3 - 2 : j+1
3 - 1 : j+1 -1 saisie (1,2,1) Bien placé 0 mal placé 0

2 - 1 : j+1
2 - 2 : k+1 => saisie (1,-1,1) Bien placé 1
2 - 1 : j+1 saisie (1,-1,1) Bien placé 1 mal placé 0

1 - 1 : L+1 => saisie (-1,-1,1) Bien placé 1 mal placé 1
1 - 2 : j+1
1 - 1 : k+1 => saisie (-1,-1,-1) Bien placé 2 mal placé 1 <- Le comptage du mal placé n'est pas corrigé ici

...A modifier !
Don't forget the spirit of the game...

Canon X-07 / Casio fx-850P / TI74 / Casio fx-8500G / Psion 3 / Psion 3a / Psion II XP / Psion II Lz / Psion Revo / Fx-4000p / Dell Axim x50V / Spiga Sagem / Casio fx-3900p / Casio fc-200 / Sharp 1403

Avatar de l’utilisateur
spacemax
Fonctionne à 300 bauds
Fonctionne à 300 bauds
Messages : 85
Inscription : 05 nov. 2011 13:45
Localisation : Alpes de Haute Provence
Contact :

Re: Trouver le code

Message par spacemax » 11 oct. 2015 21:51

J'ai changé mon fusil d'épaule et je n'essaie plus de compter les bien placés et les mal placés à la volée. J'utilise 3 mémoires supplémentaires que je lis à la fin de ma vérification. Le code s'est un peu rallongé mais est testé et ok. Peut-être à optimiser.

Mcl : 0->J :
Lbl 0 : Int (Rand#x7)->A[J] : Lsz J : J<=3 =>Goto 0 : 10->N : 3->I :
Lbl 1 : 0->A[24] : A->A[25] : 0->A[26] : ?->A : Lsz I : I<=5=>Goto 1 : 0->I
Lbl 2 : 2->J
Lbl 3 : Lsz J : A ≠ A[J]=>Goto 5 : I ≠ J-3=>Goto 4 : 2->A[I+24] : Goto 6 :
Lbl 4 : A[I+24] ≠ 2=>1->A[I+24]
Lbl 5 : J<=5=>Goto 3 :
Lbl 6 : Lsz I : I<=2=>Goto 2 : 23->I : 0->K : 0->L :
Lbl 7 : Lsz I : A=1=>L+1->L : A =2=>K+1->K : I<26=>Goto 7 : "Bien Place" : K : "Mal place" : L : 3->I : K ≠ 3=>Goto 8 : "GAGNE" : 0->J : Goto 0
Lbl 8 : Dsz N : Goto 1 : "Perdu" : A[0] : A[1] : A[2]
Don't forget the spirit of the game...

Canon X-07 / Casio fx-850P / TI74 / Casio fx-8500G / Psion 3 / Psion 3a / Psion II XP / Psion II Lz / Psion Revo / Fx-4000p / Dell Axim x50V / Spiga Sagem / Casio fx-3900p / Casio fc-200 / Sharp 1403

Avatar de l’utilisateur
ledudu
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 5600
Inscription : 26 mars 2009 14:07
Localisation : Ile de France
Contact :

Re: Trouver le code

Message par ledudu » 11 oct. 2015 22:00

Oui c'est ce que j'ai fait sur la cp-400.
Trois listes:
- une pour les chiffres à trouver
- une pour le coup du joueur
- une pour les contrôle et éviter les doublons

Répondre

Revenir vers « Tous les Pockets »