Mot de passe requis pour OUVRIR un prog pas pour le modifier
Posté le 13/11/2004 00:00
Ca ne vous ait jamais arrivé que vous faites un prog sur votre calto et que quelqu'un l'ouvre et regarde ce que vous avez fait ? Bien sur il ne peut pas le modifier il peut juste l'ouvrir. Voici comment rendre impossible la lecture et l'ouverture du prog :
Commencez votre programme par :
Lbl 1
CrlText
"ENTRER CODE D'ACCES "?->A
CrlText
If A=(choisissez votre mot de passe)
Then GoTo 2
Else GoTo 1
IfEnd
Lbl 2 (commencer votre programme)
A partir de là, tous vos programmes ne pourront être lu que par le propriétaire du programme car pour modifier le code d'exécution, il faudra d'abord connaître le code d'édition.
Bien sur on peut changer les goto et lbl.
Cette version proposée est une version "casio land".
VERSION 2
Si vous ne la comprennez pas et que vous aimez comprendre ce que vous tapez vous pouvez mettre :
ClrText
"ENTREZ CODE D'ACCES "?->A
A'symbole différent'(code tapé)=>Prog "nom de votre prog"
(commencer prog)
Remarquez que vous gagnez 2 goto et lbl et de la place !
En espérant de voir mon mini prog au début de tout vos programmes !!!
Invité
Citer : Posté le 16/06/2012 21:59 | #
Bonsoir,
J'essaye en vain de mettre un mot de passe au début de mon programme, mais a chaque fois que je rentre le code source au début du programme et que je le lance, j'obtiens une erreur :S
De quoi ca peut venir ?
Citer : Posté le 16/06/2012 22:38 | #
Peux-tu nous en dire davantage sur cette erreur s'il te plait ?
Sinon, fais quelquechose de simple comme ceci :
A != [Ton code ne comportant que des chiffres] => Stop
La Planète Casio est accueillante : n'hésite pas à t'inscrire pour laisser un message ou partager tes créations !
Citer : Posté le 16/06/2012 22:50 | #
Dans le code de Matronix on peut optimiser en supprimant "else goto 2" et "lbl 2", et sinon ce que je faisais il y a un moment, c'est qu'au début des programmes que je ne voulais pas que les autres voient je rajoutais "Do Lpwhile1" ou alors je faisais un système ou il fallait ouvrir avec F1 : (je pense qu'on a plus l'habitude d'ouvrir avec EXE :
If Getkey=79
Then Do
Lpwhile 1
If end
Sinon j'avais aussi fait un digicode sympa
Rentré en 1ère S, je peux plus venir souvent...
Invité
Citer : Posté le 16/06/2012 22:50 | #
? -> AA !=123=> StopÙ
ClrGraphÙ
AxesOffÙ
ViewWindow 1,127,0,1,63,0Ù
Ù
Text 2,2,"Rentrez votre cours ici, "Ù
Text 8,2,"ou copiez votre cours depuis I"Ù
Text 14,2,"nternet ou un document"Ø
ClsÙ
Stop
Voila l'exemple tout simple du code que je fais dans mon programme, j'obtiens une syntaxe error :S
Calculatrice GRAPH 35+ USB avec FA124
Citer : Posté le 16/06/2012 22:52 | #
Euh... Il faut que tu retourne a la ligne après "?->A" mais c'est peut être juste une erreur de ta part dans le message
Rentré en 1ère S, je peux plus venir souvent...
Invité
Citer : Posté le 16/06/2012 22:56 | #
Oui desole, erreur du message, c'est toujours pareil
Citer : Posté le 16/06/2012 23:01 | #
il ne faut aucun espace entre le ?, la fleche et le A
pareille à la deuxième ligne...
Jouez à 6 sur une seule calto : Curve Fever
Un die and retry qui vous fera bieeeen rager Test Andropov
un très bon sokoban
le seul vrai jeu de foot en basic : FIFA 12
Ca c'est ce que j'appelle un jeu de reflexion jewel master
Qui vaincra l'intelligence artificielle de cet othello
Le célèbre pacman
Et tant d'autres BTL's games
Le jeu du mois de Novembre et award du jeu le plus dur de l'année 2013 MultiTask, testez-le
Invité
Citer : Posté le 16/06/2012 23:10 | #
?->AÙ
A!=123=>StopÙ
ClrGraphÙ
AxesOffÙ
ViewWindow 1,127,0,1,63,0Ù
Ù
Text 2,2,"Rentrez votre cours ici, "Ù
Text 8,2,"ou copiez votre cours depuis I"Ù
Text 14,2,"nternet ou un document"Ù
ClsÙ
Stop
Voici mon code actuel dans mon programme sur fa 124 et toujours pareil ><
Citer : Posté le 16/06/2012 23:21 | #
ton "stop" tu l'a écrit manuellement ou tu as mis la fonction "stop" qui se trouve en "shift" "vars" "F2" "F4"
Jouez à 6 sur une seule calto : Curve Fever
Un die and retry qui vous fera bieeeen rager Test Andropov
un très bon sokoban
le seul vrai jeu de foot en basic : FIFA 12
Ca c'est ce que j'appelle un jeu de reflexion jewel master
Qui vaincra l'intelligence artificielle de cet othello
Le célèbre pacman
Et tant d'autres BTL's games
Le jeu du mois de Novembre et award du jeu le plus dur de l'année 2013 MultiTask, testez-le
Invité
Citer : Posté le 16/06/2012 23:26 | #
Il vient du generateur de cour
Citer : Posté le 16/06/2012 23:54 | #
Tu as un Syn error à la quelle ligne?
Invité
Citer : Posté le 16/06/2012 23:56 | #
Je lance mon programme dans la liste des programmes de ma calc et j'obtiens un gros : SYNTAXE ERROR.
Ensuite je fais exit et je reviens sur le code du programme.
Citer : Posté le 17/06/2012 00:01 | #
Si tu appuis sur exit, le curseur (dans le code) se trouve à quel endroit? ça permet de localiser l'erreur.
Invité
Citer : Posté le 17/06/2012 00:03 | #
Le curseur de retrouve juste après le 1er point d'exclamation de ma formule
Ajouté le 17/06/2012 à 00:05 :
D’interrogation pardon
Citer : Posté le 17/06/2012 00:07 | #
à mon avis il faut que tu remplaces la flèche par la flèche qui se trouve juste au dessus de la touche ac/on
Invité
Citer : Posté le 17/06/2012 00:10 | #
Ah, il y a du mieux
J'ai changé la fleche comme tu m'a dis et maintenant lorsque je lance le programme, j'obtiens un point d'interrogation, j'écris mon mdp 123 et ensuite je fais exe et j'obtiens un "MATH ERROR" et ensuite je reviens sur le code de mon programme
Citer : Posté le 17/06/2012 00:15 | #
Invité
Citer : Posté le 17/06/2012 00:17 | #
Il se trouve juste le second A de mon code
: A!=123=>Stop
Invité
Citer : Posté le 17/06/2012 00:18 | #
C'est le symbole point d'exclamation et double flèches qui gênent je pense
Citer : Posté le 17/06/2012 00:25 | #
Je pense aussi que c'est ça
->Remplace la double flèche par la double flèche que se trouve dans [shift]+[vars](prgm)+[f3](jump)+[f3](=>) (sur G75/85/95)
->Pareil pour != (ou ! =), remplace-le par [shift]+[vars](prgm)+[f6](>)+[f3](rel) + [f2](!=)