assem / задачи на экзамен / 26

26. Дан символьный массив из N элементов. Написать процедуру замены в нем всех чисел на пробелы.
model small
data_sg segment
max_1 db 0
max_2 db 0
a db 1,5,3,2,1
n=$-a
.stack 100h
data_sg ends
code_sg segment
assume cs:code_sg, ds:data_sg
sergey proc
xor si,si
mov al,a[si]
mov max_1,al
inc si
mov al,a[si]
mov max_2,al
inc si
m3:
mov al,a[si]
cmp al,max_1
je m1
cmp al,max_2
je m2
cmp al,max_1
jle m2
mov bl,max_2
cmp bl,max_1
jl m2
mov max_1,al
jmp m1
m2:
cmp al,max_2
jle m1
mov bl,max_1
cmp bl,max_2
jl m1
mov max_2,al
m1:
inc si
cmp si,n
jl m3
mov al,max_1
cmp al,max_2
jge m4
mov bl,max_1
jmp exit
m4:
mov bl,max_2
exit:
ret
sergey endp
start:
mov ax,data_sg
mov ds,ax
call sergey
mov ax,4c00h
int 21h
ret
code_sg ends
end start