    Parameter des letzten Records der Datei merken

    Einsprung von $88AE, $A2D6:

    A438: 20 5C A1  JSR $A15C        Ende der REL-Datei suchen
    A43B: 20 35 A2  JSR $A235        benoetigte Blocks einlesen
    A43E: 20 6E A5  JSR $A56E        Super-Side-Sektoren verwenden ?
    A441: D0 07     BNE $A44A        nein, ==>
    A443: AD 00 01  LDA $0100        aktuelle Gruppennummer
    A446: 85 5A     STA $5A          = bearbeitete Gruppennummer
    A448: 85 58     STA $58          Anzahl vorhendener Gruppen merken

    Einsprung von $A441:

    A44A: A5 6A     LDA $6A          Zeiger auf aktuelle T&S des Side-Sektors
    A44C: 85 56     STA $56          merken
    A44E: A5 69     LDA $69          Side-Sektor-Nummer merken
    A450: 85 55     STA $55          (als aktuell bearbeitete)
    A452: A9 00     LDA #$00         Flags loeschen:
    A454: 85 57     STA $57          nur einen Datenblock anlegen
    A456: 85 68     STA $68          Zeiger in Record loeschen
    A458: 60        RTS

        Previous Page / Next Page