49 lines
547 B
ArmAsm
49 lines
547 B
ArmAsm
|
|
//
|
|
// RS-232 part of the CHKIN routine
|
|
//
|
|
|
|
// Based on UP9600 code by Daniel Dallman with Bo Zimmerman adaptations
|
|
|
|
|
|
#if CONFIG_RS232_UP9600
|
|
|
|
|
|
// XXX get rid of the ENABLE/DISABLE mechanism
|
|
|
|
|
|
chkin_rs232:
|
|
|
|
pha
|
|
lda XXX_UPFLAG
|
|
bne !+
|
|
pla
|
|
jmp $F20E // XXX
|
|
|
|
!:
|
|
pla
|
|
jsr $F30F // XXX
|
|
beq !+
|
|
jmp $F701 // XXX
|
|
|
|
!:
|
|
jsr $F31F // XXX
|
|
lda FA
|
|
cmp #$02
|
|
beq !+
|
|
cmp #$04
|
|
bcc chkin_rs232_nochkin
|
|
jsr XXX_DISABLE
|
|
jmp chkin_rs232_nochkin
|
|
!:
|
|
sta $99
|
|
jsr XXX_ENABLE
|
|
clc
|
|
rts
|
|
|
|
chkin_rs232_nochkin
|
|
jmp $F219 // XXX
|
|
|
|
|
|
#endif // CONFIG_RS232_UP9600
|