#include <nomadmemory.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 431, 320, 192, 124)
$Label1 = GUICtrlCreateLabel("Label1", 8, 8, 84, 17)
$Label2 = GUICtrlCreateLabel("Label2", 8, 32, 84, 17)
$Label3 = GUICtrlCreateLabel("Label3", 8, 56, 84, 17)
$Label4 = GUICtrlCreateLabel("Label4", 8, 80, 84, 17)
$Label5 = GUICtrlCreateLabel("Label5", 8, 104, 84, 17)
$Label6 = GUICtrlCreateLabel("Label6", 8, 128, 84, 17)
$Label7 = GUICtrlCreateLabel("Label7", 8, 152, 84, 17)
$Label8 = GUICtrlCreateLabel("Label8", 8, 176, 84, 17)
$Label9 = GUICtrlCreateLabel("Label9", 8, 200, 84, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Sleep(10)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
GUICtrlSetData($Label1,_MemoruScan(0x052CE2F4,0xA8))
GUICtrlSetData($Label2,_MemoruScan(0x052CE3E4,0xA8))
GUICtrlSetData($Label3,_MemoruScan(0x052CE254,0xA8))
GUICtrlSetData($Label4,_MemoruScan(0x052CE434,0x16C))
WEnd
Func _MemoruScan($HP,$OffSet,$ProcessName = "Half-Life 2 DM")
$ProcessID = WinGetProcess($ProcessName,"") ;Ну или $Pid кому как нравится
$DllInformation = _MemoryOpen($ProcessID)
$CurrentHP = (_MemoryRead($HP, $DllInformation, 'ptr'))
$Cur = '0x'&Hex($CurrentHP + $OffSet) ; 308 - думаю тоже понятно откуда берется... по картинке
$Curr = (_MemoryRead($Cur, $DllInformation, 'ptr')) ;получаем Адрес (ну понятно ,опять же ,по той же картинке что у нас должно получиться)
$RHP =dec(StringTrimLeft($Curr, 2)) ; извлекаем значение
Return $RHP
EndFunc