Удалить слово после четвертого пробела

.686
    .model flat, stdcall
    option casemap :none
    include \masm32\include\windows.inc
    include \masm32\include\user32.inc 
    include \masm32\include\masm32.inc
    include \masm32\include\kernel32.inc
    include \masm32\macros\macros.asm
    include \masm32\include\d3d9_all.inc
        include    \masm32\Include\gdi32.inc
    includelib \masm32\lib\user32.lib 
    includelib \masm32\lib\masm32.lib
    includelib \masm32\lib\kernel32.lib
    INCLUDELIB  \masm32\lib\gdi32.lib
    includelib \masm32\lib\d3d9.lib
Bsize equ 100
Bsize2 equ 30
.data
buf db Bsize dup(?)
buf2 db Bsize2 dup(?)
msg db "Enter a String",0dh,0ah
stdin dd ?
stdout dd ?
cRead dd ?
cWritten dd ?
LenSize dd ?
BeginPos dd ?
EndPos dd ?
.code
start:
invoke GetStdHandle,STD_INPUT_HANDLE
mov stdin,eax
invoke GetStdHandle,STD_OUTPUT_HANDLE
mov stdout,eax
invoke WriteConsoleA,stdout,ADDR msg,SIZEOF msg,ADDR cWritten,NULL
invoke ReadConsole,stdin,ADDR buf,Bsize,ADDR cRead,NULL
Call Lenght
xor ebx,ebx
@1:
cmp buf[esi]," "
jz zero
inc esi
jmp @1
 
zero:
inc ebx
cmp ebx,4
jae after
inc esi
jmp @1
 
 
after:
inc esi
mov BeginPos,esi
@2:
cmp buf[esi]," "
jz nopzero
inc esi
jmp @2
 
nopzero:
dec esi
mov EndPos,esi
mov esi,BeginPos
mov bh,buf2[edi]
@3:
cmp esi,EndPos
ja after_2
mov buf[esi],bh
inc esi
jmp @3
after_2:
invoke WriteConsoleA,stdout,ADDR buf,Bsize,ADDR cWritten,NULL
invoke Sleep,INFINITE
invoke ExitProcess,0
 
 
Lenght proc
cmp buf[esi],0
jnz nzero
sub edi,3
mov LenSize,edi
xor edi,edi
xor esi,esi
ret
nzero:
inc edi
inc esi
jmp Lenght
Lenght endp
 
end start