Перевод из одних систем счисления в другие - Перевод из шестнадцатиричной в десятичную

Перевод из шестнадцатиричной в десятичную 

Очень быстрая ассемблерная реализация.

;вход: AL == пеpвый символ (его код)
;      AH == втоpой символ
;
;выход: AL == число (байт)
;
c2byte proc
 sub ax,3030h
 cmp al,9
 jbe @cont1
 sub al,7
@cont1:
 cmp ah,9
 jbe @cont2
 sub ah,7
@cont2:
 xchg ah,al
 shl ah,4
 add al,ah
 ret
c2byte endp