Программы умножения двоичных чисел. Сдвиг множителя и текущей суммы частичных. Обнуление текущей суммы частичных произведений (ЧП), страница 10

;*************************  C10_16*****************************

; Подпрограмма преобразования  дробного двоично-десятичного числа

; без знака с фиксированной перед старшим разрядом запятой (ФЗ)

; формата 4*4 в двоичное число с ФЗ формата 16.  

; Входные параметры: (В,С) - двоично-десятичное число (0,Р1Р2Р3Р4).

; Выходные параметры: (H,L) - эквивалентное двоичное число.

; Используются подпрограммы: С10_16, D16_16A.

;****************************************************************

; Двоичное преобразование числа

C10_16F: 

CALL   С10_16

; (H,L) - целое двоичное число

; Деление двоичного целого числа на 10**4=2710Н

LXI   В, 2710Н

; Загрузка константы  10 000

CALL   D16_16A

; (D,E) - частное

XCHG

; (H,L) - частное, (D,E) - остаток

RET