$F05B/61531: ?
Jump from $F03B:
F05B: A6 6F LDX $6F
F05D: 20 DF F0 JSR $F0DF
F060: A5 7F LDA $7F ; drive number
F062: AA TAX
F063: 0A ASL
F064: 1D 9B 02 ORA $029B,X
F067: 49 01 EOR #$01
F069: 29 03 AND #$03
F06B: 85 70 STA $70
F06D: 20 A5 F0 JSR $F0A5
F070: A5 F9 LDA $F9 ; buffer number
F072: 0A ASL
F073: AA TAX
F074: A5 80 LDA $80 ; track
F076: 0A ASL
F077: 0A ASL ; times 4
F078: 95 99 STA $99,X ; equal pointer in BAM field
F07A: A5 70 LDA $70
F07C: 0A ASL
F07D: 0A ASL
F07E: A8 TAY
Jump from $F08E:
F07F: A1 99 LDA ($99,X)
F081: 99 A1 02 STA $02A1,Y
F084: A9 00 LDA #$00
F086: 81 99 STA ($99,X) ; zero in buffer
F088: F6 99 INC $99,X ; increment buffer pointer
F08A: C8 INY
F08B: 98 TYA
F08C: 29 03 AND #$03
F08E: D0 EF BNE $F07F
F090: A6 70 LDX $70
F092: A5 80 LDA $80 ; track
F094: 9D 9D 02 STA $029D,X
F097: AD F9 02 LDA $02F9
F09A: D0 03 BNE $F09F
F09C: 4C 8A D5 JMP $D58A ; write block
Jump from $F09A:
F09F: 09 80 ORA #$80
F0A1: 8D F9 02 STA $02F9
F0A4: 60 RTS
Jump from $F06D, $EF13, $EF1A:
F0A5: A8 TAY
F0A6: B9 9D 02 LDA $029D,Y
F0A9: F0 25 BEQ $F0D0
F0AB: 48 PHA
F0AC: A9 00 LDA #$00
F0AE: 99 9D 02 STA $029D,Y
F0B1: A5 F9 LDA $F9 ; buffer number
F0B3: 0A ASL ; times 2
F0B4: AA TAX
F0B5: 68 PLA
F0B6: 0A ASL
F0B7: 0A ASL
F0B8: 95 99 STA $99,X
F0BA: 98 TYA
F0BB: 0A ASL
F0BC: 0A ASL
F0BD: A8 TAY
Jump from $F0CE:
F0BE: B9 A1 02 LDA $02A1,Y
F0C1: 81 99 STA ($99,X) ; write in buffer
F0C3: A9 00 LDA #$00
F0C5: 99 A1 02 STA $02A1,Y
F0C8: F6 99 INC $99,X ; increment buffer pointer
F0CA: C8 INY
F0CB: 98 TYA
F0CC: 29 03 AND #$03
F0CE: D0 EE BNE $F0BE
Jump from $F0A9:
F0D0: 60 RTS
Previous Page / Next Page