Assembler, работа с строкой

Posted by obzor under assembler

Составить программу, которая вводит случайный текст, который заканчивается точкой. Вывести True, если а встречается реже чем b. Иначе, вывести False.

R71MT

На тебе халявный вариант на FASM’e:

org  100h
jmp  start

mess0   db  13,10,'ENTER TEXT: $'
mess1   db  13,10,'<==== TRUE $'
mess2   db  13,10,'<=== FALSE $'

start:
   mov   ax,3            ; CLS и видео/режим 80х25/16
   int   10h             ;
   mov   ah,9            ; запрос на ввод строки
   mov   dx,mess0        ;
   int   21h             ;

   xor   bx,bx           ; сброс счётчика: BL='a', BH='b'
@@:                      ; <----------------------------<<----+
   mov   ah,1            ; ввод символа с эхом                |
   int   21h             ;                                    |
   cmp   al,'.'          ; это точка?                         |
   je    next            ; да - заканчиваем ввод              |
   cmp   al,'a'          ; "а" ?                              |
   je    @10             ; переход на метку                   |
   cmp   al,'b'          ; "b" ?                              |
   je    @20             ;                                    |
   jmp   @b              ; --->------------>>----+------>>----+
@10:                     ; встретилась "а"       |
   inc   bl              ; счётчик +1            |
   jmp   @b              ; --->------------->>---+
@20:                     ; встретилась "b"       |
   inc   bh              ; счётчик +1            |
   jmp   @b              ; --->------------->>---+

next:                    ;
   cmp   bh,bl           ; сравниваем счётчики
   jb    fls             ; переход, если BH < BL
   jz    start           ; если равно - начинаем ввод сначала..
   mov   dx,mess1        ; мессага TRUE
   jmp   print           ;
fls:                     ;
   mov   dx,mess2        ; мессага FALSE
print:                   ;
   mov   ah,9            ; функция 09h DOS
   int   21h             ; выводим результат на экран!

exit:                    ;
   xor   ax,ax           ; ждём любую клавишу..
   int   16h             ;
   int   20h             ; выход!

тема на форуме

Случайные статьи

• Найти нужное слово в stringlist
• Вопросы про MaskEdit и воиспроизведение *.wav
• Достать нужный IP из строки
• Выбор скриптового языка для сервиса
• Найти те даты, когда день рождения попадает на тот же день
• Система упрощенного создания окон (S.C.O.W.) (обновление до версии 1.2.0.145)
• Функция удаления не нужных тегов. Быстродействие
• Браузер по умолчанию
• 3D НЕБО в DELPHI
• Сравнение файлов в Excel