Конверсия из HEXA в BCD неупакованный - Assembler

Формулировка задачи:

Всем доброго времени суток у меня такая проблема нужно конвертировать из хекса в неупакованный bcd например из 8976-08090706. Если можно напишите код в MASM или дайте какие нибудь идеи

Решение задачи: «Конверсия из HEXA в BCD неупакованный»

textual
                            Листинг программы 
                        
 
                        
                          
                    
; fasm code.......
org 100h
jmp start
 
buff    db    4 dup(0)       ; буфер для распакованных
 
start:  mov   cx,4           ; кол-во разрядов в числе
        mov   bx,8976h       ; число
        mov   di,buff        ; адрес приёмного буфера
 
cycle:  xor   ax,ax          ;
        shld  ax,bx,4        ; сдвигаем старшую тетраду в AL
;        add   al,30h        ; раскомментируй, если хочешь ASCII
        stosb                ; сохраняем в буфере
        shl   bx,4           ; сл.тетрада числа..
        loop  cycle          ;
 
exit:   xor   ax,ax          ;
        int   16h            ;
        int   20h            ; выход!