Sécurity: (GT)
Ce programme permet dès son lancement et après avoir entré un code de bloquer (ou débloquer si ça l'était déjà) tous vos programmes. Pour protéger un programme il faut rentrer une chaine de caractères, vous pouvez donc tous les protéger ou seulement quelques-uns. Ce programme utilise 10 octets de mémoire de listes.
La chaine de caractères à placer au début de chaques programmes que vous voulez protéger est la suivante:
List 5 µ1µ = 258 => Prog "SECURITY"
Cette chaine de caractères ne doit pas être changée et le nom du programme qui va suivre doit obligatoirement être SECURITY.
La taille: 394 octets de programmation + 10 octets de mémoire de liste.
List 5 µ1µ = 258 => Goto3
Lbl 0 : "Veuillez entrer le code SVP" ? -> A
A = ABC => Goto1
"Mauvais code" : Goto 0
Lbl 1 : C = 1 => Goto2
If List 5 µ1µ = 258
Then "Les fichiers sont bloqués et les données indisponibles"
Else "Les données sont de nouveau disponibles"
IfEnd
Lbl 2 : "Que voulez vous faire maintenant ?"
"Bloquer (1)"
"Débloquer (2)"
? -> B : "Les fichiers sont"
If B = 1
Then / 258 / -> List 5
"Bloqués"
Else / 0 / -> List 5
"Débloqués"
IfEnd
Stop
Lbl 3 : "Les fichiers sont maintenant bloqués"
1 -> C : Goto 0
ABC est le code qu'il faut rentrer pour pouvoir bloquer ou débloquer des programmes. Remplacer le par un nombre qui sera le code vous permettant de bloquer ou de débloquer.
Ce programme est rapide et facile à utiliser. Pour protéger un programme, les 22 octets de la chaine de caractères suffiront. Si vous avez beaucoup de programmes à protéger, utilisez le 'copier-coller'. Si vous lancez le programme SECURITY et que vous entrez le bon code, le programme vous indiquera l'état de vos programmes ( bloqués ou non ).
Si vous lancer un programme protégé mais qu'il n'est pas bloqué, il s'exécutera normalement. En revenche s'il est bloqué, il vous renvéra au programme SECURITY qui vous demandera le code d'accès. Si le code que vous venez d'entrer est bon et que vous décidez de débloquer les programmes, vous pouvez en appuyant sur EXE revenir au programme que vous vouliez lancer initialement.