logischen Folgesektor holen (bei der 1571: $886c)

Einsprung von $BAEE, $BBED:

C07A: A5 75     LDA $75          Anzahl Sektoren pro Spur
C07C: 38        SEC
C07D: E9 01     SBC #$01         -1
C07F: 85 3D     STA $3D          = letzte Sektornummer
C081: AD 04 02  LDA $0204        aktuellen Sektor holen
C084: C5 3D     CMP $3D          ist der letzte Sektor des Tracks erreicht ?
C086: F0 06     BEQ $C08E        ja, ==>
C088: 18        CLC              Sektornummer erhoehen
C089: 69 01     ADC #$01
C08B: 4C 93 C0  JMP $C093

Einsprung von $C086:

C08E: EE 03 02  INC $0203        Tracknummer erhoehen
C091: A9 00     LDA #$00         Sektornummer auf 0 setzen

Einsprung von $C08B:

C093: 8D 04 02  STA $0204
C096: 60        RTS

    Previous Page / Next Page