$EA2E/59950:   Accept data from serial bus

Jump from $EA4B, $E8E7:

EA2E: 78        SEI
EA2F: 20 07 D1  JSR $D107       ; open channel for writing
EA32: B0 05     BCS $EA39       ; channel not active?
EA34: B5 F2     LDA $F2,X       ; WRITE flag
EA36: 6A        ROR
EA37: B0 0B     BCS $EA44       ; not set?

Jump from $EA32:

EA39: A5 84     LDA $84         ; secondary address
EA3B: 29 F0     AND #$F0
EA3D: C9 F0     CMP #$F0        ; OPEN command?
EA3F: F0 03     BEQ $EA44       ; yes
EA41: 4C 4E EA  JMP $EA4E       ; to wait loop

Jump from $EA37, $EA3F:

EA44: 20 C9 E9  JSR $E9C9       ; get data byte from bus
EA47: 58        CLI
EA48: 20 B7 CF  JSR $CFB7       ; and write in buffer
EA4B: 4C 2E EA  JMP $EA2E       ; to loop beginning

Jump from $EA41, $E8FA, $E999:

EA4E: A9 00     LDA #$00
EA50: 8D 00 18  STA $1800       ; reset IEEE port
EA53: 4C E7 EB  JMP $EBE7       ; to wait loop
EA56: 4C 5B E8  JMP $E85B       ; to serial bus main loop

    Previous Page / Next Page