Print all charecter using loop

.model small
.stack 100h
.data
msg db "Loop concept $"
.code
main proc

    mov ax,@data
    mov ds,ax

    mov ah,9
    lea dx,msg
    int 21h

    mov ah,2
    mov dl,10
    int 21h
    mov dl,13
    int 21h

    mov cx,256

    mov ah,2
    mov dl,0

    level:

    int 21h
    inc dl
    loop level


    main endp
end main