; #########################################################################
      .386
      .model flat, stdcall
      option casemap :none   ; case sensitive

; #########################################################################
      include \masm32\include\windows.inc
      include \masm32\include\user32.inc
      include \masm32\include\kernel32.inc

      includelib \masm32\lib\user32.lib
      includelib \masm32\lib\kernel32.lib
; #########################################################################

.code

start:

    ;創建對話框,提示正在加載

    

    call Str1
    db  "rjgplng.dll",0
  Str1:
    call LoadLibraryA  ; edx = LoadLibrary("rjgplng.dll")
    mov  edx,eax
    cmp  eax,0
    je   toExit

    call Str2
    db "?SetGetGpHandle@@YA_NPAX@Z",0
  Str2:
    push edx
    call GetProcAddress ; ebx = GetProcAddress(edx, "fun_name")
    mov  ebx,eax  
    cmp  ebx,0
    je   FreeL   ;如果為NULL，則釋放返回0

     push 0
     call ebx  ; 調用函數

 FreeL: 
     push edx
     call FreeLibrary
 toExit:
 ;ret
end start