Ввести предложение с клавиатуры и посчитать число символов в словах

; ml /c /coff !.asm
; link /subsystem:console !.obj
 
.586P
.MODEL Flat,StdCall
OPTION CASEMAP:NONE
 
INCLUDE WINDOWS.INC
INCLUDE KERNEL32.INC
INCLUDE USER32.INC
INCLUDELIB KERNEL32.LIB
INCLUDELIB USER32.LIB
 
.CODE
 
Start:
 
  invoke ExitProcess, NULL
 
END Start

; #########################################################################
 
      .386
      .model flat, stdcall
      option casemap :none   ; case sensitive
 
; #########################################################################
 
    ; ------------------------------
    ; Build this app in console mode.
    ; ------------------------------
 
      include \masm32\include\windows.inc
 
      include \masm32\include\user32.inc
      include \masm32\include\kernel32.inc
      include \masm32\include\masm32.inc
 
      includelib \masm32\lib\user32.lib
      includelib \masm32\lib\kernel32.lib
      includelib \masm32\lib\masm32.lib
 
; #########################################################################
  
    .data
      Msg1        db "Type something > ",0
      Msg2        db "You typed > ",0
      Prompt      db "Enter Some Text > ",0
      Buffer      db 128 dup(?)
 
; #########################################################################
 
    .code
  Main   PROTO
 
    start:
      invoke Main
      invoke ExitProcess,0
 
; #########################################################################
 
Main proc
  ; -------------------------------
  ; console mode library procedures
  ; -------------------------------
 
    invoke ClearScreen
    
    invoke StdOut,ADDR Prompt
    invoke StdIn,ADDR Buffer,LENGTHOF Buffer
 
    mov eax, offset Buffer
    invoke StdOut,eax           ; return address in eax
 
    ret
 
Main endp
 
; #########################################################################
 
   end start

;fasm-code
;---------------------
format  PE console
entry   start
include 'win32ax.inc'           ;для ExitProcess
include 'api\kernel32.inc'      ;для Printf / Gets
 
.data ;--------------------------
mes0    db  'String: ',0
buff    db  128 dup(0)          ;буфер для строки
f_Dig   db  '%d',10,0           ;формат для вывода (DEC с переводом строки)
 
.code ;--------------------------
start:
    cinvoke  printf, mes0       ;запрос на ввод
    cinvoke  gets, buff         ;читаем клаву в буфер
 
    mov   edi,buff              ;вычисляем длину строки
    mov   ecx,-1                ;
    xor   eax,eax               ;   ..(она нуль-терминальная)
    repne scasb                 ;
    not   ecx                   ;
    dec   cx                    ;ECX = длина строки
 
    mov   esi,buff              ;источник
@0: xor   ebx,ebx               ;счётчик символов в слове
@1: lodsb                       ;читаем символы из буфера в AL
    cmp   al,' '                ;это пробел?
    je    @2                    ;
    inc   bl                    ;нет - счётчик +1
    loop  @1                    ;сл.символ..
@2: push  ecx                   ;пробел! PRINTF портит ECX
    cinvoke  printf, f_Dig, ebx ;выводим счётчик на экран!
    pop   ecx                   ;
    or    ecx,ecx               ;всю строку проверили?
    jz    @3                    ;
    loop  @0                    ;нет - следующее слово..
 
@3: jmp  $                      ;для теста (чтоб окно не убежало)
    invoke   ExitProcess, 0     ;выход
 
;-------------------------------------
section '.idata' import data readable
library kernel32, 'kernel32.dll',\
          msvcrt, 'msvcrt.dll'
 
import  msvcrt,\
        printf, 'printf',\
          gets, 'gets'

invoke GetStdHandle, STD_INPUT_HANDLE
mov stdInHandle, EAX
;получить дескриптор стандартного входного устройства
 
invoke GetStdHandle, STD_OUTPUT_HANDLE
mov stdOutHandle, EAX
;получить дескриптор стандартного выходного устройства

STD_INPUT_HANDLE EQU -10
STD_OUTPUT_HANDLE EQU -11

invoke ReadConsole, StdInHandle, offset lpBuffer, nNumberOfCharsToRead, offset lpNumberOfCharsRead, 0