Erste Hilfe für den C 64: RENEW

Manchmal läuft auch alles schief! Da waren die Finger wieder einmal schneller als die Gedanken. Man hat NEW eingetippt und erst nach dem Drücken der RETURN-Taste wird einem der angerichtete, ungewollte Schaden klar: Das Programm ist weg! Oder?

Die VC 20-Besitzer können jetzt nur lächeln — wenn sie die Ausgabe 4 kennen. Dort ist nämlich ein Programm abgedruckt, daß ein mit NEW gelöschtes Programm wieder sichtbar macht. Hier ist die angepaßte Version für den C 64.

Eine Programmbeschreibung erübrigt sich, da in der Ausgabe 4 Helmut Welke dies bereits sehr ausführlich gemacht hat. Es sind auch nur sehr kleine Änderungen zu machen. Im Originallisting für den VC 20 (4/84 Seite 89) sind in Zeile 1005 der Wert 207 durch 175 und in Zeile 1015 der Wert 198 durch 166 zu ersetzen und schon läuft’s auch im C 64. Bei diesem hilft dieses RENEW auch nach einem Reset oder SYS 64738. Auch dieses Programm kann selbstverständlich mit dem DATA-WANDLER abgespeichert werden.

100 rem *** renew ***
110 fori=678 to 755:reada:pokei,a:next
111 data165,43,24,105,4,133,253,165,44,105,0,133,254,160,0,177,253,240,8
112 data200,192,88,208,247,76,8,175,200,152,160,0,24,101,253,145,43,133,253
113 data144,2,230,254,165,254,200,145,43,136,177,253,170,200,177,253,240
114 data7,133,254,134,253,76,213,2,165,0,24,105,2,133,45,165,254,32,85,166
115 data76,156,166