Неправильный перевод из 8-ой системы счисления в 16-ую

[Starget-93]

Программа неправильно переводит числа из восьмеричной системы счисления в шестнадцатеричную.
Подскажите пожалуйста, в чем ошибка и как исправить ?

code SEGMENT
assume cs:code, ds:code
main:
        mov ax,code
        mov ds,ax
        mov si,8
again:
        mov bx,0
        mov dl,'?'
        call display
        mov cx,6
next:
        call kbin	;ввод символа в al
;compare
        cmp al, ' '     ;если al = ' ' – вывод
        je back
        cmp al, '0'     ;если al < 0 то выход
        jb exit
        cmp al, '7'     ;если al > 7 то выход
        ja exit

        mov ah,0
        and al,00001111b
        mov di,ax
        mov ax,bx
        mul si
        add ax,di
        mov bx,ax
        loop next
back:			;перевод и вывод
        add ax, 10
	mov dl,'='
        call display
        mov dx,bx
        call hexw
        mov dl,' '
        call display
        call crlf
        jmp again
exit:			;выход
        mov ax, 4c00h
        int 21h

display proc
        mov ah,2	;вывод
        int 21h
        ret
display endp

hex proc
        push dx
        lea bx,table
        mov al,dl
        shr al,4
        xlat		; преобразование ASCII-код цифры
        mov dl,al
        mov ah,2
        int 21h
         pop dx			;бывшее содержимое dx
        and al,00001111b	;младший полубайт
        xlat
        mov dl,al
        mov ah,2
        int 21h
        ret
        table db '0123456789ABCDEF'
hex endp

kbin proc
	mov ah,1	;ввод символа в al
	int 21h
	ret
kbin endp

hexw proc		;вывод в 16 виде
        mov di, dx	;сохранить dx
        mov dl, dh	;вывод старшего байта
        call hex
        mov dx, di	;восстановить dx
        call hex	;вывод dl
        mov dl,' '	;пробел
        call display
	ret
hexw endp

crlf proc
        mov dl,10	; перевод на новую строку
        call display
        mov dl,13	;возврат каретки
        call display
        ret
crlf endp

code ENDS
        end main

[Step_UA]

         pop ax			;бывшее содержимое dx - было pop dx

[Starget-93]

Исправил, но к сожалению программа все равно неправильно переводит числа.

[Step_UA]

приведите пример неправильного перевода ...

[Starget-93]

Упс, прошу прощения, теперь все работает. Спасибо большое !