DESCENDING ORDER IN EMU

.MODEL SMALL
.STACK 100H
.DATA

MSG DB "Input: $"
MSG1 DB 10,13, "Output: $ "
MSG2 DB " $ "

.CODE
MAIN PROC
    MOV AX, @DATA
    MOV DS, AX

    LEA DX,MSG
    MOV AH,9
    INT 21H


    MOV AH,1
    INT 21H
    MOV CL,AL

    MOV BL,'1'

    LEA DX,MSG1
    MOV AH, 9
    INT 21H


TOP:

    MOV AH,2
    MOV DL,CL
    INT 21H
    DEC CL

    LEA DX,MSG2
    MOV AH,9
    INT 21H


    CMP CL, BL
    JL EXIT
    JMP TOP
    EXIT:

    MOV AH,4CH
    INT 21H

    MAIN ENDP

END MAIN