COUNT: EQU 03H TABLE: DEFB 01H,20H,50H,3AH,2BH,E5H DSRT: MOV R6,#00H MOV R7,#COVNT DEC R1 MOV R0,#TAB MOV R1,#23H LOOP: MOV 2AH,@R0 INC R0 MOV 2BH,@R0 MOV 2CH,@R1 INC R1 MOV 2DH,@R1 MOV R2,#02H CLR C MOV A,2AH SUBB A,2CH MOV 2AH,A MOV A,2BH SUBB A,2DH MOV ABH,A JNC C,LOOP2 DEC R0 DEC R1 MOV R2,#01H LOOP1: MOV 2AH,@R0 MOV 2DH,@R1 MOV @R1,2AH MOV @R0,2DH MOV R6,#01H LOOP2: INC R0 INC R1 DEC R2 MOV A,R2 JZ A,LOOP1 DJNZ R7,LOOP DEC R6 MOV A,R6 JZ A,DSRT RET