Подсчитать количество символов ‘c’ и ‘d’ во введенной строке и определить, каких из символов больше - Assembler - Ответ 8983625

org 100h
jmp start
 
mes1  db  13,10,'Vvedite stroky. . .: $'
mes2  db  13,10,'Simvolov "C". . . .: $'
mes3  db  13,10,'Simvolov "D". . . .: $'
mes4  db  13,10,'-------------------------'
      db  13,10,'Simvolov ',0,' bolshe!$'     ; по-адресу(0) вставим букву
buff  db  60 dup(0)
 
start:
   mov   ah,9                 ; мессага
   mov   dx,mes1              ;
   int   21h                  ;
 
   mov   di,buff              ; DI для STOSB
   loop  $                    ; CX = 0
   xor   ax,ax                ; AX = 0
   inc   ah                   ; AH = 1 (ввод с эхо)
@@:                           ;
   int   21h                  ; вводим символ..
   cmp   al,13                ; Enter заканчивает ввод
   je    next                 ;
   and   al,11011111b         ; переводим символ в верхний регистр
   stosb                      ; запись в буфер
   inc   cx                   ; считаем длину строки..
   jmp   @b                   ;
 
next:                         ; строка в буфере!
   inc   cx                   ; захватим последний символ
   mov   dx,cx                ; DX/CX = длина строки
   sub   bx,bx                ; ВХ = 0 (счётчик найденных)
   mov   di,buff              ; DI для SCASB
   mov   al,'D'               ; символ для поиска
@@:                           ;
   repne scasb                ; ищем символ в строке,
   or    cx,cx                ;    ..пока СХ не станет нуль
   jz    find_c               ;
   inc   bx                   ; счётчик(D) +1
   jmp   @b                   ;
 
find_c:                       ;
   push  bx                   ; сохраняем кол-во "D"
   sub   bx,bx                ; сбрасываем счётчик,
   xchg  cx,dx                ;    ..восстанавливаем длину,
   sub   di,cx                ;         ..и маркер начала строки
   dec   al                   ; символ для поиска "С"
@@:                           ;
   repne scasb                ;
   or    cx,cx                ;
   jz    compare              ;
   inc   bx                   ; счётчик(C) +1
   jmp   @b                   ;
 
compare:                      ;
   push  bx                   ; сохраняем кол-во "C"
   mov   ah,9                 ;
   mov   dx,mes2              ;
   int   21h                  ;
   pop   ax                   ;
   mov   bh,al                ; BH = количество(С)
   add   al,30h               ;
   int   29h                  ; выводим цифру на экран!
 
   mov   ah,9                 ;
   mov   dx,mes3              ;
   int   21h                  ;
   pop   ax                   ;
   mov   bl,al                ; BL = количество(D)
   add   al,30h               ;
   int   29h                  ; выводим цифру на экран!
 
   mov   ah,9                 ;
   mov   dx,mes4              ;
   cmp   bh,bl                ; поиск наибольшего
   jbe   change               ;
   mov   byte[mes4+38],'C'    ;
   jmp   print                ;
change:                       ;
   mov   byte[mes4+38],'D'    ;
print:                        ;
   int   21h                  ; выводим мессагу на экран
 
exit:
   xor   ax,ax                ;
   int   16h                  ;
   int   20h                  ; выход по-любой клавише