$EFE1/61409:   Submit to RS232

Jump from $F26C:

EFE1: 85 9A     STA $9A       ; Default Output Device (3)
EFE3: AD 94 02  LDA $0294     ; RS232 Pseudo 6551 command Register Image
EFE6: 4A        LSR
EFE7: 90 29     BCC $F012     ; No DSR (Data Set Ready) Error
EFE9: A9 02     LDA #$02
EFEB: 2C 01 DD  BIT $DD01     ; CIA2: Data Port B (User Port, RS232)
EFEE: 10 1D     BPL $F00D     ; No DSR (Data Set Ready) Error
EFF0: D0 20     BNE $F012     ; No DSR (Data Set Ready) Error

Jump from $EFF7:

EFF2: AD A1 02  LDA $02A1     ; RS232 Enables
EFF5: 29 02     AND #$02
EFF7: D0 F9     BNE $EFF2

Jump from $EFFC:

EFF9: 2C 01 DD  BIT $DD01     ; CIA2: Data Port B (User Port, RS232)
EFFC: 70 FB     BVS $EFF9
EFFE: AD 01 DD  LDA $DD01     ; CIA2: Data Port B (User Port, RS232)
F001: 09 02     ORA #$02
F003: 8D 01 DD  STA $DD01     ; CIA2: Data Port B (User Port, RS232)

Jump from $F00B:

F006: 2C 01 DD  BIT $DD01     ; CIA2: Data Port B (User Port, RS232)
F009: 70 07     BVS $F012     ; No DSR (Data Set Ready) Error
F00B: 30 F9     BMI $F006

    Previous Page / Next Page