Neues von Hypra-Load

Es sind noch ein paar Bytes frei im Speicher für kleine Ergänzungen zum Hypra-Load-Perfekt. Hier eine Old-Routine und der Disk-Status-Befehl.

Hypra Perfekt ist gut, aber es geht nocht besser! Bei mir verschwinden durch RESET des öfteren Basic-Programme, oder die Floppy-LED blinkt mich fragend an. Das muß nicht sein, sagte ich mir, und untersuchte via Monitor das Betriebssystem des C 64. Nach mehreren Stunden fand ich die Routine »Laden von Band«, die ja nicht mehr benötigt wird. Auch von Hypra-Load wurde diese Routine nicht verändert beziehungsweise benötigt. Dadurch ergibt sich ein freier Speicherbereich, in den zwei kleine Programme passen: Das erste Programm (Listing 1: Status) liest den Fehlerkanal der Floppy und zeigt ihn auf dem Bildschirm an (das Programm stammt aus dem Floppy-Kurs). Das zweite Programm (Listing 1: Old) rettet ein gelöschtes Basic-Programm und setzt alle Zeiger wieder richtig. Die Old-Routine wird mit SYS62777 und die Status-Routine mit SYS62843 aufgerufen. (Ich habe mir diese Aufrufe gleich auf zwei Funktionstasten gelegt.)

Um die beiden Programme in Hypra-Perfekt einzubinden, müssen die DATA-Zeilen des Listings mit genau den gleichen Zeilennummern eingetippt werden.

Die Statusroutine belegt den Speicherplatz von 62843 bis 62894 (Dez.) und wird mit SYS 62843 aufgerufen. (Auch von einem Basic-Programm aus möglich.)

Die Old-Routine belegt den Speicherbereich von 62777 bis 62842 (Dez.) und wird mit SYS62777 aufgerufen. Nach Ablauf erfolgt ein Sprung $A474, (READY-Meldung)

8300 rem **** old-routine *****
8301 data62777,65,7309
8302 data165,43,164,44,133,34,132,35,160,3,200,177,34,208,251,200,152,24,101,34
8303 data160,0,145,43,165,35,105,0,200,145,43,136,162,3,230,34,208,2,230,35,177
8304 data34,208,244,202,208,243,165,34,105,2,133,45,165,35,105,0,133,46
8305 data32,96,166,76,116,164
8306 rem *** status-routine ***
8307 data62843,51,6757
8308 data169,0,133,144,169,1,162,8,160,111,32,186,255,169,0,32,189,255,32,192,255
8309 data169,8,32,180,255,169,111,32,150,255,32,165,255,32,210,255,36,144,80,246
8310 data169,8,32,171,255,169,1,32,195,255
8350 rem *** block 17: $e49b-$e4a2
8351 data58523,8,554
8352 data72,89,80,82,65,45,76,45
8355 rem *** block 17 ueberschreibt ***
8356 rem *** 64k ram-system in      ***
8357 rem *** hypra-l-system          ***
9000 data0
9010 rem ******  ende  ******