Ле
Лерока
Ввести в прямом порядке, а вывести, начиная с конца строки.
.model small
.stack 100h
.data
Prompt db 'Введите строку: ',13,10,36
Result db 13,10,'Введённая строка в обратном порядке: ',13,10,36
QuitPrompt db 13,10,10,'Для завершения работы нажмите любую клавишу... $'
Buffer db 255, ?,255 dup (?)
.code
N88554948:
mov si,@data
mov ds,si
mov ah,9
lea dx,Prompt
int 21h
inc ah
lea dx,Buffer
int 21h
dec ah
lea dx,Result
int 21h
xor ch,ch
mov cl,Buffer+1
lea si,Buffer+1
add si,cx
std
Repeat:
lodsb
int 29h
loop Repeat
cld
lea dx,QuitPrompt
mov ah,9
int 21h
mov ah,8
int 21h
mov ah,4Ch
int 21h
end N88554948