Какое время будет через 1 час 20 минут? (tasm, com-файл)

model tiny  
.186                        
.code
org 100h
.startup
         mov al,2
        mov ah,00h                          ;очистка екрана
        int 10h
;-----------------------------------------------------
;получаем дату
  mov ah,2ah
  int 21h
;вывод дня
  mov al,dl
  xor ah,ah
  call OutNumber
;вывод месяца
  mov al,dh
  xor ah,ah
  call OutNumber
;вывод года
  mov ax,cx
  call OutNumber
;----------------------------------------------------------------
mov ah,02h                               ;Время
int 1ah
                                           ;часы
mov al,ch
        call first
        call sumbol
 
mov al,ch
        call second
        call sumbol
 
mov al,58                                ;выведение двоеточия
call sumbol
 
 
mov al,cl                                ;минуты
        call first
        call sumbol
 
mov al,cl
        call second
        call sumbol
mov al,58                               ;выведение двоеточия    
call sumbol
mov ah,02h                             ;секунды
int 1ah
mov ch,dh
mov al,ch
        call first
        call sumbol
mov al,ch
        call second
        call sumbol
;------------------------------Procedyru----------------------
First proc                      ;перекодировка первой цифры
        and al,0f0h                 ;умножаем регистр al на маску 0f0h 
        shr al,4                        ;сдвигаем на 4 бита вправо
        lea bx,tabl                 ;загружаем в BX адресс смещения таблицы
        xlat                        ;получаем соответствующий код символа из таблицы 
                                            ;помещенный в AL
        ret                     
First endp
Second proc                     ;процедура аналогична предыдущей только другая 
        and al,0fh                  ;маска, перекодирование второй цифри  из AL
        
        lea bx,tabl
        xlat
        ret
Second endp
sumbol proc                     ;вывод символа на экран,который находится в АЛ
        lea bx,Got                  ;загрузка адресса смещения GOT
        mov [bx],al                 ;запись по загруженному адрессу зачения AL
        mov dx,bx                   ;вывод символа на экран
        mov ah,9h
        int 21h
        ret
sumbol endp
;подпограмма вывода числа в десятичной системе
OutNumber:
  pusha
;устанавливаем систему и счетчик цифр
  mov bx,10
  xor cx,cx
;делим на основание системы
isDiv:  xor dx,dx
  div bx
;запоминаем в стеке и увеличиваем счетчик цифр в стеке
  push dx
  inc cx
;повторяем пока Ах не равно 0
  or ax,ax
  jnz isDiv
;извлекаем из сткека число
isOut:  pop ax
;переводим его в символ
  or ax,30h
;выводим
  int 29h
  loop isOut
;выводим разделяющий пробел
  mov al,20h
  int 29h
  popa
  ret 
;----------------------------------------------------------------------
        RET
Got db 1 dup (' '),'$'      ;буфер для одного символа
DEN db ' Nedilya  $ Ponedilok$ Vivtorok $ Sereda   $ Chetver  $ Pyatnucya$ Subota   $' 
Mis db ' Sichen  $ Lyutuy  $ Berezen $ Kviten  $ Traven  $ Cherven$ Lupen   $ Serpen  $ Veresen $ Ghovten $ Lustopad$ Gruden  $'            ; наперед підготовлені строки
tabl        db '0123456789'             ;таблица
end

ORG 100h
JMP start
 
mess0   DB  13,10,'ADJUSTMENT TIME: 01:20'
        DB  13,10,'======================='
        DB  13,10,'   CURRENT TIME: $'
mess1   DB  13,10,'    FUTURE TIME: $'
 
start:
;------- получить/вывести время (BCD формат) ----------------//
   MOV   AH,9           ;
   MOV   DX,mess0       ;
   INT   21h            ;
   MOV   AX,0200h       ; fn(2) INT-1Ah
   INT   1Ah            ;
   PUSH  CX             ; сохраняем выхлоп функции
   CALL  PRINT.TIME     ; выводим текущее время
                        ;
   MOV   AH,9           ;
   MOV   DX,mess1       ;
   INT   21h            ;
   POP   CX             ; СН = часы, CL = минуты
 
;------- расчитываем разницу --------------------------------//
   ADD   CX,0120h       ; разница во-времени..
   CMP   CL,59h         ; минута не вылетела в космос?
   JBE   @@1            ; меньше/равно - пропускаем
   SUB   CL,60h         ; иначе: коррекция минут
   INC   CH             ;        и час +1
@@1:                    ;
   CMP   CH,23h         ; час не вышел за предел?
   JBE   @@2            ;
   SUB   CH,23h         ; коррекция для часа
@@2:                    ;
   CALL  PRINT.TIME     ; выводим получившееся время на экран
 
exit:
   XOR   AX,AX
   INT   16h
   INT   20h
 
;ннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн
PRINT.TIME:             ;
   PUSHA                ;
   AND   AX,0           ; АХ = 0
   MOV   AL,CH          ; AL = текущий час в BCD
   MOV   BX,16          ; выводим его на экран как-есть (в HEX)
   CALL  HEX2ASC        ;
   MOV   AL,':'
   INT   29h
   AND   AH,0           ;
   MOV   AL,CL          ; AL = текущая минута
   MOV   BX,16          ;
   CALL  HEX2ASC        ;
   POPA                 ;
RET
 
HEX2ASC:                ; вывод беззнаковых чисел на экран
   PUSHA                ; на входе: ВХ = система счисления
   XOR   CX,CX          ;           AX = число
isDiv:                  ;
   XOR   DX,DX          ;
   DIV   BX             ;
   PUSH  DX             ;
   INC   CX             ;
   OR    AX,AX          ;
   JNZ   isDiv          ;
isOut:                  ;
   POP   AX             ;
   CMP   AL,9           ;
   JLE   noHex          ;
   ADD   AL,7           ;
noHex:                  ;
   ADD   AL,30h         ;
   INT   29h            ;
   LOOP  isOut          ;
   POPA                 ;
RET                     ;
;============================ E O F ======================================|