[amel27]

работает в обеих версиях если заменить "ulong_ptr" на "long" (или на "ptr"). Но насколько оно будет надёжно? »

AFAIK "ulong_ptr" отличается от "ulong" только автоматичеким определением разрядности - для переносимости кода между 32 и 64-битным AutoIT... мне почему-то кажется, что одного этого маловато будет, на 64-бит пока не тестил...

таким же методом, можно сделать UDF-аналог на Random(), т.е чтобы более надёжно возвращать случайное число? »

да можно конечно... но ИМХО в такой замене нет нужды: назначение штатного генератора обычно совсем другое - моделирование, тестирование и отладка - в этом случае его предсказуемость и воспроизводимость как нельзя кстати, при "сбое" всегда можно "перезапустить" случайную последовательность и отловить баг... Потому я и говорю о странном позиционировании Random() в AutoIT, надо-то всего ничего - добавить один необязательный параметр для инициализации генератора.

математик из меня никудышный... вроде похоже на правду:

Код:

For $i=1 To 1000
    ConsoleWrite(_Random() &@CRLF)
Next

Func _Random($iMin=0, $iMax=1, $iFlag=0)
    Local $bBIN, $iOut
    Local $tMAX = DllStructCreate("uint")
    Local $tBIN = DllStructCreate("byte[4];byte[4]")
    Local $tRND = DllStructCreate("uint64", DllStructGetPtr($tBIN))
    Do
        $bBIN = _Crypto_GetRandomBinary(4)
    Until ($bBIN<>Binary(0)) And ($bBIN<>Binary(-1))

    DllStructSetData($tBIN, 1, $bBIN)
    DllStructSetData($tMAX, 1, 0xFFFFFFFF)

    If $iFlag=0 Then $iOut = DllStructGetData($tRND,1)*($iMax-$iMin)/DllStructGetData($tMAX,1)
    If $iFlag   Then $iOut = Int(DllStructGetData($tRND,1)*($iMax-$iMin+1)/DllStructGetData($tMAX,1))

    Return $iOut + $iMin
EndFunc

[Creat0R]

в этом случае его предсказуемость и воспроизводимость как нельзя кстати, при "сбое" всегда можно "перезапустить" случайную последовательность и отловить баг... »

Random() можно использовать в качестве отладчика багов? это для меня что-то новое, можно подробнее плиз?

надо-то всего ничего - добавить один необязательный параметр для инициализации генератора. »

Может на этот счёть запостить Feature Request?

математик из меня никудышный... вроде похоже на правду »

Ага, мне бы таким никудышным математиком стать

Спасибо за _Random().

[amel27]

можно подробнее плиз? »

не в качестве отладчика, а при отладке... навскидку два варианта:

- на время тестирования кода, использующего криптоалгоритмы, можно заменить случайный генератор на псевдослучайный, т.к. последний работает во много раз быстрее;

- проверка устойчивости форм ввода (Web, GUI) к всевозможным "неправильным" данным - когда нет возможности перебрать ВСЕ возможные комбинации, можно сгенерировать последовательность случайных ... т.е. проверка способности входных регулярных выражений фильтовать "спам";

- вообще, во всех случаях, где НЕ нужна криптостойкость, но нужны скорость/воспроизводимость

Может на этот счёть запостить Feature Request? »

подумаю... надо же еще предложить как оформить... хотя, если ты проникся необходимостью, можешь и сам отправить (меня английский грузит)... для сравнения: в VB случайная последовательность инициализируется Randomize(), а само число возвращается ф-цией RND()

Спасибо за _Random() »

спасибо FlatX007 за хороший вопрос