(œ!********************************Q œ FORA=0TO13:READX:POKE1030+A,X:NEXT„œ DATA33,0,64,17,20,4,1,0,64,237,176,195,0,224£œPRINT"Ihr Kennwort bitte"Õ(œFORA=0TO3:B=PEEK(-8192+A):IFB>127THENB=B-128ñ2œI$=INKEY$:IFI$=""THEN5<<œIFI$=CHR$(B)THENNEXT:GOTO10:! Zum Start des zu sch}tzenden ProgrammesVFœIFI$<>CHR$(B)THENA=3£PœPRINT"Sie sind nicht zugriffsberechtigt. Versuchen Sie es noch einmal" ÔZœPRINTAT(20,20);"Hi,Hi,Hi.":PAUSE10:CALL*406üdÝ0,31,0,39:â0,6:™:Ý1,30,1,38:â0,6:™$ižá(0,26);à3;Ì(96);" 1991 Grisoft":žInž" WERTER COMPUTERFREUND !"oxž" *************************"´‚ž:ž"Sehr h{ufig ist es notwendig, Datenbe-st{nde vor nicht Zug";ýŒž"riffsberechtigten zu sch}tzen. Daf}r habe ich hier ein Programm";F–ž" geschrieben. Dieses kann man vor das jeweilige Programm stellen"; ž", bzw. an geeignetter Stelle einf}gen, wenn man beachtet, da~";تž" in Zeile 0 ein REM mit mindestens 15 beliebigen Zei- chen steht"; ´ž". ","In die freigehaltenen Speicherstellen wird ein MC-Programm";b¾ž" geschrieben. Dieses bewirkt das automatische Ueber-"; ¨Èž"schreiben der Speicherstellen von 416Hbis 4000H mit dem momen";îÒž"tanen Speicher-inhalt ab 4000H aufw{rts. Hierbei wirdder LDIR"; Üž"-Befehl der Maschinensprache verwendet. "a æž"In die Register HL und BC wird 4000H und ins Register DE";« ðž" 0414H geladen. F}rHL steht in Zeile 10 >33,0,64<. 0 ist der low-";à úž" und 64 der Highwert. F}r BC steht >1,0,64<";) ž" und f}r DE >17,20,4<. Jeder hexadez. ermittelte Speicherbe- re";k ž"ich ist in seine dez. Form umzuwan- deln und einzutragen. "… žá(30,38);Ì(138):Û:™:Ê "ž:ž"Die Zeilen 4-10 beinhalten die Ab- frage nach dem CODE-"; ,ž"Wort. In unserem Fall werden mit einer Schleife die"N 6ž"Speicherstellen E000H bis E003H mit dem eingegebenen Zeichen ";— @ž"verglichen. Bereits beim ersten falschen Zeichen wird die Schl";Ù Jž"eife verlassen und mit Call*406 das Programm vernichtet." Tž"Nach dem nun die REM's aus den Zeilen 1-10 entfernt wurden, ";g ^ž"ist das Hilfs- programm startbereit. Nach dem Start ist Listen";¢ hž" nicht mehr m|glich. Das ge-h|rt zur Erh|hung der ";Þ rž"Sicherheit.":ž:ž" Viel Vergn}gen !" |ž:ž"Ps. Das Code-Wort lautet in diesem Fall: CvpC ";Þ rž"Sicherheit.":ž:ž" Viel Vergn}gen !" |ž:ž"Ps. Das Code-Wort lautet