Передача параметров в функцию (stdcall)

.386
.model flat, stdcall
option casemap:none
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\user32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
.data
str1    db "six little rat cubs, big rat and three old rats",0
str2    db "rat",0
count dd 0
 
.code
DllEntry proc hInstance:HINSTANCE, reason:DWORD, reserved1:DWORD
    mov eax,TRUE
    ret
DllEntry endp
strfind proc
    push ebx
    push esi
    push edi
    invoke lstrlen, addr str2
    dec eax
    mov ebx,eax
    invoke lstrlen, addr str1
    mov ecx,eax
    mov edi,offset str1
a2: mov al,str2[0]
    repne scasb
    jecxz exit
    push ecx
    mov esi,offset str2+1
    mov ecx,ebx
    repe cmpsb
    jne a1
    inc count
    sub [esp],ebx
a1: pop ecx
    or ecx,ecx
    jne a2
exit:   mov eax,count
    pop edi
    pop esi
    pop ebx
    ret
strfind endp
end DllEntry

.386
.model flat, stdcall
option casemap:none
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\user32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
.data
MsgCaption      db "поиск подстроки в строке",0
buffer      db 100 dup (0)
template db "найдено %d вхождения подстроки str1 в строку str2",0
LibName db "3.dll",0
FunctionName db "strfind",0
DllNotFound db "Cannot load library",0
AppName db "Load Library",0
FunctionNotFound db "strfind function not found",0
str1    db "six little rat cubs, big rat and three old rats",0
str2    db "rat",0
.data?
hLib dd ?
strfind dd ?
.code
start:
    invoke LoadLibrary,addr LibName
   ;-------------------------------------------------------------------------------
   ; Вызываем LoadLibrary и передаем имя желаемой DLL. Если вызов проходит успешно,
   ; будет возвращен хэндл библиотеки (DLL). Если нет, то будет возвращен NULL.
   ;-------------------------------------------------------------------------------
        .if eax==NULL
                invoke MessageBox,NULL,addr DllNotFound,addr AppName,MB_OK
        .else
                mov hLib,eax
                invoke GetProcAddress,hLib,addr FunctionName
   ;------------------------------------------------------------------------------
   ; Когда вы получаете хэндл библиотеки, вы передаете его GetрrocAddress вместе
   ; с именем функции в этой dll, которую вы хотите вызвать. Она возвратит адрес
   ; функции, если вызов пройдет успешно. В противном случае, она возвратит NULL.
   ; Адреса функций не изменятся, пока вы не перезагрузите библиотеку. Поэтому
   ; их можно поместить в глобальные переменные для будущего использования.
   ;------------------------------------------------------------------------------
                .if eax==NULL
                        invoke MessageBox,NULL,addr FunctionNotFound,addr AppName,MB_OK
                .else
                        mov strfind,eax
                        call [strfind]
   ;----------------------------------------------------------------------------
   ; Затем мы вызываем функцию с помощью call и переменной, содержащей адрес
   ; функции в качестве операнда.
   ;----------------------------------------------------------------------------
    invoke wsprintf,addr buffer,addr template,eax
    invoke MessageBox, NULL,addr buffer, addr MsgCaption, MB_OK
                .endif
                invoke FreeLibrary,hLib
   ;------------------------------------------------------------------------------
   ; Когда вам больше не требуется библиотека, выгружате ее с помощью FreeLibrary.
   ;------------------------------------------------------------------------------
        .endif
    invoke ExitProcess,NULL
end start