SIMON. Jeu de mémoire pour CASIO FX-602P

 


SIMON

Ce programme reprend le principe du "simon", un jeu musical qui permettait de faire travailler sa mémoire. Le principe en est très simple :
- La 602P vous présente un nombre
- Vous devez le retaper
- la 602P vous présente ce premier nombre puis une second
- Vous devez retaper la séquence
- La 602P vous présente les deux premiers nombres + 1 autre
- etc...

Le but du jeu est de retenir la séquence la plus longue.

A noter que, en mode standard (22 mémoires), si vous retenez une séquence de plus de 20 nombres (chapeau !!!) vous faites exploser la mémoire de la calcu qui déclarera forfait !

===========================================================
[P0] 107 pas

"S " ";I " ";M " ";O " ";N " PAUSE PAUSE {Petite animation}

0 Min1F {Nombre de tentative}

LBL0
1 M+1F
RAN# x 99 + 1 = INT IND Min1F {Nouveau nombre aléatoire de 1 à 99 à trouver}
GSBP5 {Affiche la série}
0 Min00

LBL2
MR00 - MR1F = x>=0 GOTO0 {Séquence trouvée ->Nouvelle séquence + 1 nombre}
ISZ
"->??."
HLT - IND MR00 = x=0 GOTO2 {Ok, c'est le bon nombre, au suivant ...}

IND MR00 "Et non ->##." PAUSE {Erreur}
GSBP5 {Ré-affiche la séquence correcte}

1 M-1F 0 MinF

LBL3
MRF "Score : ##"
1 M+F Mr1F x>=F GOTO3 {Petite animation pour afficher le score }
";" {Permet de laisser la calcu en mode alpha}

-----------------------------------------------------------------------
[P5] 32 pas {Sous-programme affichant la série des nombres à trouver}

1 MinF

LBL1
IND MRF "->##."
30 Min00

LBL2 {Petite tempo pour l'affichage qui }
DSZ {permet d'éviter le 'clignotement' qu'on a avec}
GOTO2 {l'instruction PAUSE }

1 M+F
MR1F - MrF =
x>=0 "->¤¤." { '¤' correspondnt au carré noir de la Casio 'INV 1' }
x>=0 GOTO1

========================================================================