FIFO_PORT EQU P1
WRITE_FIFO: MOV SFRPAGE,#0FH
JNB FIFO_FF,WFIFO_L1
CLR C1_DIR
MOV FIFO_PORT,R7
CLR C1_EN
CLR C1_WR
SETB C1_WR
SETB C1_EN
MOV R6,#1
RET
WFIFO_L1: MOV R6,#0
RET
READ_FIFO: MOV SFRPAGE,#0FH
JNB FIFO_EF,RFIFO_L1
SETB C1_DIR
CLR C1_EN
CLR C1_RD
MOV FIFO_PORT,#0FFH
MOV A,FIFO_PORT
SETB C1_RD
SETB C1_EN
MOV R6,A
MOV R7,#1
RET
RFIFO_L1: MOV R7,#0
RET
|