#include <NomadMemory.au3>
HotKeySet( "{Ins}", "_memwrite")
HotKeySet( "{Esc}", "_end")
Global $proces_name="hl2.exe" ;если не так, поправь ;)
Global $PID=ProcessExists($proces_name)
Global $proces_memory=_MemoryOpen($PID)
Global $address=0x3E1C54
While 1
Sleep(15)
WEnd
Func _memwrite()
$mem=_MemoryRead($address,$proces_memory)
_MemoryWrite($mem,$PID,4)
EndFunc
Func _end()
Exit
EndFunc