|
|
|
@ -23,10 +23,10 @@ SIOB_DAT .EQU $83 |
|
|
|
#ENDIF |
|
|
|
; |
|
|
|
#IF (SIOMODE == SIOMODE_SMB) |
|
|
|
SIOA_CMD .EQU $80 |
|
|
|
SIOA_DAT .EQU $82 |
|
|
|
SIOB_CMD .EQU $81 |
|
|
|
SIOB_DAT .EQU $83 |
|
|
|
SIOA_CMD .EQU $82 |
|
|
|
SIOA_DAT .EQU $80 |
|
|
|
SIOB_CMD .EQU $83 |
|
|
|
SIOB_DAT .EQU $81 |
|
|
|
#ENDIF |
|
|
|
; |
|
|
|
; |
|
|
|
@ -312,9 +312,12 @@ SIO_OUT: |
|
|
|
CALL SIO_OST ; READY FOR CHAR? |
|
|
|
JR Z,SIO_OUT ; LOOP IF NOT |
|
|
|
LD C,(IY + 3) ; C := SIO CMD PORT |
|
|
|
#IF (SIOMODE == SIOMODE_RC) |
|
|
|
INC C ; BUMP TO DATA PORT |
|
|
|
#ENDIF |
|
|
|
#IF (SIOMODE == SIOMODE_SMB) |
|
|
|
INC C ; SMB SIO INC AGAIN |
|
|
|
DEC C ; DECREMENT CMD PORT TWICE TO GET DATA PORT |
|
|
|
DEC C |
|
|
|
#ENDIF |
|
|
|
OUT (C),E ; SEND CHAR FROM E |
|
|
|
XOR A ; SIGNAL SUCCESS |
|
|
|
|