$EF90/61328:   Process RS232 Byte

Jump from $EF5B:

EF90: A5 A7     LDA $A7       ; Tape temporary
EF92: D0 EA     BNE $EF7E     ; Set Up To Receive
EF94: 4C D3 E4  JMP $E4D3     ; Unused Bytes For Future Patches

* Old KERNAL:
EF94: 85 A9     STA $A9       ; RS232 Flag: Start Bit check/Tape temporary
EF96: 60        RTS

Jump from $EF5F:

EF97: AC 9B 02  LDY $029B     ; RS232 Index to End of Input Buffer
EF9A: C8        INY
EF9B: CC 9C 02  CPY $029C     ; RS232 Pointer: High Byte of Input Buffer
EF9E: F0 2A     BEQ $EFCA
EFA0: 8C 9B 02  STY $029B     ; RS232 Index to End of Input Buffer
EFA3: 88        DEY
EFA4: A5 AA     LDA $AA       ; RS232 Input Byte Buffer/Tape temporary
EFA6: AE 98 02  LDX $0298     ; RS232 Number of Bits left to send

Jump from $EFAF:

EFA9: E0 09     CPX #$09
EFAB: F0 04     BEQ $EFB1
EFAD: 4A        LSR
EFAE: E8        INX
EFAF: D0 F8     BNE $EFA9

Jump from $EFAB:

EFB1: 91 F7     STA ($F7),Y   ; RS232 Input Buffer Pointer
EFB3: A9 20     LDA #$20
EFB5: 2C 94 02  BIT $0294     ; RS232 Pseudo 6551 command Register Image
EFB8: F0 B4     BEQ $EF6E     ; RS232 Receive
EFBA: 30 B1     BMI $EF6D     ; RS232 Receive
EFBC: A5 A7     LDA $A7       ; Tape temporary
EFBE: 45 AB     EOR $AB       ; RS232 Input parity/Tape temporary
EFC0: F0 03     BEQ $EFC5
EFC2: 70 A9     BVS $EF6D     ; RS232 Receive
EFC4: 2C        .BYTE $2C

Jump from $EFC0:

EFC5: 50 A6     BVC $EF6D     ; RS232 Receive
EFC7: A9 01     LDA #$01
EFC9: 2C        .BYTE $2C

Jump from $EF9E:

EFCA: A9 04     LDA #$04
EFCC: 2C        .BYTE $2C

Jump from $EFDF:

EFCD: A9 80     LDA #$80
EFCF: 2C        .BYTE $2C

Jump from $EFDD:

EFD0: A9 02     LDA #$02
EFD2: 0D 97 02  ORA $0297     ; RS232 Pseudo 6551 Status Register Image
EFD5: 8D 97 02  STA $0297     ; RS232 Pseudo 6551 Status Register Image
EFD8: 4C 7E EF  JMP $EF7E     ; Set Up To Receive

Jump from $EF72:

EFDB: A5 AA     LDA $AA       ; RS232 Input Byte Buffer/Tape temporary
EFDD: D0 F1     BNE $EFD0
EFDF: F0 EC     BEQ $EFCD

    Previous Page / Next Page