Лабораторная работа: Выполнение арифметических операций над числами с фиксированной запятой

RETURN: POPA ;ВОССТАНОВЛЕНИЕ РЕГИСТРОВ

RET

CONTROL ENDP

;===========ПРОЦЕДУРА CTRL0 - ЭТОНУЛЬ?

CTRL0 PROC

PUSHA

MOV SI, 1

MOV CL, [BX+SI]

MOV CH, 0

INC SI

MOV AL, [BX+SI]

CMP AL, '-'

JE MIN

JMP CYCLE

MIN: INC SI

DEC CX

CYCLE: MOV AL, [BX+SI]

CMP AL, '0'

JNE FINISH

INC SI

LOOP CYCLE

MOV SI, 0

MOV AL, '0'

MOV [BX+SI], AL

FINISH: POPA

RET

CTRL0 ENDP

;===========ПРОЦЕДУРА COMPARE - СРАВНЕНИЕ ДВУХ ЧИСЕЛ

COMPARE PROC