Скачиваний:
83
Добавлен:
11.02.2014
Размер:
21.5 Кб
Скачать

Задание: Составить программу замены в строке всех пробелов цифрами от 0 до 9, по возрастанию.

.model stall

.stak 256

.data

s db 250

slen db 0

strl db 250 dur(`$`)

.code

assume ds:@data, es:@data

main:

mov ax,@data

mov dx,ax

mov ex, ax

mov ah, 0ah

lea dx,s

int 21h

mov al,``

mov bl,1

mov cx,29

lea di,strl

cycl:

repne scas strl

je ml

jmp exit

; inc di

ml:

dec di

mov al, bl

add al,30h

stos strl

inc di

inc bl

mov al,``

jmp cycl

exit:

mov ah,09h

lea dx, strl

int 21h

mov ax,4c00h ; функция DOS завершения программы

int 21h ; завершить программу

end main