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