$F72C/63276: Find Any Tape Header
Jump from $F749, $F3AF, $F556, $F7EA:
F72C: A5 93 LDA $93 ; Flag: 0 = Load, 1 = Verify
F72E: 48 PHA
F72F: 20 41 F8 JSR $F841 ; Initiate Tape Read
F732: 68 PLA
F733: 85 93 STA $93 ; Flag: 0 = Load, 1 = Verify
F735: B0 32 BCS $F769
F737: A0 00 LDY #$00
F739: B1 B2 LDA ($B2),Y ; Pointer: Start Address of Tape Buffer
F73B: C9 05 CMP #$05
F73D: F0 2A BEQ $F769
F73F: C9 01 CMP #$01
F741: F0 08 BEQ $F74B
F743: C9 03 CMP #$03
F745: F0 04 BEQ $F74B
F747: C9 04 CMP #$04
F749: D0 E1 BNE $F72C
Jump from $F741, $F745:
F74B: AA TAX
F74C: 24 9D BIT $9D ; Error-Mode-Flag
F74E: 10 17 BPL $F767
F750: A0 63 LDY #$63
F752: 20 2F F1 JSR $F12F ; Print Message
F755: A0 05 LDY #$05
Jump from $F75F:
F757: B1 B2 LDA ($B2),Y ; Pointer: Start Address of Tape Buffer
F759: 20 D2 FF JSR $FFD2 ; Output Vector, chrout
F75C: C8 INY
F75D: C0 15 CPY #$15
F75F: D0 F6 BNE $F757
F761: A5 A1 LDA $A1 ; Real-time jiffy Clock
F763: 20 E0 E4 JSR $E4E0 ; Pause After Finding Tape File
F766: EA NOP
Jump from $F74E:
F767: 18 CLC
F768: 88 DEY
Jump from $F735, $F73D:
F769: 60 RTS
Previous Page / Next Page