.model small
.stack 100h
.386
.data
.code

print proc

    push AX
    add DL, 30h
    mov AH, 02h
    int 21h
    pop AX
    ret

print endp

start:
    mov AX, @data
    mov DS, AX

    mov AX, 22311   ;занесение числа в регистр

    mov BX, 10      ;занесение основание системы счисления

    mov CX, 0       ;счетчик кол-ва цифр устанавливае равным 0

    cmp AX, BX      ;сравниваем AX, BX
    jb LL           ;если AX<BX прыгаем на добавление цифры

    cicle:          ;сюда будем возвращаться когда
                    ;выделяем цифры
    mov DX, 0       ;обнуляем DX
    div BX          ;делим число DXAX на BX
    push DX         ;сохраняем остаток в стеке
    inc CX          ;увеличиваем счетчик кол-ва цифр на 1

    cmp AX, BX      ;сравниваем AX,BX
    jb LL           ;если AX<BX прыгаем на добавлении цифры
    jmp cicle       ;иначе прыгаем на выделение цифр

    LL:             ;метка добавление одной цифры

    push AX         ;добавляем её на верх стека
    inc CX          ;увеличиваем счетчик кол-ва цифр на 1

    for:            ;цикл по цифрам
        pop DX      ;вынимаем цифру в DX
        call print  ;выводим DX
    loop for


    mov AX, 4C00h
    int 21h
end start