Local $sBasedOn="jhcd", $iIter=100000, $sOut, $t=TimerInit()

Local $input="10101010", $bin, $aDll=DllOpen("msvcrt.dll")

For $n=1 To 100000

  $bin=DllCall($aDll, "int64:cdecl", "_wcstoi64", "wstr", $input, "ptr*", 0, "int", 2)[0]
  $sOut=Hex($bin) &" "& $bin

Next
$t=TimerDiff($t)
ConsoleWrite("Based on code from: "& $sBasedOn & @CRLF& " Check: "& $sOut &" "& @CRLF &" "& $iIter &" Iterations in "& $t/1000  &" Seconds" &@CRLF&@CRLF)