Окультурить вывод данных из макроса @OSVersion

[CRD]

Всем доброго времени суток. Подскажите пожалуйста, как украсить вывод информации макросом @OSVersion, чтобы он выводил не "WIN_8", а "MS Windows 8". Гуглил, ничего не нашел.

 

[InnI]

; Вариант 1
Global $aOS[][] = [["WIN_10","10"],["WIN_81","8.1"],["WIN_8","8"],["WIN_7","7"],["WIN_VISTA","Vista"],["WIN_XP","XP"]]
For $i = 0 To UBound($aOS) - 1
  If $aOS[$i][0] = @OSVersion Then MsgBox(0, "", "MS Windows " & $aOS[$i][1])
Next

; Вариант 2
$oDict = ObjCreate("Scripting.Dictionary")
$oDict.Item("WIN_10") = "10"
$oDict.Item("WIN_81") = "8.1"
$oDict.Item("WIN_8") = "8"
$oDict.Item("WIN_7") = "7"
$oDict.Item("WIN_VISTA") = "Vista"
$oDict.Item("WIN_XP") = "XP"
MsgBox(0, "", "MS Windows " & $oDict.Item(@OSVersion))

 

[Tempo]

MsgBox(0, "", _OSVersion())

Func _OSVersion()
	Switch @OSVersion
		Case "WIN_10"
			Return "MS Windows 10"
		Case "WIN_81"
			Return "MS Windows 8.1"
		Case "WIN_8"
			Return "MS Windows 8"
		Case "WIN_7"
			Return "MS Windows 7"
		Case "WIN_VISTA"
			Return "MS Windows Vista"
		Case "WIN_XP"
			Return "MS Windows XP"
		Case "WIN_XPe"
			Return "MS Windows XP Embedded"
		Case "WIN_2016"
			Return "MS Windows Server 2016"
		Case "WIN_2012R2"
			Return "MS Windows Server 2012 R2"
		Case "WIN_2012"
			Return "MS Windows Server 2012"
		Case "WIN_2008R2"
			Return "MS Windows Server 2008 R2"
		Case "WIN_2008"
			Return "MS Windows Server 2008"
		Case "WIN_2003"
			Return "MS Windows Server 2003"
	EndSwitch
EndFunc   ;==>_OSVersion

 

[CRD]

Спасибо. Разобрался