Ticket #2183: au3bug2183.au3

msgbox(0,"WAIT","wait 10 seconds")
local $y=((@YEAR-1)    * 1000 * 60 * 60 * 24 * 31 * 12)
local $mo=((@MON-1)    * 1000 * 60 * 60 * 24 * 31)
local $d= ((@MDAY-1)   * 1000 * 60 * 60 * 24)
local $h=(@HOUR        * 1000 * 60 * 60)
local $mi=(@MIN        * 1000 * 60)
local $s=(@SEC         * 1000)
local $ms=@MSEC
local $a1,$b1,$c1, $a2,$b2,$c2, $a3,$b3,$c3

$a1=$y+$mo+$d+$h+$mi+$s+$ms
$b1=BitAND($a1, 0x7fffffff)
SRandom($b1)
$c1=Random(1,200,1)
Sleep(5000)

$y=((@YEAR-1)    * 1000 * 60 * 60 * 24 * 31 * 12)
$mo=((@MON-1)    * 1000 * 60 * 60 * 24 * 31)
$d= ((@MDAY-1)   * 1000 * 60 * 60 * 24)
$h=(@HOUR        * 1000 * 60 * 60)
$mi=(@MIN        * 1000 * 60)
$s=(@SEC         * 1000)
$ms=@MSEC
$a2=$y+$mo+$d+$h+$mi+$s+$ms
$b2=BitAND($a2, 0x7fffffff)
SRandom($b2)
$c2=Random(1,200,1)
Sleep(5000)
$y=((@YEAR-1)    * 1000 * 60 * 60 * 24 * 31 * 12)
$mo=((@MON-1)    * 1000 * 60 * 60 * 24 * 31)
$d= ((@MDAY-1)   * 1000 * 60 * 60 * 24)
$h=(@HOUR        * 1000 * 60 * 60)
$mi=(@MIN        * 1000 * 60)
$s=(@SEC         * 1000)
$ms=@MSEC
$a3=$y+$mo+$d+$h+$mi+$s+$ms
$b3=BitAND($a3, 0x7fffffff)
SRandom($b3)
$c3=Random(1,200,1)

local $s=""
$s&="Pass 1:"&@crlf
$s&="original 64-bit timestamp:"&$a1&@crlf
$s&="32-bit BitAND on timestamp:"&$b1&@crlf
$s&="SRandom($timestamp) then Random(1,200,1):"&$c1&@crlf
$s&=@crlf
$s&="Pass 2:"&@crlf
$s&="original 64-bit timestamp:"&$a2&@crlf
$s&="32-bit BitAND on timestamp:"&$b2&@crlf
$s&="SRandom($timestamp) then Random(1,200,1):"&$c2&@crlf
$s&=@crlf
$s&="Pass 3:"&@crlf
$s&="original 64-bit timestamp:"&$a3&@crlf
$s&="32-bit BitAND on timestamp:"&$b3&@crlf
$s&="SRandom($timestamp) then Random(1,200,1):"&$c3&@crlf
$s&=@crlf
msgbox(0,"3-passes of SRandom() and bitand()",$s)