.model small
.stack 100
.data
    count db 0
 
.code
    main proc
        mov ax, @data
        mov ds, ax   
        
        mov cl,10    ;divide by
        mov ax,12346 
        
        again1:
            mov dx,0     ;puting 0 in the high part of the divided number (DX:AX)
            div cx       ;DX:AX/cx.  ax=dx:ax/cx  and dx=dx:ax%cx(modulus)
            add dl, 30h           ;adding the '0' char for printing
            push dx 
            inc count
            cmp ax,0
            jne again1
        
        again2:
            pop dx
            mov ah, 2
            int 21h      
            dec count
            cmp count, 0
            jne again2
    
        mov ah, 4ch
        int 21h
    
    main endp
end main