Замена символа в предложении - Assembler - Ответ 3622020

.model tiny
.386
.code
    org 100h    
start:  
        push    cs
        push    cs
        pop ds
        pop es
; Вывод на экран 
    mov     ah, 09h
    lea     dx, req
    int     21h
; ввод строки
    mov ah, 0Ah
    lea dx, inpbuf
    int 21h
    mov si, dx
    lodsw
    mov di, si
    shr ax, 8
    mov cx, ax
    inc cx
; cx - str length, DS:SI = ES:DI -> string buf
    xor bx, bx
    mov al, 20h     ; space
_loop:  repne   scasb
        jcxz    @d
    jnz @l      ; нет ' '
    mov byte ptr es:[di-1], '*'
    inc bx
@l: jmp _loop
@d: mov dword ptr es:[di],240A0Dh     ; собственно, CR,LF,'$' для cputs 
    mov ax, bx
    aam
    or  ax, '00'
    xchg    al, ah
    mov word ptr [okay], ax
    or  bx, bx
    jnz ok
error:  lea dx, unk
    jmp @ok
ok: lea dx, okay
@ok:    push    dx
; новая строка
    mov     ah, 09h
    lea     dx, crlf
    int     21h
 
; Вывод на экран 
    mov     ah, 09h
    lea     dx, buf
    int     21h
    pop dx
    int 21h
; выход
    mov ah, 4Ch
    int 21h
crlf:   db  0Dh,0Ah,'$'
req:    db  'Enter string:$'
unk:    db  'no replaces$'
okay:   db  '00 replased$'
inpbuf:  db 99          ; длина строки - 255 симв. макс.
len:    db  ?                       ; сюда вернется настоящая длина
buf:    db  99 dup(?)              ; тут будет то, что ввели
    end start