Global $sRegKey = "HKEY_LOCAL_MACHINE64\SOFTWARE\"
If @OSArch <> "X86" Then $sRegKey &= "Wow6432Node\"
Global $sPath_Stable = RegRead($sRegKey & "AutoIt v3\AutoIt", "InstallDir")
Global $sVersion_Stable = StringTrimLeft(RegRead($sRegKey & "AutoIt v3\AutoIt", "Version"), 1)
Global $sPath_Beta = RegRead($sRegKey & "AutoIt v3\AutoIt", "betaInstallDir")
Global $sVersion_Beta = StringTrimLeft(RegRead($sRegKey & "AutoIt v3\AutoIt", "betaVersion"), 1)

Global $sPath_Ini = @ScriptDir & "\Benchmark.ini"
If FileExists($sPath_Ini) Then FileDelete($sPath_Ini)

IniWrite($sPath_Ini, "Version", "Stable", $sVersion_Stable)
IniWrite($sPath_Ini, "Version", "Beta", $sVersion_Beta)

IniWrite($sPath_Ini, "Loop", "Cnt", 100000)

RunWait($sPath_Stable & '\AutoIt3.exe "' & @ScriptDir & '\Benchmark.au3" "1"')
RunWait($sPath_Beta & '\AutoIt3.exe "' & @ScriptDir & '\Benchmark.au3" "1"')


_Compare("For")
_Compare("While")
_Compare("Array")
_Compare("Struct")

_Compare("Add")
_Compare("Sqrt")


Func _Compare($sBM = "Array")
	Local $fTime_Stable = IniRead($sPath_Ini, $sBM, $sVersion_Stable, "0")
	Local $fTime_Beta = IniRead($sPath_Ini, $sBM, $sVersion_Beta, "0")

	ConsoleWrite("! " & StringFormat("%-10s: %.2f%%   (%.2fms : %.2fms)\n", $sBM, $fTime_Beta * 100 / $fTime_Stable, $fTime_Stable, $fTime_Beta))
EndFunc   ;==>_Compare