Compare Letter

.MODEL SMALL
.STACK 100H
.DATA
MSG DB "ENTER CAPITAL LETTER$"
MSG2 DB "SORTED VALUE : $"
MSG3 DB "NUMBER 1 : $"
MSG4 DB "NUMBER 2 : $"
.CODE
MAIN PROC

    MOV AX,@DATA
    MOV DS,AX
    NUM1:
     MOV AH,9
     LEA DX,MSG3
     INT 21H
     MOV AH,1
     INT 21H
     CMP AL,5AH
     MOV BL,AL
     JLE NUM2
     MOV AH,2
     MOV DL,0AH
     INT 21H
     MOV DL,0DH
     INT 21H
     MOV AH,9
     LEA DX,MSG
     INT 21H
     MOV AH,2
     MOV DL,0AH
     INT 21H
     MOV DL,0DH
     INT 21H
     JMP NUM1
    NUM2:
     MOV AH,2
     MOV DL,0AH
     INT 21H
     MOV DL,0DH
     INT 21H
     MOV AH,9
     LEA DX,MSG4
     INT 21H
     MOV AH,1
     INT 21H
     CMP AL,5AH
     MOV CL,AL
     JLE CAL
     MOV AH,2
     MOV DL,0AH
     INT 21H
     MOV DL,0DH
     INT 21H
     MOV AH,9
     LEA DX,MSG
     INT 21H
     MOV AH,2
     MOV DL,0AH
     INT 21H
     MOV DL,0DH
     INT 21H
     JMP NUM2
     CAL:
     MOV AH,2
     MOV DL,0AH
     INT 21H
     MOV DL,0DH
     INT 21H

    MOV AH,9
     LEA DX,MSG2
     INT 21H
     MOV AH,2
    CMP BL,CL
    JGE PBL
    MOV DL,BL
    INT 21H
    MOV DL,CL
    INT 21H
    JMP EXIT

    PBL:
    MOV DL,CL
    INT 21H
    MOV DL,BL
    INT 21H
    EXIT:
    MOV AH,4CH
    INT 21H
    MAIN ENDP
END MAIN