; Template for console application
        .586
        .MODEL flat, stdcall
        OPTION CASEMAP:NONE

Include kernel32.inc
Include masm32.inc

IncludeLib kernel32.lib
IncludeLib masm32.lib

        .CONST
MsgExit DB 0AH,0DH,"Press Enter to Exit",0AH,0DH,0
Probel DB 0AH,0DH," ",0AH,0DH,0

        .DATA

        .DATA?
IsxStroka db 100 DUP (?)
inbuf DB 100 DUP (?)
tmp DWORD (?)

        .CODE

; билет 19

; в каждом слове введенной строки (слова разделены пробелом)
; определить количество повторений
; первой буквы слова

Start:
    Invoke StdIn,ADDR IsxStroka, LengthOf IsxStroka
    lea ESI, IsxStroka
    mov ECX, LengthOf IsxStroka
    mov BL, ' '
    mov EDX, 0
CYCLE:
    lodsb
    cmp BL, ' '
    je FIRST
    cmp BH, AL
    je EQUAL
    cmp AL, ' '
    je PROB
    jmp CONT
PROB:
    push ECX
    push EAX
    Invoke dwtoa, EDX, ADDR tmp
    Invoke StdOut, ADDR tmp
    Invoke StdOut, ADDR Probel
    mov EDX, 0
    pop EAX
    pop ECX
    jmp CONT
EQUAL:
    inc EDX
    jmp CONT
FIRST:
    mov BH, AL
CONT:
    mov BL, AL
    loop CYCLE

    Invoke dwtoa, EDX, ADDR tmp
    Invoke StdOut, ADDR tmp
    Invoke StdOut, ADDR Probel


    Invoke StdOut,ADDR MsgExit
    Invoke StdIn,ADDR inbuf,LengthOf inbuf
    Invoke ExitProcess,0
End Start