Визуальное понимание полоски HP в (!)любой игре(!)

#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn  ; Enable warnings to assist with detecting common errors.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
SetBatchLines, -1
SetMouseDelay, -1
SetKeyDelay, -1
CoordMode, Pixel, Window
CoordMode, Window, Window
#MaxMem 999999999
;x100 y873 x120 y1070
SeaerchArea:= [100, 873 ,120 ,1070]
CenterArea:= [(SeaerchArea[3]-SeaerchArea[1])//2, SeaerchArea[2], (SeaerchArea[3]-SeaerchArea[1])//2, SeaerchArea[4]]
CenterDifferenceY:= SeaerchArea[4]-SeaerchArea[2]
;MsgBox, SeaerchArea = %SeaerchArea%`nCenterArea = %CenterArea%`nCenterDifferenceY = %CenterDifferenceY%

getCenterPixS()
{
	global
	CenterPixels:= []
	Loop, %CenterDifferenceY%
	{
		PixelGetColor, CenterPixel, CenterArea[1], CenterArea[2]
		CenterPixels.Push(CenterPixel)
		CenterArea[2]:= CenterArea[2]+1
	}
	Return, CenterPixels
}

getCenterPixS2()
{
	global
	CenterPixels2:= []
	Loop, %CenterDifferenceY%
	{
		PixelGetColor, CenterPixel2, CenterArea[1], CenterArea[2]
		CenterPixels2.Push(CenterPixel2)
		CenterArea[2]:= CenterArea[2]+1
	}
	Return, CenterPixels2
}

comparisonPixels()
{
	global
	comP:= 1
	comparison:= 0
	Loop, %CenterDifferenceY%
	{
		If (CenterPixels[A_Index] != CenterPixels2[A_Index])
		{
			comP++
		}
	}
	comparison:= (100 * comP) // CenterDifferenceY
	ToolTip, %comparison%
	Return, comparison
}

1::
getCenterPixS()
Loop
{
	getCenterPixS2()
	comparisonPixels()
}
Return

2::
ExitApp
Return