Написать программу, удаляющую пробелы в конце исходной строки MASM32

.386
 
.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
includelib \masm32\lib\user32.lib 
includelib \masm32\lib\masm32.lib
includelib \masm32\lib\kernel32.lib
 
 
Asize equ 60 ;equ присваивает метке значение
 
.data ;резервируем память под данные и сразу же объявляем их
msg db "Введите строку",0dh,0ah
msg1 db "В обратном порядке", 0dh,0ah,0
str1 db 60 dup (' '),0 ;Введенные символы
 
.data? ;нельзя инициализировать переменные
stdin dd ? ;dd - 4 байта - 2 слова =8 символам 
stdout dd ?
cRead dd ? 
cWritten dd ?
res dd ?
ir INPUT_RECORD <>
 
.code
 
start: 
invoke GetStdHandle,STD_OUTPUT_HANDLE
mov stdout,eax
invoke GetStdHandle,STD_INPUT_HANDLE
mov stdin,eax
invoke CharToOem,offset msg,offset msg
 
invoke WriteConsoleA,stdout,ADDR msg,SIZEOF msg,ADDR cWritten,NULL
 
invoke ReadConsole,stdin,ADDR str1,Asize,ADDR cRead,NULL
 
call revers 
 
@@:
invoke ReadConsoleInput,stdin,addr ir,sizeof ir,addr cWritten
cmp ir.KeyEvent.wVirtualScanCode,1
jnz @b
 
invoke ExitProcess,0 ;выход 
 
;---------------------------------------------------------------------
revers proc 
mov ecx,cRead
 
LEA ESI,str1
m1:
mov al,[ESI]
push ax
inc ESI
loop m1
 
mov ecx,cRead
LEA ESI,str1
m2:
pop ax
cmp al, ' '
je m3
mov [esi],al
inc esi
m3:
loop m2
 
sub esi,offset str1
 
invoke WriteConsoleA,stdout,ADDR msg1,SIZEOF msg1,ADDR cWritten,NULL
invoke WriteConsoleA,stdout,ADDR str1,esi,ADDR cWritten,NULL
ret
revers endp
 
end start