deci    SEGMENT
        ASSUME    cs:deci, es: deci, ds: deci, ss: deci
        ORG    100h
start:
        call entery

        mov ax, 0
        mov al, 59
        mov cl, 10

        div cl ; remainder in AH, quotient in AL 59 / 10 == 5 * 10 + (9) -> 5 / 10 == 0 * 10 + (5) <- ah



        mov bh, ah
        mov bl, al
        add bh, 48              ; liczba jednostek
        push bx
        mov al, 0
        cmp al, 0                                   ; Z = 1, gdy wynik arg1 - arg2 == 0 (cmp arg1, arg 2)


    ;   mov ax, 0
    ;   mov ah, 0Eh
    ;   mov al, bh
    ;   int 10h

        mov ax, 0
        mov al, bl  ; taking quotient to al

        div cl

        mov bh, ah
        add bh, 48              ; liczba dziesiątek
        push bx

        ; ******************
        ;
        ;   AH -> remainder
        ;   AL -> QUOTIENT
        ;
        ; ******************
        mov bp, sp

        mov ax, 0
        mov ah, 0Eh
        mov al, [bp+1]
        int 10h

        mov ax, 0
        mov ah, 0Eh
        mov al, [bp+3]
        int 10h







        mov ax, 0
        mov ah, 4Ch
        mov al, 0
        int 21h



entery  PROC
        push ax

        mov ah, 0Eh
        mov al, 10
        int 10h

        mov ah, 0Eh
        mov al, 13
        int 10h

        pop ax

        ret
entery ENDP
deci    ENDS
        END start