un petit programme mot de passe

kindermoumoute

Après avoir regardé a gauche a droite ce qu'était le ti-basic je me suis attaquer a mon vrai premier programme

qui consiste (ça n'est pas nouveau) à mettre un mot de passe aux démarrage de la calculatrice!

Code:

::Lbl 1
:ClrHome
:0:Asm(prgmONBLOCK
:DelVar KDelVar AOutput(1,1,"MOT DE PASSE:
:Repeat K=XX //lettre A
:¦ DelVar KgetKey→K
:¦ If K≠0
:¦ Then
:¦ ¦ If K=11
:¦ ¦ Then
:¦ ¦ ¦ DelVar K
:¦ ¦ ¦ Repeat K=12
:¦ ¦ ¦ ¦ getKey→K
:¦ ¦ ¦ ¦ If K≠12 and K≠0
:¦ ¦ ¦ ¦ Then
:¦ ¦ ¦ ¦ ¦ Goto 1
:¦ ¦ ¦ ¦ End
:¦ ¦ ¦ End
:¦ ¦ ¦ DelVar K
:¦ ¦ ¦ Repeat K=13
:¦ ¦ ¦ ¦ getKey→K
:¦ ¦ ¦ ¦ If K≠13 and K≠0
:¦ ¦ ¦ ¦ Then
:¦ ¦ ¦ ¦ ¦ Goto 1
:¦ ¦ ¦ ¦ End
:¦ ¦ ¦ End
:¦ ¦ ¦ DelVar K
:¦ ¦ ¦ Repeat K=14
:¦ ¦ ¦ ¦ getKey→K
:¦ ¦ ¦ ¦ If K≠14 and K≠0
:¦ ¦ ¦ ¦ Then
:¦ ¦ ¦ ¦ ¦ Goto 1
:¦ ¦ ¦ ¦ End
:¦ ¦ ¦ End
:¦ ¦ ¦ DelVar K
:¦ ¦ ¦ Repeat K=15
:¦ ¦ ¦ ¦ getKey→K
:¦ ¦ ¦ ¦ If K≠15 and K≠0
:¦ ¦ ¦ ¦ Then
:¦ ¦ ¦ ¦ ¦ Goto 1
:¦ ¦ ¦ ¦ End
:¦ ¦ ¦ End
:¦ ¦ ¦ ClrHome
:¦ ¦ ¦ Output(1,1,"BONJOUR CECI EST UNE FONCTION CACHE
:¦ ¦ ¦ Pause
:¦ ¦ ¦ Goto 1
:¦ ¦ End
:¦ ¦ A+1→A
:¦ ¦ Output(2,A,"*
:¦ ¦ If A=4
:¦ ¦ Then
:¦ ¦ ¦ Asm(prgmSHUTDOWN
:¦ ¦ ¦ Goto 1
:¦ ¦ End
:¦ End
:End
:Repeat K=XX //lettre B
:¦ DelVar KgetKey→K
:¦ If K≠0
:¦ Then
:¦ ¦ A+1→A
:¦ ¦ Output(2,A,"*
:¦ ¦ If A=4
:¦ ¦ Then
:¦ ¦ ¦ Asm(prgmSHUTDOWN
:¦ ¦ ¦ Goto 1
:¦ ¦ End
:¦ End
:End
:Repeat K=XX //lettre C
:¦ DelVar KgetKey→K
:¦ If K≠0
:¦ Then
:¦ ¦ A+1→A
:¦ ¦ Output(2,A,"*
:¦ ¦ If A=4
:¦ ¦ Then
:¦ ¦ ¦ Asm(prgmSHUTDOWN
:¦ ¦ ¦ Goto 1
:¦ ¦ End
:¦ End
:End
:DelVar ARepeat K=XX //lettre D
:¦ getKey→K
:¦ If K=65
:¦ Then
:¦ ¦ Repeat A=4
:¦ ¦ ¦ A+1→A
:¦ ¦ ¦ ClrHome
:¦ ¦ ¦ randBin(5,0
:¦ ¦ ¦ Output(2,1,"****
:¦ ¦ ¦ randBin(5,0
:¦ ¦ End
:¦ End
:End
:Asm(prgmZBATTCHK
:ClrHome
:If X=0
:Then
:¦ Output(1,1,"BATTERIE : MAUVAISE
:¦ Pause
:End
:1:Asm(prgmONBLOCK
:Output(4,5,"HEY BOSS
:For(Y,1,1,1
:¦ For(X,1,63,1
:¦ ¦ Asm(prgmSHIFT
:¦ End
:End

Voilà cela n'est pas grand chose pour l'instant mais donnez vos commentaires, d'éventuelles optimisation, ...etc

PS : pour faire fonctionner ce programme, remplacer les lettres XX pars les differentes touche que vous preferer et il est necessaire d'avoir les programmes SHUTDOWN, SHIFT, ZBATTCHK de BASIC Tools utility disponibles ici http://www.ticalc.org/pub/83plus/asm/programs/index.html
ainsi que le programme ONBLOCK que vous pouvez creer vous même avec ce tuto ici http://ti83-84.skyrock.com/1724070332-Bloquer-la-touche-ON-dans-un-programme-BASIC.html

**Marco**

Salut
Il faudrait que tout passe dans une boucle, sinon tu peux enlever les Then et End si t'as qu'une instruction après le If.
Moi, ce que je ferais, c'est que j'enregistrerais les touches sur lesquelles on a appuyé (dans une liste) puis je comparerais avec le résultat attendu. Tu remarqueras que ça prend beaucoup moins de place à écrire comme algorithme.

_________________

kindermoumoute

Ouai mai pour l'instant je maîtrise pas les listes, pour les THEN et END j'ai vu que cela prenait moin de place quand on met if then end que si on faisait if : instruction
ou sinon je pensai faire un autre truc mais je ne sais pas si c'est possible, en baissant le contraste de l'écran à 0 au démarrage du programme, comme ça quelqu'un qui ne connait pas peu croire a une panne de la calculette, mais je ne sais pas comment faire cela dans un programme.

**Marco**

kindermoumoute a écrit:

je pensai faire un autre truc mais je ne sais pas si c'est possible, en baissant le contraste de l'écran à 0 au démarrage du programme, comme ça quelqu'un qui ne connait pas peu croire a une panne de la calculette, mais je ne sais pas comment faire cela dans un programme.

C'est possible en utilisant un programme en assembleur, mais c'est pas un peu grillé comme technique ?

_________________

kindermoumoute

Marco a écrit:

C'est possible en utilisant un programme en assembleur, mais c'est pas un peu grillé comme technique ?

Et bas détrompe toi l'autre jour j'ai baisser le contraste a zéro juste avant que ma prof de physique me prenne ma calculatrice et je lui ai expliqué avec désolement qu'elle ne marchait plus!

**tama**

ça dépend des profs, y a des profs qui se posent même pas de question et enlèvent une pile (c'est ce que faisait ma prof de 1ère ... de physique ! heureusement, ça ne m'est jamais arrivé :D )
Pour ton programme il est bien, mais il est sûrement optimisable (bien, l'indentation ;))

_________________
Modérateur des salons z80

Lisez le Journal de tibank, y a du bon ! :)

Envie de nous voir IRL ? participez à la réunion Nord de tibank !

**Xywez**

la prof t'enlève un pile et tu gagne un reset, avec des programmes en moins xD

**Bisam** · 14.8/20 à la 2ème épreuve de l'agreg 2000

J'voudrais pas faire mon intéressant mais à part si tu l'utilises alors qu'il t'a spécifié que c'est interdit, un prof ou un surveillant n'a théoriquement pas le droit de te prendre ta calculatrice. Il a encore moins le droit d'en consulter voire d'en altérer son contenu. C'est une atteinte à la propriété privée.

Bien sûr, il peut te la confisquer (pour un motif valable comme "tentative de triche" ou "jeu pendant les heures de cours") et ne la restituer qu'à tes parents s'il le souhaite...

kindermoumoute

Xywez a écrit:

la prof t'enlève un pile et tu gagne un reset, avec des programmes en moins xD

Ce qui peut être très utile si tu a mit un programme de triche sur ta calculette!

Bisam a écrit:

J'voudrais pas faire mon intéressant mais à part si tu l'utilises alors qu'il t'a spécifié que c'est interdit, un prof ou un surveillant n'a théoriquement pas le droit de te prendre ta calculatrice. Il a encore moins le droit d'en consulter voire d'en altérer son contenu. C'est une atteinte à la propriété privée.

Bien sûr, il peut te la confisquer (pour un motif valable comme "tentative de triche" ou "jeu pendant les heures de cours") et ne la restituer qu'à tes parents s'il le souhaite...

Je vais tenter cela la prochaine fois qui sait...

tama a écrit:

(bien, l'indentation ;))

c'est quoi l'indentation?

**Marco**

Le fait d'avoir décalé le texte de ton code pour bien ressortir les boucles et blocs.

_________________

jacques

Bisam a écrit:

J'voudrais pas faire mon intéressant mais à part si tu l'utilises alors qu'il t'a spécifié que c'est interdit, un prof ou un surveillant n'a théoriquement pas le droit de te prendre ta calculatrice. Il a encore moins le droit d'en consulter voire d'en altérer son contenu. C'est une atteinte à la propriété privée.

C'est aussi ce qu'a dit mon prof de maths, et il a ajouté : "Et d'ailleurs, si vous en profitez pas pour pomper, c'est que vous êtes un peu couillon !"

_________________
Venez visiter mon site sur les Ti: www.tisoftwares.net16.net !!

**Xywez**

kindermoumoute a écrit:

Xywez a écrit:

la prof t'enlève un pile et tu gagne un reset, avec des programmes en moins xD

Ce qui peut être très utile si tu a mit un programme de triche sur ta calculette!

Ba oui mais tout dépend pour qui