INCLUDE Irvine32.inc

.data

    A           SDWORD      -42
    B           DWORD       197
    D           WORD        4000
    E           SBYTE       5

    T           SDWORD      1, 5, 8, -20, -4, 1
    N           SDWORD      6

    helloStr    BYTE        'A MUL utasitas egy operadnusu.', 0ah, 0

.code

;-------------------------------------------------------------------------------
;   Főfüggvény. Itt indul a program.
main PROC

    KarakterKereso PROTO, param1:DWORD, param2:SDWORD
    invoke KarakterKereso, OFFSET T, '1'

    INVOKE ExitProcess,0
main ENDP

KarakterKereso PROC, param1:DWORD, param2:SDWORD
    MOV ESI, param1
    MOV ECX, 6
    MOV EBX, 0

    ciklus:
        MOV EDX, [ESI]
        CMP EDX, ECX
        JE vege
        CMP EDX, param2
        JNE semmi
            INC EBX
        semmi:
        INC ESI
        JMP ciklus

    vege:

    MOV EAX, EBX
    Call WriteInt
    Call Crlf

    ret
KarakterKereso ENDP

end main