Aber da wir grad dabei sind - hier etwas, was die meisten Taschenrechner nicht können: FloatToBin.
[autoit]Func _FloatToBin($Value, $decimal_places=6)
Local $bin = '', $ret, $count = -1, $n = 50
Do
$n -= 1
$divisor = 2^$n
Until $divisor <= $Value
Do
$ret = Floor($Value/$divisor)
$bin &= $ret
If $ret = 1 Then $Value -= $divisor
$divisor /= 2
If Int($divisor) = 0 Then $count += 1
If $count = 0 Then $bin &= ','
Until $count = $decimal_places
Return $bin
EndFunc