$C9FA/51706: ? Jump from $C976, $C9BC: C9FA: AE 79 02 LDX $0279 C9FD: B5 E2 LDA $E2,X ; drive number C9FF: 29 01 AND #$01 CA01: 85 7F STA $7F ; save CA03: AD 85 FE LDA $FE85 ; 18, directory track CA06: 85 80 STA $80 ; save CA08: B5 D8 LDA $D8,X ; directory sector CA0A: 85 81 STA $81 CA0C: 20 75 D4 JSR $D475 ; read block CA0F: AE 79 02 LDX $0279 CA12: B5 DD LDA $DD,X ; pointer in block CA14: 20 C8 D4 JSR $D4C8 ; set buffer pointer CA17: AE 79 02 LDX $0279 CA1A: B5 E7 LDA $E7,X ; file type CA1C: 29 07 AND #$07 ; isolate CA1E: 8D 4A 02 STA $024A ; and save CA21: A9 00 LDA #$00 CA23: 8D 58 02 STA $0258 CA26: 20 A0 D9 JSR $D9A0 ; get parameters for rel-file CA29: A0 01 LDY #$01 CA2B: 20 25 D1 JSR $D125 ; get file type CA2E: F0 01 BEQ $CA31 ; rel-file? CA30: C8 INY Jump from $CA2E: CA31: 98 TYA CA32: 4C C8 D4 JMP $D4C8 ; set buffer pointer Previous Page / Next Page |