SAMP1A     EQU        30H  
SAMP1B     EQU        31H
SAMP1C     EQU        32H
SAMP2A     EQU        33H
SAMP2B     EQU        34H
SAMP2C     EQU        35H
SAMP3A     EQU        36H
SAMP3B     EQU        37H
SAMP3C     EQU        38H
SAMP4A     EQU        39H
SAMP4B     EQU        3AH
SAMP4C     EQU        3BH
SAMP5A     EQU        3CH
SAMP5B     EQU        3DH
SAMP5C     EQU        3EH         
           ORG 0000H
           LJMP 0100H
           ORG 0100H
MAIN:      MOV R0,#SAMP1A 
           MOV A,#01H
           MOV @R0,A
           INC R0
           MOV A,#51H
           MOV @R0,A
           INC R0
           MOV A,#50H
           MOV @R0,A
           INC R0
           MOV A,#02H
           MOV @R0,A
           INC R0
           MOV A,#56H
           MOV @R0,A
           INC R0
           MOV A,#12H
           MOV @R0,A
           INC R0
           MOV A,#02H
           MOV @R0,A
           INC R0
           MOV A,#56H
           MOV @R0,A
           INC R0
           MOV A,#10H
           MOV @R0,A
INSER:     MOV R2,#02H
SORT:      MOV A,R2
           MOV R3,A
           MOV R0,#SAMP1A
LOOP:      MOV A,@R0
           INC R0
           MOV R1,A
           CLR C
           SUBB A,@R0
           
           JC DONE 
           MOV A,@R0
           DEC R0
           XCH A,@R0
           INC R0
           MOV @R0,A
DONE:      DJNZ R3,LOOP
           DJNZ R2,SORT
           INC R0
           MOV A,@R0
           MOV R0,#SAMP1A
           INC R0
           INC R0
           MOV A,@R0
           MOV 20H,A
           SJMP $
           END