$FC57/64599: Write Tape Leader
Jump from $FBE0:
FC57: C6 BE DEC $BE ; Tape Input/Output Block count
FC59: D0 03 BNE $FC5E
FC5B: 20 CA FC JSR $FCCA ; Stop Tape Motor
Jump from $FC59:
FC5E: A9 50 LDA #$50
FC60: 85 A7 STA $A7 ; Tape temporary
FC62: A2 08 LDX #$08
FC64: 78 SEI
FC65: 20 BD FC JSR $FCBD ; Set IRQ Vector
FC68: D0 EA BNE $FC54 ; IRQ Entry Point
FC6A: A9 78 LDA #$78
FC6C: 20 AF FB JSR $FBAF ; Send Tone to Tape
FC6F: D0 E3 BNE $FC54 ; IRQ Entry Point
FC71: C6 A7 DEC $A7 ; Tape temporary
FC73: D0 DF BNE $FC54 ; IRQ Entry Point
FC75: 20 97 FB JSR $FB97 ; New Character Setup
FC78: C6 AB DEC $AB ; RS232 Input parity/Tape temporary
FC7A: 10 D8 BPL $FC54 ; IRQ Entry Point
FC7C: A2 0A LDX #$0A
FC7E: 20 BD FC JSR $FCBD ; Set IRQ Vector
FC81: 58 CLI
FC82: E6 AB INC $AB ; RS232 Input parity/Tape temporary
FC84: A5 BE LDA $BE ; Tape Input/Output Block count
FC86: F0 30 BEQ $FCB8 ; Set IRQ Vector
FC88: 20 8E FB JSR $FB8E ; Reset Tape Pointer
FC8B: A2 09 LDX #$09
FC8D: 86 A5 STX $A5 ; Tape Synchronising count down
FC8F: 86 B6 STX $B6 ; RS232 Output Byte Buffer/Tape Read Error Flag
FC91: D0 83 BNE $FC16 ; IRQ Entry Point
Previous Page / Next Page