Изменить регистр введенного символа на противоположный по всей строке ( FASM)

Posted by obzor under assembler

Изменить регистр введенного символа на противоположный по всей строке. Обязательно использовать команду scas. Строку описать в сегменте данных.

R71MT

ORG  100h
JMP  start

mess0   DB  13,10,'TYPE STRING: $'
mess1   DB  13,10,'RESULT     : $'
buff    DB  80 DUP('$')   ; забиваем буфер баксами

start:
   MOV   AH,9           ; запрос на ввод строки
   MOV   DX,mess0       ;
   INT   21h            ;

   MOV   DI,buff        ; приёмник для STOSB
@input:                 ;
   MOV   AH,1           ; ввод символа c эхо
   INT   21h            ;
   CMP   AL,13          ; ENTER - закончить ввод
   JE    print          ;
   TEST  AL,20h         ; проверяем бит(5) в введённом символе
   JNZ   small          ;
   OR    AL,20h         ; взводим бит(5)
   STOSB                ; ..и сохраняем его в буфере
   JMP   @input         ; сл.символ..
small:                  ;
   AND   AL,0DFh        ; сбрасываем бит(5)
   STOSB                ; сохранение в буфере
   JMP   @input         ;

print:                  ;
   MOV   AH,9           ; выводим на экран
   MOV   DX,mess1       ; ..мессагу,
   INT   21h            ;
   MOV   DX,buff        ;     и результат с буфера.
   INT   21h            ;

exit:                   ;
   XOR   AX,AX          ; выход!
   INT   16h            ;
   INT   20h            ;

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

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

• Перебор и проверка значения компонентов
• Загрузить файл из папки с программой
• Как подсчитать количество строк в ListBox?
• Рассылка. Выпуск 255
• Динамическое создание MainMenu.Items
• Работа в MySQL. Как создать простой тест?
• Анимированный Gif в компоненте Image
• КЛАВИАТУРА
• Рассылка. Выпуск 132
• Как конвертировать MultiByte в GB2312 и обратно?