ret
;ENDP
;=================================================
; подпрограмма преобразования целого числа в формат ПЗ
;================================================= PROC FAR
; BH,0 ;Сбросить регистр ВН
MOV AX,SI ;Проверить исходное число AX,BX ;на ноль EXIT ;Число равно нулю AL,BL ;Сохранить знак в регистре AL
TEST AL,80H ;Проверить знак числа NOC ;Число положительное SI ;Число отрицательное, BL ;образовать его SI,1 ;абсолютное значение NOC BL: MOV BH,151 ;Исходный порядок: TEST BL,80H ;Проверить старший бит FORM ;Нормализация закончена SI,1 ;Сдвинуть число влево BL,1 BH ;Декремент порядка SLOOP ;Повторять нормализацию: ADD AL,AL ;Передать знак во флажок CF
RCR BH,1 ;Знак числа на месте AH,1 ;Младший бит прядка АН7 AH,7FH ;Образовать маску BL,AH ;Образовать второй байт числа: RET ;Возврат ENDP
LINK2 ENDP
;-----------------------------------ENDSLINK2
Читайте также
Обучающая подсистема для лабораторного исследования характеристик замкнутых САУ в среде интернет
В последние десятилетия в зарубежных системах образования
произошли существенные изменения, обусловленные бурным развитием
научно-технического прогресса и его воздейст ...
Проект оконечной ОС на базе системы DX200
Современное состояние и перспективные планы развития Единой Сети
Электросвязи (ЕСЭ) Российской Федерации характеризуются широким внедрением
цифровых технологий и оборудования цифровых си ...
Надежность работы ВОЛП
В данной работе рассматривается проблема обеспечения
надежности эксплуатируемых линейно-кабельных сооружений при воздействии внешних
факторов - влияние молнии, воздействие коррозии, меха ...