...

Most STRUCT
Address dd ?
ValB db ?
ValD dd ?
Most ends

.....

;(--------------------------------------------------------
;HookCode - установить перехват кода
;Address - адрес кода
;NewAddress - адрес кода-перехватчика
;most - структура типа Most
;--------------------------------------------------------)

HookCode proc Address : DWORD, NewAddress : DWORD, most : Most

LOCAL OldProtect : DWORD

invoke VitrualProtect, Address, 5, PAGE_EXECUTE_READWRITE, OldProtect

End_HookCode:

ret

HookCode endp