Wenn Gruppe voll, dann neue Gruppe anlegen Einsprung von $A476: A547: A5 55 LDA $55 Alte Side-Sektor-Nummer A549: C9 05 CMP #$05 >= 5 ? A54B: B0 03 BCS $A550 Ja (Gruppe voll), ==> A54D: 4C 79 A4 JMP $A479 zurueck in alte Routine (wie ohne Super-Side-Sektor) Neue Gruppe anlegen Einsprung von $A54B: A550: A9 FF LDA #$FF Der neue Side-Sektor ist die Nummer 0 A552: 85 55 STA $55 (also ist der alte die -1) A554: A9 00 LDA #$00 Pufferzeiger auf Pufferanfang A556: 20 22 94 JSR $9422 setzen A559: A0 02 LDY #$02 A55B: 91 64 STA ($64),Y a=0: Mit Side-Sektor 0 beginnen A55D: A6 50 LDX $50 A55F: BD 5E 02 LDA $025E,X Recordlaenge festlegen A562: C8 INY A563: 91 64 STA ($64),Y A565: C8 INY y=4 !? A566: F0 03 BEQ $A56B ??? A568: 4C 9E A4 JMP $A49E weiter bei Blockverkettung setzen Einsprung von $A566: A56B: 4C 79 A4 JMP $A479 Previous Page / Next Page |