Как узнать степень загрузки CPU определенным процессом?

[kasper_sky]

Доброго времени суток.
Собственно, вопрос сформулирован в заглавии темы.
Уточнение: нужно узнать текущее значение, в текущий момент времени.

 

[madmasles]

kasper_sky,
*Click*

 

[kasper_sky]

madmasles
Если не сложно, можно сразу готовую функцию, при вызове чтобы задавался параметр в виде имени процесса, а возвращала функция загрузку в процентах?

 

[WSWR]

kasper_sky

#include <WinAPIEx.au3>

Global $PID = 0, $Prev1 = 0, $Prev2 = 0

While 1
	ConsoleWrite(_CPU('explorer.exe') & @CRLF)
	sleep(1000)
WEnd

Func _CPU($sProcess)
	Local $ID, $Time1, $Time2, $CPU
	$ID = ProcessExists($sProcess)
	If $ID Then
		$Time1 = _WinAPI_GetProcessTimes($ID)
		$Time2 = _WinAPI_GetSystemTimes()
		If(IsArray($Time1)) And(IsArray($Time2)) Then
			$Time1 = $Time1[1] + $Time1[2]
			$Time2 = $Time2[1] + $Time2[2]
			If($Prev1) And($Prev2) And($PID = $ID) Then
				$CPU = Round(($Time1 - $Prev1) / ($Time2 - $Prev2) * 100)
			EndIf
			$Prev1 = $Time1
			$Prev2 = $Time2
			$PID = $ID
			Return $CPU
		EndIf
	EndIf
	$Prev1 = 0
	$Prev2 = 0
	$PID = 0
EndFunc   ;==>_CPU