Casio
FX-602P
Mastermind : jeu de déduction
Pour la version HP49G/50G
Il s'agit ici de la version à 4 trous et 8 couleurs ( 8 chiffres). Il est très facile de
modifier le nombre de couleur (changer le chiffre 8 en [P9]). Changer le nombre de trous
est facile aussi mais il y plus de choses à changer :-)
Pour démarrer une partie, faire [P5]. Proposer une combinaison, puis EXE.
La 602P affiche le résultat comme suit :
[1 1234 -> 1:2]
1-> N° de l'essai
1234 -> Votre combinaison
1:2 -> Un pion bien placé. 2 pions bonnes couleurs mais mal placés.
REMARQUE : Si vous réfléchissez longtemps, la 602P s'éteint automatiquement. Appuyez
sur [AC] pour la rallumer puis [P0] pour continuer la partie.
Exemple de partie
P5
MASTERMIND ? |
1234 Exe |
| 1
1234 -> 1:2 |
5678 exe |
| 2
5678 -> 1:1 |
8899 Exe |
| 3
8899 -> 0:0 |
1246 Exe |
4
1246 -> 1:2 |
1532
Exe |
| 5
1523 -> 1:1 |
7265
Exe |
| 6
7265 -> 1:1 |
3615
Exe |
| 7
3615 -> 2:1 |
1645
Exe |
| 8
1645 -> 4:0 |
|
| .... en 8 !! |
|
Pour tester le programme après saisie, vous pouver faire :
1 Min01 6 Min02 4 Min03 5 Min04 puis [P0] et retester cette partie.
***[P9] 14
pas
4 Min00
LBL0
RAN# x 8 + 1 = INT
IND Min00
DSZ GOTO
***[P5] 16 pas
"MASTERMIND"
0 Min14 GSBP9 GSBP0
***[P0] 42 pas
";?"
LBL0
1 M+14 ";" HLT
GSBP6
"AR14 AR1F -> AR16:AR17"
Mr16 - 4 = x=0 GOTO1
GOTO0
LBL1
";" PAUSE "AR1F -> en AR14 !"
***[P6] 114 pas
"->" Min1F / 4 10^x = Min15
4 Min00 5 Min19 12 Min18
LBL0
MR15 x 10 - INT IND Min19 = Min15
IND MR00 IND Min18
1 M+19 M-18
DSZ GOTO0
4 Min00 5 Min19 9 Min18 MinF 0 Min16 Min 17
LBL1
IND MR19 - IND MR18 = x=0 x=F GOTO2
0 IND Min18 1 +/- IND Min19 1 M+16
LBL2
1 M+19 M+18
DSZ GOTO1
4 Min00 5 Min19
LBL2
";." 9 Min18 3 Min15
LBL3
IND MR19 - IND MR18 = x=0 x=F GOTO4
0 IND Min18 1 +/- IND Min19 1 M+17
LBL4
1 M+18 M-15
Mr15 x>=0 GOTO3
1 M+19
DSZ GOTO2
Tiens ! je m'aperçois en retapant le prog qu'il
y a 2 fois LBL2... C'est pas fait exprès mais c'est pas génant, ca fonctionne comme ça
vu comment marchent les LBL ;-)
Remarquez aussi que la séquence x=0 x=F est équivalente à x<>0 quand MRF<>0 |