$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 |