$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