Afficher du code morse (fx-92+ Spéciale Collège)
Posted: 19 Nov 2019, 20:00Je vous propose un petit programme qui va vous permettre d'afficher sur l'écran de votre CASIO fx-92+ Spéciale Collège un message codé en morse
(ça peut être utile si vous avez envie de faire passer un message de manière originale, ou discrète
)
(https://fr.wikipedia.org/wiki/Code_Morse_international)
La calculatrice ne reconnaissant que des chiffres en entrée, j'ai choisi d'attribuer...
- le chiffre 1 pour un trait,
- le chiffre 4 pour un point.
Ainsi, pour coder "SOS", il faudra entrer successivement:
M?444 [exe]
M?111 [exe]
M?444 [exe]
Dès qu'il n'y a plus de place pour afficher le prochain code, un retour à la ligne est effectué (en tout, 6 lignes sont disponibles)
Et lorsqu'il n'y a plus de place sur l'écran, la calculatrice affiche "Résultat: "
Si vous trouvez que les codes ne sont pas assez espacés, vous pouvez ajouter un espace supplémentaire en appuyant directement sur [exe].
Avant d'insérer ce programme, veillez à supprimer l'axe de l'écran (seconde, config, algorithmique, arrière-plan,aucun)
Bon amusement !!
(ça peut être utile si vous avez envie de faire passer un message de manière originale, ou discrète
)(https://fr.wikipedia.org/wiki/Code_Morse_international)
La calculatrice ne reconnaissant que des chiffres en entrée, j'ai choisi d'attribuer...
- le chiffre 1 pour un trait,
- le chiffre 4 pour un point.
Ainsi, pour coder "SOS", il faudra entrer successivement:
M?444 [exe]
M?111 [exe]
M?444 [exe]
Dès qu'il n'y a plus de place pour afficher le prochain code, un retour à la ligne est effectué (en tout, 6 lignes sont disponibles)
Et lorsqu'il n'y a plus de place sur l'écran, la calculatrice affiche "Résultat: "
Si vous trouvez que les codes ne sont pas assez espacés, vous pouvez ajouter un espace supplémentaire en appuyant directement sur [exe].
Avant d'insérer ce programme, veillez à supprimer l'axe de l'écran (seconde, config, algorithmique, arrière-plan,aucun)
- Code: Select all
Aller à x=-95;y=23
Répéter jusqu'à y=-25
?→M
10^(4→B
Répéter 5
Ent(M÷B→A
Si A>0 Alors
M-AB→M
Stylo écrit
Avancer de 9-2A pixels
Stylo relevé
Avancer de 5 pixels
Fin
,1B→B
⤴
Avancer de 9 pixels
Si x>40 Alors
Aller à x=-95;y=y-8
Fin
⤴
"Résultat :"
Bon amusement !!
