$EE13/60947: Receive From Serial Bus
Jump from $F1B5, $F4D5, $F4E0, $F501, $FFA5:
EE13: 78 SEI
EE14: A9 00 LDA #$00
EE16: 85 A5 STA $A5 ; Tape Synchronising count down
EE18: 20 85 EE JSR $EE85 ; Serial Clock On
Jump from $EE1E:
EE1B: 20 A9 EE JSR $EEA9 ; Get Serial Data And Clock In
EE1E: 10 FB BPL $EE1B
Jump from $EE54:
EE20: A9 01 LDA #$01
EE22: 8D 07 DC STA $DC07 ; CIA1: Timer B High-Byte (Tape, Serial Port)
EE25: A9 19 LDA #$19
EE27: 8D 0F DC STA $DC0F ; CIA1: Control Register B
EE2A: 20 97 EE JSR $EE97 ; Serial Output 1
EE2D: AD 0D DC LDA $DC0D ; CIA1: Interrupt (IRQ) Control Register
Jump from $EE3A:
EE30: AD 0D DC LDA $DC0D ; CIA1: Interrupt (IRQ) Control Register
EE33: 29 02 AND #$02
EE35: D0 07 BNE $EE3E
EE37: 20 A9 EE JSR $EEA9 ; Get Serial Data And Clock In
EE3A: 30 F4 BMI $EE30
EE3C: 10 18 BPL $EE56
Jump from $EE35:
EE3E: A5 A5 LDA $A5 ; Tape Synchronising count down
EE40: F0 05 BEQ $EE47
EE42: A9 02 LDA #$02
EE44: 4C B2 ED JMP $EDB2 ; Flag Errors: Status #03 - WRITE TIMEOUT
Jump from $EE40:
EE47: 20 A0 EE JSR $EEA0 ; Serial Output 0
EE4A: 20 85 EE JSR $EE85 ; Serial Clock On
EE4D: A9 40 LDA #$40
EE4F: 20 1C FE JSR $FE1C ; Control OS Messages
EE52: E6 A5 INC $A5 ; Tape Synchronising count down
EE54: D0 CA BNE $EE20
Jump from $EE3C:
EE56: A9 08 LDA #$08
EE58: 85 A5 STA $A5 ; Tape Synchronising count down
Jump from $EE60, $EE63, $EE74:
EE5A: AD 00 DD LDA $DD00 ; CIA2: Data Port A (Serial Bus, RS232, VIC Base Mem.)
EE5D: CD 00 DD CMP $DD00 ; CIA2: Data Port A (Serial Bus, RS232, VIC Base Mem.)
EE60: D0 F8 BNE $EE5A
EE62: 0A ASL
EE63: 10 F5 BPL $EE5A
EE65: 66 A4 ROR $A4 ; Serial Bus shift Counter
Jump from $EE6D, $EE70:
EE67: AD 00 DD LDA $DD00 ; CIA2: Data Port A (Serial Bus, RS232, VIC Base Mem.)
EE6A: CD 00 DD CMP $DD00 ; CIA2: Data Port A (Serial Bus, RS232, VIC Base Mem.)
EE6D: D0 F8 BNE $EE67
EE6F: 0A ASL
EE70: 30 F5 BMI $EE67
EE72: C6 A5 DEC $A5 ; Tape Synchronising count down
EE74: D0 E4 BNE $EE5A
EE76: 20 A0 EE JSR $EEA0 ; Serial Output 0
EE79: 24 90 BIT $90 ; Kernal I/O Status Word ST
EE7B: 50 03 BVC $EE80
EE7D: 20 06 EE JSR $EE06 ; Send UNLISTEN
Jump from $EE7B:
EE80: A5 A4 LDA $A4 ; Serial Bus shift Counter
EE82: 58 CLI
EE83: 18 CLC
EE84: 60 RTS
Previous Page / Next Page