Почему функция HEX переводит не правильно.

$Bin='11010100'
Local $Result
$b = StringLen($Bin)
For $i = 1 To $b
$c = StringMid($Bin, $i, 1)
$d = $b - $i
$e = $c * (2 ^ $d)
$Result = $Result + $e
Next
ConsoleWrite($Result & @LF) ; Тут 212 Верно. 212 - строка. Переведем ее в HEX, ожидаем D4
ConsoleWrite(Hex($Result) & @LF) ; <- Что за 406A800000000000  ???

ConsoleWrite(Hex($Result*1) & @LF)

Local $Result = 0

$Bin = '11010100'
Local $Result
$b = StringLen($Bin)
For $i = 1 To $b
	$c = StringMid($Bin, $i, 1)
	$d = $b - $i
	$e = $c * (2 ^ $d)
	$Result = $Result + $e
Next
ConsoleWrite($Result & @LF)
ConsoleWrite(Hex(Round($Result)) & @LF)

ConsoleWrite(Hex(Round($Result)) & @LF) ;00000000000000D4 версия 3.3.8.1; 000000D4 версия 3.3.9.4
ConsoleWrite(Hex(String($Result)) & @LF) ;000000D4