Je vien de réaliser un programme permettant de demander un mot de passe au démarage de la TI (82stats, 82stats.fr ou 83(non+)) à condition de le lancer avant d'éteindre la TI (le programme l'étteint de tout seul).
LICENCE : L'UTILISATION DE CE PROGRAMME EST A VOS PROPRES RISQUES ET PERILS, JE NE SUIS EN RIEN RESPONSABLE D'UN QUELCONQUE DESAGREMENT OU DEGAT LIE DIRRECTEMENT OU NON A SON UTILISATION. SI VOUS CONSTTEZ UNE ERREURE, SIGNALEE LA IMMEDIATEMENT SUR CE SUJET. MIS A PART CES 2 ELEMENTS, CE PROGRAMME EST LIBRE DE DROITS.
pour télécharger :

Voici le code:
Programme TILOCK (à lancer) :
:While 1 :0:Send(9prgmONLOCK :Send(9prgmOFF :1:Send(9prgmONLOCK :{92,93,92,93,93,102,92,93 -> L1 :8 -> dim(L2 :ClrHome :For(A,1,8 :DelVar LRepeat K or L=300 :L+1 -> L :getKey -> K :End :Output(1,A,"* :K -> L2(A :End :If prod(L1=L2 :Then :0:Send(9prgmONLOCK :ClrHome :Stop :End :End
Programme ONLOCK :
:CDDC4ECDFC4E1D2 803ED56C9F321008 4110184010001368 2EDB021549311828 2010B00EDB03E84E D47ED5EFBC9D908D B03E6FED303C33A0 0 //je suis allez à la ligne tous les 16 carractères pour une meilleure lisibilité ; ne pas faire entrer sur ces lignes :End :0000 :End
Programme OFF :
:F33E01D303AFD30408D9FBC9 :End :0000 :End
ATTENTION à ne pas faire d'erreurs en recopiant, vous risquez la un Reset de la TI.
Sandro
PS : les code en héxadécimal ne sont pas de moi mais leurs auteurs m'ont autorisés à les publier librement et sous mon nom.