$EEBB/61115: RS232 Send
Jump from $FE9D:
EEBB: A5 B4 LDA $B4 ; RS232 Write bit count/Tape Read timing Flag
EEBD: F0 47 BEQ $EF06 ; Send New RS232 Byte
EEBF: 30 3F BMI $EF00
EEC1: 46 B6 LSR $B6 ; RS232 Output Byte Buffer/Tape Read Error Flag
EEC3: A2 00 LDX #$00
EEC5: 90 01 BCC $EEC8
EEC7: CA DEX
Jump from $EEC5:
EEC8: 8A TXA
EEC9: 45 BD EOR $BD ; RS232 Output Parity/Tape Byte temporary
EECB: 85 BD STA $BD ; RS232 Output Parity/Tape Byte temporary
EECD: C6 B4 DEC $B4 ; RS232 Write bit count/Tape Read timing Flag
EECF: F0 06 BEQ $EED7
Jump from $EEEC, $EEF0, $EF04:
EED1: 8A TXA
EED2: 29 04 AND #$04
EED4: 85 B5 STA $B5 ; RS232 Next Bit to send/Tape Read - End of Tape
EED6: 60 RTS
Jump from $EECF:
EED7: A9 20 LDA #$20
EED9: 2C 94 02 BIT $0294 ; RS232 Pseudo 6551 command Register Image
EEDC: F0 14 BEQ $EEF2
EEDE: 30 1C BMI $EEFC
EEE0: 70 14 BVS $EEF6
EEE2: A5 BD LDA $BD ; RS232 Output Parity/Tape Byte temporary
EEE4: D0 01 BNE $EEE7
Jump from $EEF4, $EEFA, $EEFE:
EEE6: CA DEX
Jump from $EEE4, $EEF8, $EEFC:
EEE7: C6 B4 DEC $B4 ; RS232 Write bit count/Tape Read timing Flag
EEE9: AD 93 02 LDA $0293 ; RS232 Pseudo 6551 control Register Image
EEEC: 10 E3 BPL $EED1
EEEE: C6 B4 DEC $B4 ; RS232 Write bit count/Tape Read timing Flag
EEF0: D0 DF BNE $EED1
Jump from $EEDC:
EEF2: E6 B4 INC $B4 ; RS232 Write bit count/Tape Read timing Flag
EEF4: D0 F0 BNE $EEE6
Jump from $EEE0:
EEF6: A5 BD LDA $BD ; RS232 Output Parity/Tape Byte temporary
EEF8: F0 ED BEQ $EEE7
EEFA: D0 EA BNE $EEE6
Jump from $EEDE:
EEFC: 70 E9 BVS $EEE7
EEFE: 50 E6 BVC $EEE6
Jump from $EEBF:
EF00: E6 B4 INC $B4 ; RS232 Write bit count/Tape Read timing Flag
EF02: A2 FF LDX #$FF
EF04: D0 CB BNE $EED1
Previous Page / Next Page