$C5AC/50604: ?
Jump from $C457, $C4A2, $D70E, $ED97:
C5AC: A0 00 LDY #$00
C5AE: 8C 91 02 STY $0291
C5B1: 88 DEY
C5B2: 8C 53 02 STY $0253
C5B5: AD 85 FE LDA $FE85 ; 18, directory track
C5B8: 85 80 STA $80
C5BA: A9 01 LDA #$01
C5BC: 85 81 STA $81 ; sector 1
C5BE: 8D 93 02 STA $0293
C5C1: 20 75 D4 JSR $D475 ; read sector
Jump from $C62C:
C5C4: AD 93 02 LDA $0293
C5C7: D0 01 BNE $C5CA
C5C9: 60 RTS
Jump from $C5C7:
C5CA: A9 07 LDA #$07
C5CC: 8D 95 02 STA $0295 ; number of directory entries (-1)
C5CF: A9 00 LDA #$00
C5D1: 20 F6 D4 JSR $D4F6 ; get pointer from buffer
C5D4: 8D 93 02 STA $0293 ; save as track number
Jump from $C626:
C5D7: 20 E8 D4 JSR $D4E8 ; set buffer pointer
C5DA: CE 95 02 DEC $0295 ; decrement counter
C5DD: A0 00 LDY #$00
C5DF: B1 94 LDA ($94),Y ; first byte from directory
C5E1: D0 18 BNE $C5FB
C5E3: AD 91 02 LDA $0291
C5E6: D0 2F BNE $C617
C5E8: 20 3B DE JSR $DE3B ; get track and sector number
C5EB: A5 81 LDA $81
C5ED: 8D 91 02 STA $0291 ; sector number
C5F0: A5 94 LDA $94
C5F2: AE 92 02 LDX $0292
C5F5: 8D 92 02 STA $0292 ; buffer pointer
C5F8: F0 1D BEQ $C617
C5FA: 60 RTS
Jump from $C5E1:
C5FB: A2 01 LDX #$01
C5FD: EC 92 02 CPX $0292 ; buffer pointer to one?
C600: D0 2D BNE $C62F
C602: F0 13 BEQ $C617
Jump from $C48B, $EDD4:
C604: AD 85 FE LDA $FE85 ; 18, track number of BAM
C607: 85 80 STA $80 ; track number
C609: AD 90 02 LDA $0290
C60C: 85 81 STA $81 ; sector number
C60E: 20 75 D4 JSR $D475 ; read block
C611: AD 94 02 LDA $0294
C614: 20 C8 D4 JSR $D4C8 ; set buffer pointer
Jump from $C5E6, $C5F8, $C602, $C470, $C4B5, $D72B:
C617: A9 FF LDA #$FF
C619: 8D 53 02 STA $0253 ; erase-file found flag
C61C: AD 95 02 LDA $0295
C61F: 30 08 BMI $C629 ; all directory entries checked?
C621: A9 20 LDA #$20
C623: 20 C6 D1 JSR $D1C6 ; increment buffer ptr by 32, next entry
C626: 4C D7 C5 JMP $C5D7 ; and continue
Jump from $C61F:
C629: 20 4D D4 JSR $D44D ; set buffer pointer
C62C: 4C C4 C5 JMP $C5C4 ; read next block
Jump from $C600:
C62F: A5 94 LDA $94
C631: 8D 94 02 STA $0294
C634: 20 3B DE JSR $DE3B ; get track & sector number from buffer
C637: A5 81 LDA $81
C639: 8D 90 02 STA $0290 ; save sector number
C63C: 60 RTS
Previous Page / Next Page