    naechsten freien Block im aktuellen Track suchen ($f1fa)

    Einsprung von $8B38, $8B56, $B6D9, $B6E5, $B739:

    B746: 20 B4 B5  JSR $B5B4        aktuellen BAM-Eintrag holen
    B749: 20 5E B7  JSR $B75E        und auf Fehler pruefen

    Einsprung von $B759:

    B74C: A5 4E     LDA $4E          existiert angegebener Sektor ?
    B74E: C5 75     CMP $75          (groesste Sektornummer +1)
    B750: B0 09     BCS $B75B        nein, ==>
    B752: 20 D8 B5  JSR $B5D8        ist der Block frei ?
    B755: D0 06     BNE $B75D        ja, ==>
    B757: E6 4E     INC $4E          naechsten Block probieren
    B759: D0 F1     BNE $B74C        immer ==>

    Einsprung von $B750:

    B75B: A9 00     LDA #$00         z=1: alle Sektoren belegt

    Einsprung von $B755:

    B75D: 60        RTS

        Previous Page / Next Page