Casio
Apprendre à programmer sur Calculatrice Casio
Dans cette rubrique, je vais vous expliquer comment programmer sur calculatrice Casio. Ceux qui ne savent pas du tout programmer et qui n’ont rien compris dans le manuel d’utilisateur, ils vont pouvoir apprendre ici.
Tous mes programmes sont valables pour les systèmes graphiques : CFX 9930, 9960 (anciens noms), ou Graph 60, 65 (nouveaux noms)…
I/ Les commandes de base :
• Commande d’entrée (?) : inviter à entrer une valeur.
Pour écrire "?" sur calculatrice : appuyez sur SHIFT, PRGM, F4
• Commande de sortie (Δ) : pour afficher un résultat intermédiaire pendant l’exécution d’un programme.
Pour écrire "Δ" : appuyez sur SHIFT, PRGM, F5
• Goto, Lbl : pour effectuer un saut inconditionnel à un endroit défini dans un programme.
Pour écrire "Goto" : SHIFT, PRGM, F3, F2
?→A
?→B
Lbl 1
?→C
AC+B Δ
Goto 1
"NB ENFANTS"?→A
"NB BISCUITS"?→B
Lbl 1
"NB BOITES BISCUITS"?→C
"NB BISCUITS PAR ENFANT="
BC/A Δ
Goto 1
En vert, ce sont les commandes. Il ne faut pas les écrire mot à mot sur calculatrice, sinon ces commandes ne marchent pas.
II/Les programmes de base :
Au lieu de vous expliquer tout dans les détails, copiez ces programmes ci-dessous et modifiez-les petit à petit et les tester afin de comprendre. C’est comme cela qu’on progresse.
Les programmes suivants sont les plus courts qu’on puise faire ! Ici je vous donne pas les programmes les plus complets, mais les plus légers. N’ajouter pas trop de textes inutiles, car un bon programme est aussi un programme léger. On cherche la qualité et non la quantité.
Attention : 0 = c’est un zéro. Pour éviter la confusion, je n’utilise pas la lettre O.
0→F~G
"NB EXERCICES" ?→E
Lbl 0
ClrText
Int 100Ran#→A
Int 46Ran#→B
" "
" "
Locate 1,1,"EXERCICE"
Locate 10,1,F+1
Locate 1,2,A
Locate 3,2,"+ ="
0→C
B<0=>1→C
Locate 4-C,2,B
?→D
A+B=D
Ans=0=>"FAUX"Δ
Ans=1=>"BIEN"Δ
Ans=1=>Isz G
Isz F
F<E=>Goto 0
"Note : " :Int 20G/F
Il y a 2 espaces entre + et =
Pour écrire "ClrText" : SHIFT, PRGM, F6, F1, F1
Pour écrire "Int" : OPTN, F6, F4, F2
Pour écrire "Ran#" : OPTN, F6, F3, F4
Pour écrire "Locate" : SHIFT, PRGM, F6, F4, F1
Pour écrire "<" : SHIFT, PRGM, F6, F3, F4
Pour écrire "=>" : SHIFT,PRGM, F3, F3
Pour écrire "Isz" : SHIFT, PRGM, F3, F4
ClrText
2→A
7→B
20→C
2→D
0→F
Lbl 1
Isz F
Locate C, D," "
Int 4Ran#→E
E=0=>C>1=>Dsz C
E=1=>C<21=>Isz C
E=1=>D>1=>Dsz D
E=3=>D<7=>Isz D
Getkey
Ans≠0=>Locate A,B," "
Ans=38=>A>1=>Dsz A
Ans=27=>A<21=>Isz A
Ans=28=>B>1=>Dsz B
Ans=37=>B<21=>Isz B
Locate C,D,"S"
Locate A,B,"C"
A≠C or B≠D=>Ans≠44=>Goto 1
"TU L’AS EU !"
"TEMPS(EN SEC) :"
0.3F
Stop
Pour écrire "Dsz" : SHIFT, PRGM, F3, F5
Pour écrire "Getkey" : SHIFT, PRGM, F6, F4, F2
Pour écrire "≠" : SHIFT, PRGM, F6, F3, F2
Pour écrire "or" : OPTN, F6, F6, F4, F2
Pour écrire "Stop" : SHIFT, PRGM, F2, F4
0→S
"HEURE"?→H
"MIN"?→M
ClrText
Lbl 0
Locate 1,1,"0 :0' "
Locate 1,1,H
Locate 4,1,M
Lbl 1
S+0.0801→S
Locate 7,1,Int S
S<60=>Goto 1
0→S
Isz M
M≥60=>Isz H
M≥60=>0→M
H≥24=>0→H
Goto 0
Pour écrire "≥" : SHIFT, PRGM, F6, F3, F5
ViewWindow 1,127,0,63,1,0
120→C
18→B
Lbl 0
Getkey→A
A=28 or A=37=>Text B,7
," "
A=28=>B>8=>B-5→B
A=37=>B<45=>B+5→B
Text B,7, "XHH=>"
C=120=>5(Int 8Ran#)+8→
D
Text D,C,"{ "
C-8→C
C<9=>"GAME OVER"
C<9=>Stop
A≠31=>Goto 0
23→E
Do
Text B,E, " ---"
E+17→E
LpWhile E<120
B=D=>120→C
Goto 0
Pour écrire "ViewWindow" : SHIFT, F3, F1
Pour écrire "Do" : SHIFT, PRGM, F1, F6, F6, F3
Pour écrire "Text" : SHIFT, F4, F6, F6, F2
Pour écrire "LpWhile" : SHIFT, PRGM, F1, F6, F6, F1
Comme vous pouvez le constater, j’ai choisi les programmes les plus légers. Pour les programmes ci-dessus, il n’est pas possible de les alléger encore davantage.