Вычисление relative address для jmp, call

.386
.model flat, stdcall

include WINDOWS.INC
include kernel32.inc
include user32.inc
includelib KERNEL32.LIB
includelib USER32.LIB

TestHook proto
ProcessHook proto

.const
    msgCaption db "Hooktest DLL", 0h
    msgHooking db "Hooking called...", 0h
    msgHookDone db "Hooking done...", 0h
    msgHooked db "Hooked successfully...", 0h

.data
    TestHookAddr dd 0040100Fh ; пишем call сюда
    HookCallData db 0E8h ; опкод call'а
   
.data?
    oldProtect dd ? ; тут копия старых прав
    bytesWritten dd ? ; сколько байт записано
    ProcId dd ? ; текущий PID проги
    hProc dd ? ; хендл управления процессом

.code
    LibMain proc hInstDLL:DWORD, reason:DWORD, unused:DWORD
        cmp reason, DLL_PROCESS_ATTACH
        jnz NotAttach
        invoke TestHook ; if reason==DLL_PROCESS_ATTACH call TestHook
      NotAttach:
        mov eax, TRUE
        ret
    LibMain endp
   
    TestHook proc
        invoke GetCurrentProcessId
            mov ProcId, eax
        invoke OpenProcess, PROCESS_ALL_ACCESS, FALSE, ProcId
            mov hProc, eax
        invoke MessageBox, NULL, ADDR msgHooking, ADDR msgCaption, MB_OK
        invoke VirtualProtect, TestHookAddr, 5, PAGE_EXECUTE_READWRITE, oldProtect ; выставляем права
        invoke WriteProcessMemory, hProc, TestHookAddr, ADDR HookCallData, 1, bytesWritten
        inc TestHookAddr ; инкрементим TestHookAddr на 1
        ; invoke WriteProcessMemory, hProc, TestHookAddr, ProcessHook, 4, bytesWritten ; ошибка тут, ProcessHook проверял, вроде передает правильный адрес, но он абсолютный. Как узнать относительный?
        invoke VirtualProtect, TestHookAddr-1, 5, oldProtect, oldProtect ; возвращаем старые права
        invoke MessageBox, NULL, ADDR msgHookDone, ADDR msgCaption, MB_OK
        ret
    TestHook endp

    ProcessHook proc
        invoke MessageBox, NULL, ADDR msgHooked, ADDR msgCaption, MB_OK ; Оповещение, что обработчик успешно вызван.
        ret
    ProcessHook endp

end LibMain